CPC-WINT0004.P

• Rotina que possibilita a inclusão e manutenção de registros no cadastro de beneficiários de outras unidades.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

Localização

• No início da execução do programa.

Ponto de Utilização

"GRAVA-BENEF"

Include das definições das tabelas temporárias

• cpc-wint0004.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-wint0004-entrada

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

field in-evento-programa                                    as char format "x(6)"
field nm-ponto-chamada-cpc                             as char format "x(15)"
field cd-unidade-carteira                                     like out-uni.cd-unidade
field cd-carteira-usuario                                      like out-uni.cd-carteira-usuario
field dt-validade-carteira                                     as date format "99/99/9999"
field in-abrangencia-intercambio                        as int format "9"
field nm-usuario                                                 like out-uni.nm-usuario

Definição campo a campo da tabela de entrada

• • • in-evento-programa – nome do evento do ponto de chamada dentro do programa que a utiliza. Para o programa wint0004.w:
    • "INCLUI".
    • nm-ponto-chamada – nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa wint0004.w:
    • "GRAVA-BENEF".
    • cd-unidade-carteira – unidade da carteira do beneficiário.
    • cd-carteira-usuario - código da carteira do beneficário.
    • dt-validade-carteira – data de validade da carteira do beneficiário.
    • in-abrangencia-intercambio – identifica a abragência do beneficiário de intercâmbio: "0" Não informado, "1" Nacional, "2" Grupo de Estados, "3" Estadual, "4" Grupo de Municípios ou "5" Municipal.
    • nm-usuario – nome do beneficiário de intercâmbio.
      
      

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

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

field lg-undo-retry           as log

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

• • • lg-undo-retry – variável que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.