Informix - Problemas al insertar

   
Vista:

Problemas al insertar

Publicado por Anita (1 intervención) el 16/10/2007 19:58:23
Hola a todos alguien me puede decir que estoy haciendo mal este el codigo que puse en un boton,cuando el valor es 001 si inserta los datos pero cuando es 002 no inserta en la columna correspondiente como haria para setear los valores

string ls_valor,ls_velocidad,ls_column
decimal ld_porpagar
integer li_fila,li_count,li

dw_2.settransobject(sqlca)
dw_2.retrieve()

FOR li_fila = 1 to dw_2.rowcount()
ls_valor = dw_2.object.pccodcau[li_fila]
ls_velocidad = dw_2.object.velocida[li_fila]
ld_porcentaje = dw_2.object.porcent[li_fila]

choose case ls_valor
case '001'
Insert Into resultado
(codauto,velocidad,porcentaje)
values
(:li_fila ,:ls_velocidad,:ld_porpagar)USING SQLCA;

case '002' // esto no se hace alguiens abe porque no o que falta
Insert Into resultado
(dpcodper,velocidad2,porcentaje2)
values
(:li_fila ,:ls_velocidad,:ld_porpagar)USING SQLCA;
end choose
next

dw_1.retrieve()
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder