CPC-RC0211J.P

• Rotina utilizada para parametrizar um subdiretório no menu Upload de Arquivo no WAC.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.

Localização

• No final do programa rc0211j.p.

Ponto de Utilização

• "SUBDIRETORIO" 

Include das definições das tabelas temporárias

• cpc-rc0211j.i 

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-rc0211j-entrada

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

field in-evento-programa                      as char format "x(06)"
field nm-ponto-chamada-cpc                as char format "x(15)"
field nm-subdir-aux                               as char
field nm-paramrc-char-5                        like paramrc.char-5
field nm-paramrc-u-char-1                     like paramrc.u-char-1
field nr-rowid-paramrc                           as rowid.

Definição campo a campo da tabela de entrada

• in-evento-programa - Evento do programa que chama a CPC.
• nm-ponto-chamada-cpc - Nome do ponto de chamada da CPC dentro do programa que a utiliza. Para o programa rc0211j.p.
• nm-subdir-aux - Campo que recebe o nome do subdiretório no cadastro de parâmetros do RC.
• nm-paramrc-char-5 - Campo que informa o diretório de carga de arquivo padrão.
• nm-paramrc-u-char-1 - Campo que informa o subdiretório de carga de arquivo padrão.
• nr-rowid-paramrc - Campo que recebe o registro corrente da tabela de parâmetros do RC.

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

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

field lg-erro                                         as log
field ds-mensagem                             as char format "x(80)"
field nm-subdir-aux                             as char.

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

• lg-erro - Campo 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 - Campo que retorna mensagem de erro, se ocorrido dentro da CPC.
• nm-subdir-aux - Campo que recebe o nome do subdiretório no cadastro de parâmetros do RC.