CPC-API-RECEBE-PTU60.p

...

              def temp-table tmp-cpc-api-recebe-ptu60-entrada no-undo
                    field in-evento-programa                             as char format "x(06)"
                    field nm-ponto-chamada-cpc                       as char format "x(15)"
                    field cd-unidade                                           like guiautor.cd-unidade
                    field aa-guia-atendimento like                            like guiautor.aa-guia-atendimento
                    field nr-guia-atendimento                             like guiautor.nr-guia-atendimento
                    field cd-carteira-usuario                               as dec
                    field lg-tem-serious as                                      as log
                    field r-procguia as                                            as rowid
                    field ds-denial-mens as                                    as char
                    field h-tmp-guiautor                                     as handle
                    field h-tmp-procguia as                                    as handle
                    field h-tmp-insuguia as                                    as handle
                    field h-buffer-tmp-guiautor as handle.                         as handle

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc;
    • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. ;
    • cd-unidade – Código da unidade do prestador;
    • aa-guia-atendimento – Ano da guia de atendimento;
    • nr-guia-atendimento – Número da guia de atendimento;
    • cd-carteira-usuario - 
    • lg-tem-serious - Indica se a Unimed possui ou não serious; 
    • r-procguia - 
    • ds-denial-mens - 
    • h-tmp-guiautor - 
    • h-tmp-insuguia - 
    • h-buffer-tmp-guiautor - 

...

              def temp-table tmp-cpc-api-recebe-ptu60-saida no-undo
                    field lg-undo-retry                         as logical
                    field ds-mensagem                       as char format "x(75)"
                    field lg-tem-serious                       as log
                    field nm-grupo as                              as char
                    field id-autoriza                             as int
                    field lg-alto-custo as log.                         as log

Definição campo a campo da tabela de saída

...