cpc-rt-retroage-data.p

• Rotina utilizada para retroagir datas.
• 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.

Localização

• Dentro da rotina de retroação da datas.

Pontos de Utilização

• "CONV-MES-DIA"

Include das definições das tabelas temporárias

• cpc-rt-retroage-data.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rt-retroage-data-entrada

def temp-table tmp-cpc-rt-retroage-entrada  no-undo
         field nm-ponto-chamada-cpc         as char format "x(15)"
         field dt-atual                     as date format "99/99/9999"
         field qt-retro                     as int. 

Definição campo a campo da tabela de entrada

• nm-ponto-chamada-cpc – Nome do ponto de cpc
• dt-atual – Data calculada pelo sistema.
• qt-retro - Número de dias.

Tabela de saida tmp-cpc-rt-retroage-data-saida

def temp-table tmp-cpc-rt-retroage-saida    no-undo
         field lg-erro                      as log
         field ds-mensagem                  as char
         field dt-fim                       as date format "99/99/9999".

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

• lg-erro – Log que indica se ocorreu algum erro durante o processamento.
• ds-mensagem – Campos que retorna a mensagem correspondente ao erro, caso o campo lg-erro esteja ligado.
• dt-fim – Data calculada retornada da cpc.