CPC-WAC0017C_P

• Rotina utilizada para retornar mensagem de situação de AIH para o usuário do WAC.
• 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 programa wac0017c.p.

...

__RefHeading__87069_1756225838__RefHeading__87069_1756225838Ponto de Utilização

"WEB-GUIA"

• • Rotina utilizada para retornar mensagem de situação de AIH para o usuário do WAC.

;
Âncora__RefHeading__20409_2053127524__RefHeading__20409_2053127524 Âncora__RefHeading__6564_486694287__RefHeading__6564_486694287 Âncora__RefHeading__1775_213273755__RefHeading__1775_213273755 Âncora__RefHeading__11173_644533341__RefHeading__11173_644533341 Âncora__RefHeading__87071_1756225838__RefHeading__87071_1756225838Include das definições das tabelas temporárias

• cpc-wac0017c.i

...

__RefHeading__20411_2053127524__RefHeading__20411_2053127524 Âncora__RefHeading__6566_486694287__RefHeading__6566_486694287 Âncora__RefHeading__1777_213273755__RefHeading__1777_213273755 Âncora__RefHeading__11175_644533341__RefHeading__11175_644533341 Âncora__RefHeading__87073_1756225838__RefHeading__87073_1756225838Tabelas de entrada e saída Âncora__RefHeading__20413_2053127524__RefHeading__20413_2053127524 Âncora__RefHeading__6568_486694287__RefHeading__6568_486694287 Âncora__RefHeading__1779_213273755__RefHeading__1779_213273755 Âncora__RefHeading__11177_644533341__RefHeading__11177_644533341 Âncora__RefHeading__87075_1756225838__RefHeading__87075_1756225838

Tabela de entrada tmp-cpc-wac0017c-entrada

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

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

...

                 as char format "x(15)"
field nr-guia-atendimento

...

                       as char format "999999999999"

...

...

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc-wac0017c.p. O valor desse campo pode ser:
    • "MENSAGEM".
    • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa wac0017C.w:
    • "WEB-GUIA".
    • nr-guia-atendimento – Número da guia (AIH) de atendimento. Este campo e composto de 12 caracteres (4 caracteres da unidade e 8 caracteres do número da guia)

...

• • • .

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

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

field ds-mensagem

...

          as char

...

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

• • • ds-mensagem – mensagem que deverá ser retornada ao usuário.

...