viernes, junio 20, 2008

Error en compilador RPG - GX9 con WorkPanel TRABAJAR CON

Generalmente suele no compilar el objeto que invoca a otro objeto de la forma siguiente:

Call(TCLIENTES ,'INS','')

Lo correcto seria lo siguiente:

&Parametro = ''
TCLIENTES.CALL('INS', &Parametro)


El parametro puede ser Caracter o Numerico, asignarle siempre un valor vacio.

Cuando se hace un WorkPanel tipo Trabajar Con se detalla el siguiente ejemplo de los eventos

Event 'ADICIONAR REGISTRO' 6
............&Clave = 0
............TCLIENTE.CALL('INS', &Clave)
............Refresh
EndEvent

Event Enter
............For Each Linea
...................Do Case
.........................Case &Op = '2' // modificar
..................................TCLIENTE.CALL('UPD', Clave)
.........................Case &Op = '4' // Eliminar
..................................TCLIENTE.CALL('DLT', Clave)
.........................Case &Op = '5' // Revisar
..................................TCLIENTE.CALL('DSP', Clave)
..................EndCase
............EndFor
............Refresh
EndEvent

Esta seria la forma correcta de como trabajar un WorkPanel de mantenimiento.

Endif

No hay comentarios: