CPC-VP0310D.P

• Rotina utilizada para efetuar a seleção de cidade incial e final com lógica especifica do cliente.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• Será permitido para esta CPC apenas um registro na tabela temporária de saída. Caso possuir mais de um registro um erro será reportado.

Âncora__RefHeading__21855_2053127524__RefHeading__21855_2053127524 Âncora__RefHeading__8010_486694287__RefHeading__8010_486694287 Âncora__RefHeading__3221_213273755__RefHeading__3221_213273755 Âncora__RefHeading__12619_644533341__RefHeading__12619_644533341 Âncora__RefHeading__88517_1756225838__RefHeading__88517_1756225838 

Localização

• Dentro do vp0310d.p após receber a seleção.

...

__RefHeading__21857_2053127524 Âncora__RefHeading__8012_486694287__RefHeading__8012_486694287 Âncora__RefHeading__3223_213273755__RefHeading__3223_213273755 Âncora__RefHeading__12621_644533341__RefHeading__12621_644533341 Âncora__RefHeading__88519_1756225838__RefHeading__88519_1756225838Ponto de Utilização

"SELECAO"

• • Rotina para seleção de cidade inicial e cidade final

...

Âncora__RefHeading__3225_213273755__RefHeading__3225_213273755 Âncora__RefHeading__12623_644533341__RefHeading__12623_644533341 Âncora__RefHeading__88521_1756225838__RefHeading__88521_1756225838Include das definições das tabelas temporárias

• cpc-vp0310d.i

...

__RefHeading__12625_644533341__RefHeading__12625_644533341 Âncora__RefHeading__88523_1756225838__RefHeading__88523_1756225838Tabelas de entrada e saída
Âncora__RefHeading__21863_2053127524__RefHeading__21863_2053127524 Âncora__RefHeading__8018_486694287__RefHeading__8018_486694287anchor__RefHeading__3229_213273755__RefHeading__3229_213273755 Âncora__RefHeading__12627_644533341__RefHeading__12627_644533341 Âncora__RefHeading__88525_1756225838__RefHeading__88525_1756225838

Tabela de entrada tmp-cpc-vp0310d-entrada

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

field in-evento-programa

...

                     as char format "x(10)"
field nm-ponto-chamada-cpc               as char format "x(15)"
field nr-recid-contrat                             as recid
field nr-recid-benef                               as recid
field cd-cidade-ini                                 like dzcidade.cd-cidade
field cd-cidade-fim

...

                               like dzcidade.cd-cidade

...

...

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc-vp0310d.p. Os valores desse campo podem ser:
    • "SEL".
    • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa vp0310d.p:
    • "SELECAO ".
    • nr-recid-contrat – Recid da tabela contrat para pesquisa e atribuição especifica do cliente.
    • nr-recid-benef – Recid da tabela benef para pesquisa e atribuição especifica do cliente.
    • Cd-cidade-ini – código inicial da cidade.
    • Cd-cidade-fim – código final da cidade.

...

...

...

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

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

field lg-undo-retry

...

                             as logical
field lg-next                                       as logical
field ds-mensagem-relatorio

...

             as char format "x(75)"
field cd-cidade-ini

...

                             like dzcidade.cd-cidade
field cd-cidade-fim                             like dzcidade.cd-cidade

...

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

• • lg-undo-retry – 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 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-next – Utilizado somente nos pontos "VERIF-CONTRAT" e "VERIF-BENEF".
  • Cd-cidade-ini – código inicial da cidade.
  • Cd-cidade-fim – código final da cidade.