Exemplo de trabalho DTLCCADD - exige um segundo parâmetro de número de sequência de arquivo de controle.
O DTLCCADW lê o registro de controle PCAT e o exclui. Se você excluir o último registro adicionado, deverá executar imediatamente a função L (veja a seguir) para redefinir o valor de chave mais recente no registro de controle 999999999.