Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________
LsSql1 = "SELECT * from " + (LcRutaTabla)
IF !EMPTY(this.cCamposPK ) AND !EMPTY(this.cValorPK)LsWhere = " WHERE "+ _cCamposPK +" = '"+ _cValoresPK + "' "
ENDIFFOR
LnNumCmp = 1 TO ALEN(laValoresClaveDestino)LsCmpEva =
This.ccursor_local + '.' + laValoresClaveDestino(LnNumCmp)LsCampo = LoGrid.
RecordSource+ '.' + laValoresClaveDestino(LnNumCmp) REPLACE (LsCampo) WITH EVALUATE(LsCmpEva) ENDFOR LcValKey = eval(this.ccmps_id1)LcCmpKey =
this.ccmps_id1LcCmp_id =
this.ccampo_id1 REPLACE &LcCmp_id WITH this.dataadmin.Cap_nroitm(LcValKey,this.ctabla_Det1,LcCmpKey,LcCmp_id)*****
Nos vemos
