cpc-rc0311a.p1

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-prestadoralike 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".