CPC-AC1001D.p

Rotina utilizada para:

• Permite o controle da data de Atendimento

Localização

• Dentro do programa antes da verificação do período de movimentação.

Ponto de Utilização

• " ALTERA-DATA "

Include das definições das tabelas temporárias

• cpc-ac1001d.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-ac1001d-entrada

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

field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(15)"
field dt-realizacao as date format "99/99/9999".

Definição campo a campo da tabela de entrada

• in-evento-programa – Evento do programa que chama a cpc-ac1001d.p.
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa ac1001d.p.
• Dt-realizacao – Data de realização do movimento.

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

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

field lg-undo-retry

...

               as log
field ds-mensagem               as char format "x(50)"
field cd-erro-sistema

...

           as char
field dt-atual                       as date format "99/99/9999"
field dt-antiga                     as date format "99/99/9999".

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;
• ds-mensagem – Mensagem que deverá ser retornada ao usuário, quando indicação de ocorrência de erro;
• cd-erro-sistema – Permite informar ERRO de retorno para apresentação em tela.
• dt-atual – Retorna o Valor atual da Data.
• Dt-antiga – Retorna a data antiga de realização do movimento.