Consulta de código implementado en power builder con un error
Hola que tal... Tengo una duda Este es mi código:
ldc_imp = 40000.00
ls_cuenta2 = dw_list.Object.c_codigo_cta[ i]
ls_dep2 = dw_list.Object.c_codigo_dep[ i]
ls_ctap = f_Trim( dw_1.Object.c_codigo_cta[ 1] )
ls_depto = f_Trim( dw_1.Object.c_codigo_dep[ 1] )
if ls_depto=ls_dep2 and ls_ctap=ls_cuenta2 then
For i=1 to dw_list.Rowcount()
ldc_sum = ldc_sum + dw_list.Object.n_importe_sol[ i]
IF ldc_sum >ldc_imp then
ldc_resta = ldc_imp - ldc_sum
MessageBox(title,'excedio .....' , Exclamation! )
End if
Next
End if
La pregunta aki es...? He intentado hacer funcionar el codigo .. Pero solo funciona cuando pongo
if ls_depto=ls_dep2 then
pero cuando pongo
if ls_depto=ls_dep2 and ls_ctap=ls_cuenta2 then
Nooo!
Entonces que de que otra forma puedo hacerlo... Alguna sugerencia
gracias! Que tengas bonito día bye
ldc_imp = 40000.00
ls_cuenta2 = dw_list.Object.c_codigo_cta[ i]
ls_dep2 = dw_list.Object.c_codigo_dep[ i]
ls_ctap = f_Trim( dw_1.Object.c_codigo_cta[ 1] )
ls_depto = f_Trim( dw_1.Object.c_codigo_dep[ 1] )
if ls_depto=ls_dep2 and ls_ctap=ls_cuenta2 then
For i=1 to dw_list.Rowcount()
ldc_sum = ldc_sum + dw_list.Object.n_importe_sol[ i]
IF ldc_sum >ldc_imp then
ldc_resta = ldc_imp - ldc_sum
MessageBox(title,'excedio .....' , Exclamation! )
End if
Next
End if
La pregunta aki es...? He intentado hacer funcionar el codigo .. Pero solo funciona cuando pongo
if ls_depto=ls_dep2 then
pero cuando pongo
if ls_depto=ls_dep2 and ls_ctap=ls_cuenta2 then
Nooo!
Entonces que de que otra forma puedo hacerlo... Alguna sugerencia
gracias! Que tengas bonito día bye
1 respuesta
Respuesta de jasamo19
1
if ls_depto=ls_dep2 and ls_ctap=ls_cuenta2 then
end if
* Si no funciona, es porque los valores de ls_ctap y ls_cuenta2 no coinciden o son falsas o las variables no tienen algun valor.
if ... then
sentencias...
end if
*Funciona cuando todas las comparaciones son verdaderas, es decir:
si (ls_depto es igual a ls_dep2) y (ls_ctap es igual a ls_cuenta2) entonces
hago esto...
fin del si
*Si algunas de las comparaciones es falsa entonces no entra al ciclo FOR ... NEXT y a las otras sentencias.
* Verifica los valores de las variables.
* El IF ... THEN funciona con dos, tres, cuatros, etc. comparaciones, siempre y cuando sean verdaderas.
end if
* Si no funciona, es porque los valores de ls_ctap y ls_cuenta2 no coinciden o son falsas o las variables no tienen algun valor.
if ... then
sentencias...
end if
*Funciona cuando todas las comparaciones son verdaderas, es decir:
si (ls_depto es igual a ls_dep2) y (ls_ctap es igual a ls_cuenta2) entonces
hago esto...
fin del si
*Si algunas de las comparaciones es falsa entonces no entra al ciclo FOR ... NEXT y a las otras sentencias.
* Verifica los valores de las variables.
* El IF ... THEN funciona con dos, tres, cuatros, etc. comparaciones, siempre y cuando sean verdaderas.
