Histórico da Página

...

• Rotina utilizada ao final do processo "Manutenção Percentual Acréscimo/Desconto Pagamento Prestador"de Importação de Insumos.

Localização

• Antes de consultar o registrode criar a tabela referente à Manutenção Quantidade de Moedas por Insumo (Rc0110B) tabela prepadin.

Ponto de Utilização

• "FINALANTES-CRIA-CODIGOPREP".

Include das definições das tabelas temporárias

...

Tabela de entrada tmp-cpc-rc0310r-entrada

def temp-table tmp-cpc-rc0310r-entrada     no-undo
    field in-evento-programa                 as char format "x(10)"
    field nm-ponto-chamada-cpc               as char format "x(15)"
    field cd-tp-insumo                       like insumos.cd-tipo-insumo
    field

...

cd-insumo                          as int64 format "9999999999"
    field r-tmpinsumo                        as rowid .

Definição campo a campo da tabela de entrada

• in-evento-programa - Nome do evento do ponto de cpc.
• nm-ponto-chamada – -cpc - Nome do ponto de chamada da cpccpc.
• cd-tp-insumo - Código referente ao tipo de insumo.
• cd-insumo - Código referente ao insumo.
• r-acrdespr tmpinsumo - Rowid da tabela "acrdespr".temporária de insumos a importar

Tabela de saída temp-table tmp-cpc-rc0310r-saida

def temp-table tmp-cpc-rc0310r-saida       no-undo
    field lg-undo-retry

...

                     as log
    field ds-mensagem

...

                       as char format "x(75)".

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

...