Histórico da Página
...
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-modalidade like like propost.cd-modalidade
field cd-plano like like propost.cd-plano
field cd-tipo-plano like like propost.cd-tipo-plano
field qt-repasse-cob like like procguia.qt-repasse-cob
field cd-unid-princ like like presev.cd-unidade
field cd-prestador-princ like like preserv.cd-prestador
field cd-unid-solic like like presev.cd-unidade
field cd-prestador-solic like preserv.cd-prestador
field cd-unid-exec like presev.cd-unidade
field cd-prestador-exec like like preserv.cd-prestador
field r-usuario as rowid
field r-outuni as as rowid
field cd-procedimento as as int format "99999999".
Definição campo a campo da tabela de entrada
...
field lg-erro as log
field ds-mensagem as char format "x(75)"
field qt-repasse-cob like like procguia.qt-repasse-cob.
...