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 

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.