Árvore de páginas

Versões comparadas

Chave

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

...

  • "VALIDA-CNS"
  • "VALIDA-MODALID"
  • "VALIDATE-CAN"
  • "VALIDA-BENEF"
  •  "CONS-CNPJ-CEI"
  • "ALT-DATA"
  • "ANTES-INCRET"
  • "ANTES-ALTCONT"
  • "ATUALIZA-ESPEC"
  • "REGRA-ESPEC"
  • "ANT-VALID-CNS" - disponível a partir da versão 12.1.2407.

Include das definições das tabelas temporárias

...

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

field in-evento-programa                   as char format "x(06)"   
   
field nm-ponto-chamada-cpc            as as char format "x(15)"   
   
field cd-erro                                        as int
    field cd-modalidade                           like modalid like modalid.cd-modalidade
    field cd-reg-propost                           like reg-plano-saude.cdn-plano-ans
    field cd-mod-usuario                         like usuariolike usuario.cd-modalidade
    field cd-reg-usuario                           like reg-plano-saude.cdn-plano-ans
    field in-registro-plano                        like propost like propost.in-registro-plano
    field nr-ter-adesao                             like propost like propost.nr-ter-adesao
    field cdnr-usuario proposta                like propost.nr-proposta
    field cd-usuario                 like usuariolike usuario.cd-usuario
    field nm-usuario                                like like usuario.nm-usuario
    field nm-contratante                          like like contrat.nm-contratante
    field ds-erro                                      as char format "x(81)"
    field ds-status                                   as  as char format "x(13)"
    field ds-acao-registro                      as as char format "x(14)"
    field r-usuario  usuario                  as rowid
    field ds-tipo-ponto             as rowid as char
    field dstp-tipo-ponto  movimento                          as as char
filed tp-movimento                           as char
field id-registro                  registro                like hist-movto-usuario.id-registro
    field cod-livre-1                               like  like hist-movto-usuario.cod-livre-1
    field cco-complementar  complementar                  like like usuario.cd-controle-oper-ans
field cd-carteira                ans
    field cd-carteira                like sib-mov-inc-ret.cod-carteira.       

Definição campo a campo da tabela de entrada

      • Nmmm-ponto-chamada-cpc - Nome do ponto de chamada da CPC dentro do programa que a utiliza.
      • Cdcd-erro – Codigo de erro.
      • Cdcd-modalidade – Código da modalidade
      • Cdcd-reg-propost – Código do registro da proposta
      • Cdcd-mod-usuario – Código da modalidade do usuário
      • Cdcd-reg-usuario – Código do registro do usuário
      • Inin-registro-plano – Início do registro do plano
      • Nrnr-ter-adesao – Número do termo de adesão
      • Cdnd-usuario – Código do usuário
      • Nmnm-usuario – Nome do usuário
      • Nmnm-contratante – Nome do Contratante
      • Dsds-erro – Descrição do erro
      • Dsds-status – Descrição do status
      • Dsds-acao-registro – Descrição da ação do registro
      • Rr-usuario - Rowid do usuário
      • Dsds-tipo-ponto - Nome da função do ponto
      • Tptp-movimento - Tipo do movimento
      • Idid-registro - Id de registro do histório histórico de movimentação do usuário
      • Codcod-livre-1 - Atributo livre para uso interno
      • Ccocco-complementar - Código de controle
      • Cdcd-carteira - Código da Carteiracarteira do beneficiario


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

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

field lg-undo-retry                       as  as log
    field lg-erro                      as log
            as log
field ds-mensagem                    as char format "x(80)"
    field lg-considera-erro            as log
    as log
field lg-invalida-modalidade      as as log
    field lg-invalida-proposta           as log
    field lg-invalida-usuario          as log
    as log
field lg-agreado          agregado                as log
    field lg-titular-agregado      agregado        as log
    field cd-cnpj                                like contrat.nr-cgc-cpf
 
    field nr-cei                                  like like contrat.nr-cei
    field cod-carteira-titular  titular            like like sib-mov-inc-ret.cod-carteira-titular
    field dt-cns-obrigatorio               as date format 99/99/9999
    field dt-contratacao        contratacao             as date
    field cod-carteira-inteira  inteira            like like sib-mov-inc-ret.cod-carteira-titular
    field idi-plano-ans-propost    propost      like propost.idi-plano-ans
    field idi-plano-ans-usuario  usuario         like  like usuario.idi-plano-ans
    field nr-insc-contratante  contratante             like  like propost.nr-insc-contratante
    field cd-contratante      contratante                like like propost.cd-contratante
    field cd-modalidade  modalidade                   like  like usuario.cd-modalidade
    field nr-proposta  proposta                        like usuario.nr-proposta
    field lg-next              next                    as logical
    field cd-motivo  motivo                        as int
    as int field cd-retorno                       as log
    as logical field lg-permite-cns-zerado  zerado       as logical as log.

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

      • lg-undo-retry - Campo que controla se erros aconteceram dentro da CPC. Se o retorno desta variável for igual a SIM, indicará que erros aconteceram e se o retorno for igual à NÃO, indicará que o processo foi concluído por completo.
      • lg-erro - Campo que informa condição de erro
      • ds-mesagem - Campo que retorna mensagem de erro, se ocorrido dentro da CPC.
      • lg-considera-erro – Log para considerar erro ou não
      • lg-invalida-modalidade – Log para invalidar a modalidade
      • lg-invalida-proposta – Log para invalidar a proposta
      • lg-invalida-usuario – Log para invalidar o usuário
      • lg-agregado - Log para indicar agregado
      • lg-titular-agregado - Log para indicar titular agregado
      • cd-cnpj – Código do cnpj
      • nr-cei – Número do CEI
      • cod-carteira-titular - Código da carteira do titular
      • dt-cns-obrigatorio - Variável de controle da data da CNS.
      • dt-contratacao - Data de contratação
      • cod-carteira-inteira - Código inteiro da carteira
      • idi-plano-ans-propost - Indicador Vinculo Plano
      • idi-plano-ans-usuario - Indicador Vinculo Plano
      • nr-insc-contratante - Número de inscrição contratante
      • cd-contratante - Código do cliente associado ao administrativo
      • cd-modalidade - Código da Modalidade
      • nr-proposta - Número da Proposta
      • lg-next - Log
      • cd-motivo - 
      • cd-retorno - Log que retorna se a alteração será executada ou não.
      • lg-permite-cns-zerado - Log que retorna se permite cns do beneficiário zerado

...

field lg-undo-retry                       as log
field lg-erro                                 as log
field ds-mensagem                    as char format "x(80)"
field lg-considera-erro               as log
field lg-invalida-modalidade      as log
field lg-invalida-proposta           as log
field lg-invalida-usuario             as log
field cd-cnpj                                like contrat.nr-cgc-cpf
field nr-cei                                  like contrat.nr-cei
field dt-cns-obrigatorio               as date format 99/99/9999.

...