Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

  • "CRIA-TMPRPBEN"
  • "DT-RECEB-ARQ"
  • "GRAVA-TEMP"
  • "TRATA-MOV-BENEF"
  • "GRAVA-MEN-BENEF"
  • "TRATA-DEP"
  • "TRATA-CAR-ESPEC"
  • "TRATA-IMP"
  • "NOME-SOCIAL"
  • "FIM-CARGA-REG3" - a partir da versão 12.1.2311.

Include das definições das tabelas temporárias

...

Tabela de entrada tmp-cpc-api-set0003-entrada

def temp-table tmp-cpc-api-set0003-entrada no-undo

    fields in-evento-

...

programa   as char format "x(15)"                     
    fields nm-ponto-chamada-cpc

...

as char format "x(15)"

...

                 

...

  
    fields

...

lg-mensagem-

...

na-

...

tela  as logical       

...


   

...

fields dt-inclusao-

...

origem   as date
   

...

fields nr-rowid-tmprpben    as rowid
    fields cd-

...

modalidade       

...

like modalid.cd-modalidade
    fields nr-

...

proposta         

...

like propost.nr-proposta
    fields nr-

...

layout           

...

as int format "99"
    fields char-

...

           

...

 as char format "x(30)" 
    fields char-

...

           

...

 as char format "x(30)" 
    fields char-

...

           

...

 as char format "x(30)" 
    fields char-

...

           

...

 as char format "x(30)" 
    fields char-

...

           

...

 as char format "x(30)" 
    fields char-

...

           

...

 as char format "x(60)" 
    fields char-

...

           

...

 as char format "x(60)" 
    fields char-

...

           

...

 as char format "x(60)" 
    fields char-

...

           

...

 as char format "x(60)" 
    fields char-

...

10             

...

as char format "x(

...

100)"
    fields cd-motivo-

...

cancelamento as int
   

...

fields cd-

...

contratante like tmprpben.cd-contratante
    fields nr-lote-imp         

...

like tmprpben.nr-lote-imp
    fields nr-sequencia-benef 

...

 like tmprpben.nr-sequencia-benef
    fields nr-sequencia-real 

...

 

...

like tmprpben.nr-sequencia-real
    fields in-tipo-movimento   

...

like tmprpben.in-tipo-movimento
    fields cd-

...

usuario like tmprpben.cd-usuario
    fields nr-

...

linha as int
    fields nr-cpf               as char
    fields nm-usuario     as char 
    fields cd-funcionario       as char 
   

...

fields

...

ds-

...

mensagem          as char
   

...

fields ds-complemento     

...

 as char
    fields

...

ds-string-

...

imp       

...

as char
   

...

fields ds-extensao-

...

arq      as char
    fields hb-tmp-set0003-benef as handle
    fields nr-campos-parametros as int

   

...

fields h-tmp-set0003-header as handle

    fields h-tmp-set0003-trailer as handle

    fields nr-vezes-importa      as int.


   

fields ds-complemento             as char

...

Definição campo a campo da tabela de entrada

    • in-evento-programa – Evento evento do programa que chama a cpc-api-set0003. Os valores desse campo podem ser:

...

    • .

...

"CONSIS"

"CARGA". 

    • nm-ponto-chamada-cpc – Nome nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa api-set0003.p:

"CRIA-TMPRPBEN"

"DT-RECEB-ARQ"

"GRAVA-TEMP"

"TRATA-MOV-BENEF"

"GRAVA-MEN-BENEF"

    • lg-mensagem-na-tela – Indica indica se as mensagens de erro devem ser dispostas na tela ou não. Caso o indicador for não o campo da tabela de saída ds-mensagem-relatorio deve ser preenchido. (não obrigatório).
    • nr-rowid-tmprpben – Rowid rowid da tabela tmprpben
    • dt-inclusao-origem – Data data de inclusão do beneficiário na unidade de origem
    • cd-modalidade – código da modalidade
    • nr-proposta – número da proposta
    • nr-layout – número do layout em utilização
    • char-1 – utilizados como reserva
    • char-2 – utilizados como reserva
    • char-3 – utilizados como reserva
    • char-4 – utilizados como reserva
    • char-5 – utilizados como reserva
    • char-6 – utilizados como reserva
    • char-7 – utilizados como reserva
    • char-8 – utilizados como reserva
    • char-9 – utilizados como reserva
    • char-10 – utilizados como reserva
    • cd-motivo-cancelamento - código do motivo de cancelamento
    • cd-contratante - código do contratante da proposta
    • nr-lote-imp - número do lote de importação
    • nr-sequencia-benef - Numero sequencial da linha do arquivo 
    •  nrnr-sequencia-real - Numero sequencial da linha do arquivo
    • in-tipo-movimento - indica o tipo de movimento
    • cd-usuario - código do usuário
    • nr-linha - número da linha do arquivo
    • nr-cpf - cpf do usuário
    • nm-usuario - nome do usuário
    • cd-funcionario - código do funcionário - modalidade empresarial
    • ds-mensagem - mensagem do sistema
    • ds-complemento - complemento da mensagem do sistema.
    • ds-string-imp - conteúdo referente a linha do beneficiário
    • ds-extensao-arq -   
    • hb-tmp-set0003-benef -
    • nr-campos-parametros -
    • h-tmp-set0003-header - Handle temp-table tmp-set0003-header 
    • h-tmp-set0003-trailer - Handle temp-table tmp-set0003-trailer
    • nr-vezes-importa        - Numero de vezes importacão


Tabela de saída tmp-cpc-api-set0003-saida

def temp-table tmp-cpc-api-set0003-saida no-undo

    fields lg-undo-

...

retry         as logical                                 
    fields lg-dt-receb-arq       as logical
    fields ds-mensagem-relatorio

...

as char format "x(75)"

...


...

   

...

fields char-

...

             

...

as char format "x(30)" 
    fields char-

...

             

...

as char format "x(30)" 
    fields char-

...

             

...

as char format "x(30)" 
    fields char-

...

             

...

as char format "x(30)" 
    fields char-

...

             

...

as char format "x(30)" 
    fields char-

...

             

...

as char format "x(60)" 
    fields char-

...

              as char format "x(60)" 
    fields char-

...

             

...

as char format "x(60)" 
    fields char-

...

             

...

as char format "x(60)" 
    fields char-

...

10             

...

 as char format "x(

...

100)"
    fields cd-motivo-cancelamento as int
    fields lg-

...

next as log
    fields ds-string-imp         as char
    fields nr-campos-parametros  as int
    fields ds-msg-erro           as

...

char.

   

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

  • lg-undo-retry – Variável variável que controla se erros aconteceram dentro da CPC deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
  • ds-mensagem-relatorio – Deve deve conter mensagens de erro ou qualquer outro tipo de mensagem. Utilizado em conjunto com a entrada lg-mensagem-na-tela. Se lg-mensagem-na-tela for Não então esse campo deve ser preenchido.
  • lg-dt-receb-arq – indica se será será ou não considerada a data de recebimento do arquivo como data de exclusão e inclusão do beneficiário
  • char-1 – utilizados como reserva
  • char-2 – utilizados como reserva
  • char-3 – utilizados como reserva
  • char-4 – utilizados como reserva
  • char-5 – utilizados como reserva
  • char-6 – utilizados como reserva
  • char-7 – utilizados como reserva
  • char-8 – utilizados como reserva
  • char-9 – utilizados como reserva
  • char-10 – utilizados como reserva
  • cd-motivo-cancelamento - código do motivo de cancelamento
  • lg-next - desconsidera o registro
  • ds-string-imp - conteúdo referente a linha do beneficiário
  • nr-campos-parametros -
  • ds-msg-erro - .