CPC-RC0311A.P

Rotina para

• Permitir consultar dados da fatura na inclusão do documento;
• Permitir consultar dados da fatura na inclusão do documento;
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.

Localização

• Dentro do programa rc0311a.p, o ponto de chamada "COMNOTA-FATURA" é chamado após informar os dados do documento.
• Dentro do programa rc0311a.p, o ponto de chamada "TRATA-GUIA" é chamado após informar os dados do documento.
• Dentro do programa rc0311a.p, o ponto de chamada "MOVIMENTO-GUIA" é chamado quando da montagem do browser de movimentos da guia de autorização.
• Dentro do programa rc0311a.p, o ponto de chamada "ANT-VALID-REEMB" é chamado antes de verificar se o documento de reembolso está vinculado a uma fatura.

• "COMNOTA-FATURA"
• "TRATA-GUIA"
• "CONS-PRESTADOR"
• "MOVIMENTO-GUIA"
• "ANT-VALID-REEMB" - A partir da versão 12.1.2307.

Include das definições das tabelas temporárias

• cpc-rc0311a.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0311a-entrada

def temp-table tmp-cpc-rc0311a-entrada no-undo

field in-evento-programa                     as char format "x(10)"
field nm-ponto-chamada-cpc              as char format "x(15)"
field cd-unidade-seccional                   like preserv.cd-unidade-seccional
field aa-guia-atendimento                    like docusos.aa-guia-atendimento
field nr-guia-atendimento                    like docusos.nr-guia-atendimento
field r-procguia                                     as rowid
field r-insuguia                                      as rowid.

Definição campo a campo da tabela de entrada

• in-evento-programa- Identifica qual evento deve ser executado no momento que está sendo chamada
• nm-ponto-chamada-cpc – Ponto de chamada da cpc
• cd-unidade-seccional – Unidade seccional do prestador
• aa-guia-atendimento – Ano da guia de atendimento
• nr-guia-atendimento – Número da guia de atendimento
• r-procguia – Rowid do registro de procedimento (Tabela Procguia)
• r-insuguia – Rowid do registro de insumo (Tabela Insuguia)

Tabela de saída tmp-cpc-rc0311a-saida

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

         field lg-erro                              as log
         field lg-undo-retry                   as log
         field ds-mensagem                  as char format "x(75)"
         field cd-unidade-prestadora    like notapres.cd-unidade-prestadora
         field cd-prestador                    like notapres.cd-prestador
         field aa-fatura                          like notapres.aa-fatura
         field cd-serie-nf                       like notapres.cd-serie-nf
         field nr-fatura                          like notapres.cod-fatur-ap
         field lg-permite-reemb-com-nota-fatura as log.

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

• lg-erro – Indicador se ocorreu erro na cpc
• lg-undo-retry – Variável que controla os erros que podem ocorrer na CPC.
• ds-mensagem– Variável que recebe a descrição dos erros que ocorreram na CPC.
• cd-unidade-prestadora– Código da unidade prestadora da fatura
• cd-prestador - Código do prestador da fatura
• aa-fatura – ano da fatura
• cd-serie-nf – serie da fatura
• nr-fatura – número da fatura
• lg-considera-movto – Variável que tem como função indicar se o movimento autorizado (procedimento ou insumo) em tratamento, deverá ou não ser considerado no processo de montagem de browser dos movimentos autorizados na guia. Ressalto que está variável somente é utilizada no ponto de chamada "MOVIMENTO-GUIA".
• lg-permite-reemb-com-nota-fatura - indica se o sistema consistirá se a inclusão do documento de reembolso está sendo feita com nota/fatura