CPC-

...

TWPFISDZ.P

...

define temp-table tmp-cpc-twpfisdz-entrada no-undo

field nm-ponto-chamada

...

               as character format "x(15)"
field in-evento-programa

...

               as character format "x(10)"
field nr-insc-contratante

...

                 like contrat.nr-insc-contratante
field nr-cgc-cpf

...

                               like contrat.nr-cgc-cpf
field nm-contratante                       like contrat.nm-contratante
field r-contrat

...

                                 as rowid
field en-rua                                     like contrat.en-rua
field en-bairro                                 like contrat.en-bairro
field cd-cidade

...

                               like contrat.cd-cidade
field nm-email                                 like contrat.nm-email
field en-uf                                       like contrat.en-uf
field en-cep

...

                                   like contrat.en-cep
field dt-nascimento-fundacao         like contrat.dt-nascimento-fundacao
field in-est-civil

...

                               like contrat.in-est-civil
field nm-filiacao-mae

...

                     like contrat.nm-filiacao-mae
field nm-contratante-ant                 like contrat.nm-contratante
field cd-cpf-ant                               as character format "x(14)"

...

Definição campo a campo da tabela de entrada

...

• • • nm-ponto-chamada – Nome do ponto de chamada "DADOS-CONTRAT".
    • in-evento-programa – Nome do evento de chamada "ALTERA".
    • nr-insc-contratante – Número de Inscrição do contratante que está sendo atualizado.
    • nr-cgc-cpf – Número do CPF do contratante, atualizado pelos dados do EMS.
    • nm-contratante – Nome do contratante, atualizado pelos dados do EMS.
    • r-contrat – Rowid do contrante que está sendo atualizado.
    • en-rua – Rua do contratante, atualizado pelos dados do EMS.
    • en-bairro – Bairro do contratante, atualizado pelos dados do EMS.
    • cd-cidade – Cidade do contratante, atualizado pelos dados do EMS.
    • nm-email – Email do contratante, atualizado pelos dados do EMS.
    • en-uf – UF do contratante, atualizado pelos dados do EMS.
    • en-cep – CEP do contratante, atualizado pelos dados do EMS.
    • dt-nascimento-fundacao – Data de Nascimento do contratante, atualizado pelos dados do EMS.
    • in-est-civil – Estado civil do contratante, atualizado pelos dados do EMS.
    • nm-filiacao-mae – Nome da Mãe do contratante, atualizado pelos dados do EMS.
    • nm-contratante-ant – Nome do contratante, antes da atualização pelos dados do EMS.
    • cd-cpf-ant – Número do CPF do contratante, antes da atualização pelos dados do EMS.

...

...

...

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

define temp-table tmp-cpc-twpfisdz-saida no-undo

field lg-undo-retry                   as logical
field ds-mensagem-erro

...

        as character

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

• • lg-undo-retry – Variável que controla os erros dentro da CPC. Deve retornar SIM se erros aconteceram e NÃO se o processo foi concluído por completo.
  • ds-mensagem-erro – Deve conter mensagens de erro caso ocorram.

...