Olá,
o código em anexo mostra como limpar um form de maneira automática. O exemplo mostra como limpar campos TEXT e LISTVIEW, mas pode ser usado para qualquer tipo de campo.
Saludos!
Como usar:
Código COBOL:
CALL "POWERCONVTOCOM" USING POW-SELF RETURNING FORMOBJECT
INVOKE OO-CLASS "MT-CLEAR" USING FORMOBJECT
SET FORMOBJECT TO NULL
FORMOBJECT -> REPRESENTA SEU FORM
With_oo.ppj - Google Drive
OO.CBL - Google Drive
O crédito é do Evandro Andersen.