Histórico da Página

...

field in-evento-programa                    as   as char format "x(06)"
field nm-ponto-chamada-cpc               as char format "x(15)"
field cd-insumo                                 like    like insumos.cd-insumo
field cd-tipo-insumo                             like insumos.cd-tipo-insumo
field lg-opme                                      as   as log
field nm-fornecedor                             like insumos.nm-fornecedor.
field rw-insumos                                  as rowid
field lg-atribuicao                                  as as log format "Sim/Nao"
field cd-principio-ativo                       like    like insumos.cd-principio-ativo.

...

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

field lg-undo-retry                            as as log
field ds-mensagem                        as char format "x(75)"
field nm-fornecedor                       as  as char format "x(42)"
field cd-unidade                              as as int
field cd-prestador                            as as int
field lg-atribuicao                            as log format "Sim/Nao"
field lg-principio-ativo                      as log.

...