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.

Ponto de Utilização

• "COMNOTA-FATURA"
• "TRATA-GUIA"
• "CONS-PRESTADOR"
• "MOVIMENTO-GUIA"

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.aa-fatura
field lg-considera-movto                    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".