CPC-FP0511S.p

• Rotina utilizada na geração de fatura avulsa.
• 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.

Âncora__RefHeading__23387_2053127524__RefHeading__23387_2053127524 Âncora__RefHeading__9542_486694287__RefHeading__9542_486694287 Âncora__RefHeading__4753_213273755__RefHeading__4753_213273755 Âncora__RefHeading__14151_644533341__RefHeading__14151_644533341 Âncora__RefHeading__90049_1756225838__RefHeading__90049_1756225838Localização

• Dentro do programa fp0511s.p.

...

__RefHeading__90051_1756225838Ponto de Utilização

• "APOS-INC-EVENTO"
• "APÓS-GRAVAR"
• "CALC-BASE-IMP"

...

__RefHeading__9546_486694287 Âncora__RefHeading__4757_213273755__RefHeading__4757_213273755 Âncora__RefHeading__14155_644533341__RefHeading__14155_644533341 Âncora__RefHeading__90053_1756225838__RefHeading__90053_1756225838Include das definições das tabelas temporárias

• cpc-fp0511s.i

Âncora__RefHeading__23393_2053127524__RefHeading__23393_2053127524 Âncora__RefHeading__9548_486694287__RefHeading__9548_486694287 Âncora__RefHeading__4759_213273755__RefHeading__4759_213273755 Âncora__RefHeading__14157_644533341__RefHeading__14157_644533341 Âncora__RefHeading__90055_1756225838__RefHeading__90055_1756225838Tabelas de entrada e saída
Âncora__RefHeading__23395_2053127524__RefHeading__23395_2053127524 Âncora__RefHeading__9550_486694287__RefHeading__9550_486694287 Âncora__RefHeading__4761_213273755__RefHeading__4761_213273755 Âncora__RefHeading__14159_644533341__RefHeading__14159_644533341 Âncora__RefHeading__90057_1756225838__RefHeading__90057_1756225838

Tabela de entrada tmp-cpc-fp0511s-entrada

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

field in-evento-programa

...

                 as char format "x(10)"
field nm-ponto-chamada-cpc

...

           as char format "x(15)"
field cd-modalidade                         as int
field cd-contratante                         as int
field cd-contratante-origem               as int
field nr-ter-adesao                           as int
field aa-referencia

...

                           as int
field mm-referencia

...

                         as int
field nr-sequencia

...

                           as int
field cd-evento

...

                               as int
field cd-usuario                               as int
field vl-total

...

                                   as dec
field in-entidade

...

                             like evenimp.in-entidade
field cd-imposto

...

                             like evenimp.cd-imposto
field dt-vigencia

...

                             like evenimp.dt-vigencia-ini
field cd-unidade-grupo                     like evengrimp.cd-unidade-grupo
field cd-grupo-contratante                 like evengrimp.cd-grupo-contratante
field cd-compl-grupo-contrat

...

             like evengrimp.cd-compl-grupo-contrat
field nr-insc-contratante

...

                   like evenctrimp.nr-insc-contratante
field vl-base-imp                               like fatueven.vl-evento.

...

...

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 de cpc
  • cd-modalidade – Código da modalidade que está sendo calculada a fatura avulsa.
  • Cd-contratante – Código do contratante da fatura avulsa
  • Cd-contratante-origem – Código do contratante origem da fatura avulsa
  • Nr-ter-adesao – número do termo de adesão da fatura avulsa
  • Aa-referencia – Mês de referencia da fatura avulsa
  • Mm-referencia – Mês de referencia da fatura avulsa
  • Nr-sequencia – Número da seqüência da nota da fatura avulsa
  • Cd-evento – Código do evento da fatura avulsa
  • Vl-total – Valor total da fatura avulsa
  • in-entidade – Entidade que pertence a estrutura que está sendo calculada.
  • cd-imposto – Código do imposto que está sendo calculado.
  • cd-evento – Código do evento que está sendo calculado
  • dt-vigencia – Data de vigência do imposto que está sendo calculada.
  • cd-unidade-grupo – Código da unidade do grupo do contratante que está sendo calculado.
  • cd-grupo-contratante – Grupo do contratante que está sendo calculado.
  • cd-compl-grupo-contratante – Código do complemento do grupo do contratante que está sendo calculado.
  • nr-insc-contratante – Número da inscrição do contratante que está sendo calulado.
  • vl-base-imp – Valor da base de cálculo do imposto que está sendo calculado.

...

...

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

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

field lg-undo-retry

...

                         as logical
field ds-mensagem-erro

...

                 as char format "x(75)"
field lg-continua                             as log
field vl-base-imp

...

                           like fatueven.vl-evento.

...

...

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

• • lg-undo-retry – Variável que controla os erros que podem ocorrer na CPC.
  • ds-mensagem-erro – Variável que recebe a descrição dos erros que ocorreram na CPC.
  • lg-continua – Indica se processo deve continuar ou não.
  • vl-base-imp – Valor da base de cálculo do imposto que está sendo calculado pela cpc.

...