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-unidade-carteira                      like like unimed.cd-unimed
field cd-modalidade                           like  like modalid.cd-modalidade
field nr-proposta                                 like  like propost.nr-proposta
field cd-usuario                                 like  like usuario.cd-usuario.

Definição campo a campo da tabela de entrada

...

def temp-table tmp-cpc-at0111b-saida no-undo

field lg-erro                            as log
field ds-mensagem               as char format "x(75)"
field cd-unidade-carteira       like car-ide.cd-unimed.

...