CPC-PP0800A.P

• Rotina utilizada na emissão da GFIP para consultar o valor de fundo rotativo descontado do prestador.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será utilizado para esta CPC apenas um registro na tabela temporária de saída.

Localização

• No programa pp0800a.p, ao executar a geração do GFIP após a leitura dos movimentos de cada prestador.

Ponto de Utilização

• "FUNDO-ROTATIVO"

Include das definições das tabelas temporárias

• cpc-pp0800a.i 

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-pp0800a-entrada

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

field in-evento-programa                    as char format "x(06)"
field nm-ponto-chamada-cpc             as char format "x(15)"
field cd-unidade                                  like titupres.cd-unidade
field cd-unidade-prestador                 like titupres.cd-unidade-prestador
field cd-tipo-medicina                         like titupres.cd-tipo-medicina
field cd-prestador                                like titupres.cd-prestador
field cod-esp                                        like titupres.cod-esp
field nr-docto                                       like titupres.nr-docto
field parcela                                        like titupres.parcela
field dt-producao                                 like titupres.dt-producao
field vl-base-inss-fis                          like titupres.vl-base-inss-calc
field vl-base-inss-jur                          like titupres.vl-base-inss-juridica
field vl-base-inss-ben                        like titupres.vl-base-inss-beneficente
field in-imp-tomador                          as int
field in-categoria                                as int.

Definição campo a campo da tabela de entrada

• in-evento-programa – Indica o evento de chamada que deve ser " CONSULTA".
• nm-ponto-chamada-cpc – Indica o ponto de chamada, que deve ser "FUNDO-ROTATIVO".
• cd-unidade – Indica a unidade da operadora.
• cd-unidade-prestador – Indica a unidade do prestador.
• cd-tipo-medicina – Indica o tipo de medicina.
• cd-prestador – Indica o código do prestador.
• cod-esp – Indica o código da espécie.
• nr-docto – Indica o numero do documento.
• parcela – Indica a parcela.
• dt-producao – Indica a data de produção.
• vl-base-inss-fis – Indica o valor base do INSS de pessoa física.
• vl-base-inss-jur– Indica o valor base do INSS de pessoa jurídica.
• vl-base-inss-ben– Indica o valor base do INSS de entidade beneficente.
• in-imp-tomador – Indica o tipo de impressão do tomador.
• in-categoria – Indica a categoria do prestador.

Tabela de entrada e saída tp-valor-prestador

def temp-table tp-valor-prestador

field nr-insc-contratante                  LIKE contrat.nr-insc-contratante
field cd-unidade-prestador               like titupres.cd-unidade-prestador
field cd-prestador                             like titupres.cd-prestador
field in-cat-trabalhador                    as int format 99
field tt-faturas                                   as dec
field vl-descontado                           as dec
index tp-valor-prestador-indice       as primary cd-contratante
cd-unidade-prestador
cd-prestador
in-cat-trabalhador.

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

• nr-insc-contratante – indica o número de inscrição contratante.
• cd-unidade-prestador – indica o código da unidade do prestador.
• cd-prestador – Indica o código do prestador.
• in-cat-trabalhador – Indica a categoria do prestador (física,jurídica ou credenciado).
• tt-faturas – Indica o somatório de valores dos movimentos das faturas do prestador.
• vl-descontado – Indica o somatório de valor descontado de fundo rotativo dos movimentos das faturas do prestador.

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

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

field lg-undo-retry               as log
field ds-mensagem              as char.

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

• lg-undo-retry – Indica se ocorreu erro durante processamento da cpc.
• ds-mensagem – Descrição de mensagem de erro que será mostrada quando ocorrer erro.