CPC-RTREAJUS1.P

• Valida a data de vinculo de um determinado usuário.

Localização

• Para o ponto de chamada " INICIO-VINCULO ", dentro do programa RTREAJUS1.p antes do calculo da data de vinculo.

Ponto de Utilização

"INICIO-VINCULO"

Include das definições das tabelas temporárias

• cpc-rtreajus1.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rtreajus1-entrada

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

field nm-ponto-chamada-cpc                          as char format "x(15)"
field cd-modalidade                                        like usuario.cd-modalidade-anterior
field nr-proposta                                              like usuario.nr-proposta-anterior
field cd-usuario                                               like usuario.cd-usuario-anterior
field dt-vinculo-par                                          like usuario.dt-inicio-vinculo-unidade

Definição campo a campo da tabela de entrada

• • • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
    • cd-modalidade – Código da Modalidade.
    • nr-proposta – Numero da proposta.
    • cd-usuario – Código do usuário.
    • dt-vinculo-par - Data de início do vínculo do beneficiário.
      
      

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

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

field lg-undo-retry                   as log
field ds-mensagem                as char format "x(75)"
field ds-mensagem-erro         as char
field dt-vinculo-par                  like usuario.dt-inicio-vinculo-unidade

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.
    • ds-mensagem-erro – Variável que recebe a descrição dos erros que ocorreram no ponto da CPC.
    • dt-vinculo-par – Data de início do vinculo do beneficiário.