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.
Âncora__RefHeading__23477_2053127524__RefHeading__23477_2053127524 Âncora__RefHeading__9632_486694287__RefHeading__9632_486694287 Âncora__RefHeading__4843_213273755__RefHeading__4843_213273755 Âncora__RefHeading__14241_644533341__RefHeading__14241_644533341 Âncora__RefHeading__90139_1756225838
__RefHeading__90139_1756225838Ponto de Utilização
"MODIF-DOCTO"
"CONS-PRESTADOR"
Âncora__RefHeading__23479_2053127524__RefHeading__23479_2053127524 Â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_1756225838
Include das definições das tabelas temporárias
cpc-rc0312a.i
Âncora__RefHeading__23481_2053127524__RefHeading__23481_2053127524 Âncora__RefHeading__9636_486694287__RefHeading__9636_486694287 Âncora__RefHeading__4847_213273755__RefHeading__4847_213273755 Âncora__RefHeading__14245_644533341__RefHeading__14245_644533341 Âncora__RefHeading__90143_1756225838__RefHeading__90143_1756225838
Tabelas de entrada e saída
Âncora__RefHeading__23483_2053127524__RefHeading__23483_2053127524 Âncora__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_1756225838Tabela 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.
Âncora__RefHeading__23485_2053127524__RefHeading__23485_2053127524 Âncora__RefHeading__9640_486694287__RefHeading__9640_486694287 Âncora__RefHeading__4851_213273755__RefHeading__4851_213273755 Âncora__RefHeading__14249_644533341__RefHeading__14249_644533341 Âncora__RefHeading__90147_1756225838__RefHeading__90147_1756225838
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
Âncora__RefHeading__23487_2053127524__RefHeading__23487_2053127524 Âncora__RefHeading__9642_486694287__RefHeading__9642_486694287 Âncora__RefHeading__4853_213273755__RefHeading__4853_213273755 Âncora__RefHeading__14251_644533341
__RefHeading__14251_644533341 Âncora__RefHeading__90149_1756225838__RefHeading__90149_1756225838Tabela 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.
Âncora__RefHeading__23489_2053127524__RefHeading__23489_2053127524 Âncora__RefHeading__9644_486694287__RefHeading__9644_486694287 Âncora__RefHeading__4855_213273755__RefHeading__4855_213273755 Âncora__RefHeading__14253_644533341__RefHeading__14253_644533341 Âncora__RefHeading__90151_1756225838
__RefHeading__90151_1756225838Definiçã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.
Âncora__RefHeading__23491_2053127524__RefHeading__23491_2053127524 Âncora__RefHeading__9646_486694287__RefHeading__9646_486694287 Âncora__RefHeading__475_1561139123__RefHeading__475_1561139123 Âncora__RefHeading__4857_213273755__RefHeading__4857_213273755 Âncora__RefHeading__14255_644533341__RefHeading__14255_644533341 Âncora__RefHeading__90153_1756225838__RefHeading__90153_1756225838