CPC-PP0610K.P

• Rotina utilizada para relatorio de eventos da producao de prestadores.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

Localização

• Dentro do PP0610K.p.

Ponto de Utilização

• "ANTES-IMP"

Include das definições das tabelas temporárias

• CPC-PP0610K.I 

 I

Tabelas de entrada e saída e tmp-dados

Tabela de entrada tmp-dados

def temp-table tmp-dados no-undo

field cd-unidade-prestador

...

                   like movipres.cd-unidade-prestador
field cd-grupo-prestador                       like preserv.cd-grupo-prestador
field cd-unidade

...

                                 like preserv.cd-unidade
field nm-prestador                               like preserv.nm-prestador
field cd-prestador

...

                               like movipres.cd-prestador
field cd-contratante                             like preserv.cd-contratante
field cd-evento

...

                                   like movipres.cd-evento
field dt-anoref                                     like movipres.dt-anoref
field nr-perref                                     like movipres.nr-perref
field nr-nota-fis                                   as int format "zz,zzz,zz9"
field in-classe-evento

...

                         like movipres.in-classe-evento
field in-movto                                     like movipres.in-movto
field cd-gr-procedimento

...

                     like movipres.cd-gr-procedimento
field qt-movto                                     as int format "zzz9"
field dt-realizacao                               like movipres.dt-realizacao
field vl-movto                                     like movipres.vl-movto
field lg-desc                                       as log format "Sim/Nao"
field dt-inicial                                     like evepropp.dt-inicial
field dt-final                                       like evepropp.dt-final
field cd-tipo-medicina

...

                         like movipres.cd-tipo-medicina
field cd-mod-plano-tipo-modulo

...

           like movipres.cd-mod-plano-tipo-modulo
field nr-nota-parcela

...

                           like movipres.nr-nota-parcela
field nr-docto-pp                                 like titupres.nr-docto
field parcela                                       like titupres.parcela

Tabela de entrada tmp-cpc-pp0610k-entrada

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

field in-evento-programa                     as char format "x(10)"
field nm-ponto-chamada-cpc               as char format "x(15)".

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do ponto de chamada.
• nm-ponto-chamada-cpc – Nome do ponto de chamada da CPC.

Tabela de entrada tmp-cpc-pp0610k-saida

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

field lg-erro                                       as log
field ds-mensagem

...

                           as char format "x(75)".

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

• lg-erro - Variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.
• ds-mensagem – Mensagem da ocorrência do erro no processamento da CPC.