CPC-PR0410E.p

• Rotina utilizada para manutenção da validade de procedimentos
• 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 do programa PR0410E.

Ponto de Utilização

• "GRAVA-DADOS" → Ponto de CPC ao gravar os dados, tanto na inclusão quanto na edição.

Include das definições das tabelas temporárias

• cpc-pr0410e.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-pr0410e-entrada

def temp-table tmp-cpc-pr0410e-entrada no-undo
     field in-evento-programa as char format "x(10)"
     field nm-ponto-chamada-cpc as char format "x(15)"
     field in-funcao-aux as char
     field r-valid-proced as rowid.

Definição campo a campo da tabela de entrada

• in-evento-programa – Nome do evento de chamada da cpc dentro do programa que a utiliza. 
• nm-ponto-chamada-cpc - Nome do ponto de chamada da cpc dentro do programa que a utiliza. 
• in-funcao-aux - Função no momento da chamada da CPC (I - Inclusão, M - Edição)
• r-valid-proced - RowId da tabela VALID_PROCED

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

def temp-table tmp-cpc-pr0410e-saida no-undo
     field lg-undo-retry as log
     field ds-mensagem as char.

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

• lg-undo-retry - Informa ao programa se deve continuar ou voltar e desfazer.
• ds-mensagem - Mensagem de erro.