recorrer registros
Publicado por alejon (53 intervenciones) el 30/09/2008 21:49:38
quiero recorrer unos registro de una tabla para poner el monto en cero pero no lo hace y me da el siguiente error: "conflicto de actualizacion" en la linea :
UPDATE vdeuda2 SET monto = 0 WHERE vdeuda2.nroapto = nNroApto
cual pudiera el problema
este el codigo:
SELECT vdeuda2
CONTADOR = 0
nNroApto = Thisform.nroapto
LOCATE FOR nNroApto = vdeuda2.nroapto
DO WHILE nNroApto = vdeuda2.nroapto
If nNroApto = vdeuda2.nroapto
UPDATE vdeuda2 SET monto = 0 WHERE vdeuda2.nroapto = nNroApto
CONTADOR = CONTADOR + 1
ENDIF
ENDDO
TABLEUPDATE(0,.F.,"vdeuda2")
UNLOCK ALL
saludos.
UPDATE vdeuda2 SET monto = 0 WHERE vdeuda2.nroapto = nNroApto
cual pudiera el problema
este el codigo:
SELECT vdeuda2
CONTADOR = 0
nNroApto = Thisform.nroapto
LOCATE FOR nNroApto = vdeuda2.nroapto
DO WHILE nNroApto = vdeuda2.nroapto
If nNroApto = vdeuda2.nroapto
UPDATE vdeuda2 SET monto = 0 WHERE vdeuda2.nroapto = nNroApto
CONTADOR = CONTADOR + 1
ENDIF
ENDDO
TABLEUPDATE(0,.F.,"vdeuda2")
UNLOCK ALL
saludos.
Valora esta pregunta


0