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.

Localização

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

Ponto de Utilização

"SELECAO"

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

           "ANTES-SELECAO"

• • Ponto que permite informar arquivo ".CSV" com modalidade e proposta para importação de módulos, ao invés de utilizar a seleção do programa.

Include das definições das tabelas temporárias

• cpc-vp0310d.i

Tabelas de entrada e saída e movimentos

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
field lg-importa-termo                                     as log
field in-classificacao                                       as int
field ds-diretorio-arquivo                                 as char
field ds-diretorio-arquivo-erro                          as char
field cd-modulo-aux                                        like mod-cob.cd-modulo
field lg-todosben-aux                                     as log
field lg-opcional-aux                                       as log
field dt-inicio-aux                                            like pro-pla.dt-inicio
field dt-ini-modulo-aux                                    like pro-pla.dt-inicio
field cd-forma-pagto-aux                                like formpaga.cd-forma-pagto
field lg-pea-aux                                              as log
field lg-imp-usuario-aux                                  as log
field lg-modulo-excluido-aux                           as log
field in-param1-aux                                        as int
field l-saida                                                    as log
field in-saida                                                  as int
field c-opcao                                                  as char
field lg-simula-aux                                          as log

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.
    • lg-importa-termo  - indicador para informar se importa o arquivo ".CSV" ou não.
    • in-classificacao  - indicador que passa para a cpc qual a classificação escolhida.
    • ds-diretorio-arquivo - variável que grava o caminho do arquivo.
    • ds-diretorio-arquivo-erro - variável que grava o caminho do arquivo de erro, o qual é o mesmo informado em tela.
    • cd-modulo-aux - variável que guarda o módulo de importação informado em tela.
    • lg-todosben-aux - variável que guarda o parâmetro informado em tela.
    • lg-opcional-aux  - variável que guarda o parâmetro informado em tela.
    • dt-inicio-aux  - variável que guarda o parâmetro informado em tela.
    • dt-ini-modulo-aux - variável que guarda o parâmetro informado em tela.
    • cd-forma-pagto-aux - variável que guarda o parâmetro informado em tela.
    • lg-pea-aux - variável que guarda o parâmetro informado em tela.
    • lg-imp-usuario-aux  -  variável que guarda o parâmetro informado em tela.
    • lg-modulo-excluido-aux - variável que guarda o parâmetro informado em tela.
    • in-param1-aux - variável que guarda o parâmetro de padrão de cobertura informado em tela.
    • l-saida - variável que indica a saída do relatório informado em tela.
    • in-saida - variável que indica a forma de impressão do relatório informado em tela.
    • c-opcao  -  variável que indica a opção de impressão do relatório informado em tela.
    • lg-simula-aux -  variável que guarda o parâmetro de simulação ou não informado em tela .

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
field lg-imp-arquivo                          as log
field ds-mensagem                         as char format "x(30)"

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.
    • lg-imp-arquivo - log que identifica se importou o arquivo.
    • ds-mensagem - Mensagem de retorno de erro ocorrido na cpc.

      Tabela de movimentos tmp-movimentos-cpc

                  def temp-table tmp-movimentos-cpc no-undo

                           field cd-modalidade        like propost.cd-modalidade
                           field nr-proposta             like propost.nr-ter-adesao

            Definição campo a campo da tabela de movimentos 

• • • cd-modalidade - Variável que armazena o código da modalidade importado do arquivo ".CSV".
    • nr-proposta   - Variável que armazena o código da proposta importado do arquivo ".CSV".