Histórico da Página
...
Tabela de entrada: tmp-cpc-import-A500-entrada
def temp-table tmp-cpc-import-a500-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 preserv.cd-unidade
field cd-unidade-prestadora like preserv.cd-unidade
field cd-transacao like docrecon.cd-transacao
field cd-unidade-principal like docrecon.cd-unidade-principal
field cd-prestador-principal like docrecon.cd-prestador-principal
field cd-unidade-solicitante like docrecon.cd-unidade-solicitante
field cd-prestador-solicitante like docrecon.cd-prestador-solicitante
field nr-serie-doc-original like docrecon.nr-serie-doc-original
field nr-doc-original like docrecon.nr-doc-original
field in-tp-movto as char format "x(01)"
field cd-tipo-insumo like insumos.cd-tipo-insumo
field cd-movto like insumos.cd-insumo
field lg-benef-base as log
field recid-benef as recid
field recid-guia-autor as recid
field in-classe-nota like guiautor.in-classe-nota
field lg-movto-divi as log
field cd-tipo-vinculo like moviproc.cd-tipo-vinculo
field cd-esp-prest-executante like moviproc.cd-esp-prest-executante
field dt-realizacao like moviproc.dt-realizacao
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field cd-serie-nf like notapres.cd-serie-nf
field aa-fatura like notapres.aa-fatura
field nr-fatura like notapres.cod-fatur-ap
field dt-emissao like notapres.dt-emissao
field dt-recebimento like notapres.dt-recebimento
field cd-unidade-ant like car-ide.cd-unimed
field cd-carteira-usuario-ant like car-ide.cd-carteira-inteira
field cd-modalidade-ant like docretmp.cd-modalidade
field cd-usuario-ant like docretmp.cd-usuario
field nr-ter-adesao-ant like docretmp.nr-ter-adesao
field nr-via-carteira-ant like docretmp.nr-via-carteira
field cd-unidade-carteira like car-ide.cd-unimed
field cd-carteira-usuario like car-ide.cd-carteira-inteira
field nr-via-carteira like car-ide.nr-carteira
field in-glosa as int
field cd-proc-insu like presmovt.cd-proc-insu
field cd-unidade-executante like preserv.cd-unidade
field cd-prestador-executante like preserv.cd-prestador
field lg-urgencia as log
field lg-layout-serious as log
field lg-utiliza-palm as log
field nr-seq-interno like docretmp.nr-seq-interno
field nr-processo like moviptmp.nr-processo
field nr-seq-digitacao like moviptmp.nr-seq-digitacao
field in-tipo-movimento as int
field cd-unidade-imp like moviproc.cd-unidade-imp
field cd-prestador-imp like moviproc.cd-prestador-imp
field nr-lote-imp like moviproc.nr-lote-imp
field nr-sequencia-imp like moviproc.nr-sequencia-imp
field in-ato-medico as int
field r-movto as recid
field linha-arquivo as char
field tp-atend as char
field tp-nota as char
field cd-trans-classe like pipresta.cd-trans-classe.
Definição campo a campo da tabela de entrada
- in-evento-programa - nome do evento (utilizado para pontos que possuem múltiplas chamadas);
- nm-ponto-chamada-cpc - nome do ponto de chamada da CPC;
- cd-unidade - código da unidade
- cd-unidade-prestadora - código da unidade prestadora
- cd-transacao - código da transação
- cd-unidade-principal - código da unidade principal
- cd-prestador-principal - código do prestador principal
- cd-unidade-solicitante - código da unidade solicitante
- cd-prestador-solicitante - código do prestador solicitante
- nr-serie-doc-original - série do documento
- nr-doc-original - número do documento
- in-tp-movto - tipo do movimento
- cd-tipo-insumo - código do tipo do insumo
- cd-movto - código do movimento
- lg-benef-base - indica se beneficiário é da base ou não
- recid-benef - identificador do usuário
- recid-guia-autor - identificador da guia
- in-classe-nota - identificador da classe de nota
- lg-movto-divi - identificador
- cd-tipo-vinculo - identificador do tipo de vínculo
- cd-esp-prest-executante - código da especialidade
- dt-realizacao - data de realização
- aa-guia-atendimento - ano da guia
- nr-guia-atendimento - número da guia
- cd-serie-nf - série
- aa-fatura - ano da fatura
- nr-fatura - número da fatura
- dt-emissao - data de emissão
- dt-recebimento - data de recebimento
- cd-unidade-ant - código da unidade anterior
- cd-carteira-usuario-ant - código da carteira anterior
- cd-modalidade-ant - código da modalidade anterior
- cd-usuario-ant - código do usuário anterior
- nr-ter-adesao-ant - número do termo de adesão anterior
- nr-via-carteira-ant - número da via da carteira anterior
- cd-unidade-carteira - código da unidade da carteira
- cd-carteira-usuario - número da carteira do usuário
- nr-via-carteira - número da via da carteira
- in-glosa - identificador do tipo de glosa
- cd-proc-insu - código do procedimento/insumo
- cd-unidade-executante - código da unidade executante
- cd-prestador-executante - código do prestador executante
- lg-urgencia - indicador de urgência
- lg-layout-serious - identificador de layout serious ou ptu
- lg-utiliza-palm - indica se utiliza palm
- nr-seq-interno - número sequencial interno
- nr-processo - número do processo
- nr-seq-digitacao - número da sequencia de digitação
- in-tipo-movimento
- cd-unidade-imp - código da unidade de importação
- cd-prestador-imp - código da unidade de importação
- nr-lote-imp - número do lote de importação
- nr-sequencia-imp - número da sequencia do lote de importação
- in-ato-medico - identifica o tipo de ato médico
- r-movto - identificador do movimento
- linha-arquivo - número da linha do arquivo
- tp-atend - indicador do tipo de atendimento
- tp-nota - indicador do tipo da nota
- cd-trans-classe - código da associativa transação x classe
Tabela de saída: tmp-cpc-export-A500-saida
def temp-table tmp-cpc-import-a500-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char format "x(75)"
field cd-movto-saida like ambcbhpm.cd-amb
field cd-transacao like moviproc.cd-transacao
field lg-obriga-dt-receb as log
field lg-glosa-movimento as log
field lg-cart-ant as log
field cd-carteira-benef like car-ide.cd-carteira-inteira
field aa-guia-atendimento like guiautor.aa-guia-atendimento
field nr-guia-atendimento like guiautor.nr-guia-atendimento
field cd-unidade-carteira like car-ide.cd-unimed
field cd-tipo-insumo like tipoinsu.cd-tipo-insumo
field lg-urgencia as log
field cd-unidade-prestador like moviproc.cd-unidade-prestador
field cd-prestador like moviproc.cd-prestador
field lg-desconsidera-internacao as log
field lg-verif-prest-exe as log.
Definição campo a campo da tabela de saída
lg-undo-retry - campo que indica se ocorreram erros na CPC. Deve retornar "yes" se ocorrer algum erro ou "no" se o processo for concluído sem erros;
ds-mensagem - mensagem de erro que deve ser retornada para o programa chamador caso ocorra algum erro na CPC;
cd-movto-saida -
cd-transacao - código da transação
lg-obriga-dt-receb -
lg-glosa-movimento -
lg-cart-ant -
cd-carteira-benef - código da unidade da carteira
aa-guia-atendimento - ano da guia
nr-guia-atendimento - número da guia
cd-unidade-carteira - número da carteira do usuário
cd-tipo-insumo - código do tipo do insumo
lg-urgencia - indicador de urgência
cd-unidade-prestador - código da unidade do prestador
cd-prestador - código do prestador
lg-desconsidera-internacao - indicador se considera ou não internação
lg-verif-prest-exe - indica se o preestador executante será igual ao principal