CPC-RC0312A.P

Rotina para modificar o 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.

Âncora__RefHeading__23475_2053127524__RefHeading__23475_2053127524 Âncora__RefHeading__9630_486694287__RefHeading__9630_486694287 Âncora__RefHeading__4841_213273755__RefHeading__4841_213273755 Âncora__RefHeading__14239_644533341__RefHeading__14239_644533341 Âncora__RefHeading__90137_1756225838__RefHeading__90137_1756225838 

Localização

• Dentro do programa rc0312a.p, o ponto de chamada "MODIF-DOCTO" é chamado antes de visualizar os dados do documento.
• Dentro do programa rc0312a.p, o ponto de chamada "CONS-PRESTADOR" é chamado antes de visualizar os dados do documento.

...

Ponto de Utilização

• "MODIF-DOCTO"
• "CONS-PRESTADOR"

...

Âncora__RefHeading__9634_486694287__RefHeading__9634_486694287 Âncora__RefHeading__4845_213273755__RefHeading__4845_213273755 Âncora__RefHeading__14243_644533341__RefHeading__14243_644533341 Âncora__RefHeading__90141_1756225838__RefHeading__90141_1756225838Include das definições das tabelas temporárias

• cpc-rc0312a.i

...

__RefHeading__14245_644533341__RefHeading__14245_644533341 Âncora__RefHeading__90143_1756225838__RefHeading__90143_1756225838Tabelas de entrada e saída
Âncora__RefHeading__23483_2053127524__RefHeading__23483_2053127524anchor__RefHeading__9638_486694287__RefHeading__9638_486694287 Âncora__RefHeading__4849_213273755__RefHeading__4849_213273755 Âncora__RefHeading__14247_644533341__RefHeading__14247_644533341 Âncora__RefHeading__90145_1756225838__RefHeading__90145_1756225838

Tabela de entrada tmp-cpc-rc0312a-entrada

def temp-table tmp-cpc-rc0312a-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

...

                                 like notapres.cd-unidade
field cd-unidade-prestadora

...

               like 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.nr-fatura
field cd-unidade-seccional

...

                 like preserv.cd-unidade-seccional.

...

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- Código da unidade
• cd-unidade-prestador – Código da unidade do prestador
• cd-prestador - Código do prestador
• aa-fatura – ano da fatura
• cd-serie-nf – serie da fatura
• nr-fatura – número da fatura
• cd-unidade-secciona – Código da unidade seccinal do prestador

...

...

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

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

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

...

...

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– Variável que recebe a descrição dos erros que ocorreram na CPC.

...