Localização
Dentro do rb0512b1.p antes de chamar as rotinas de cálculo do repasse.
Ponto de Utilização
"ALT-CUSTO-MODU"
Include das definições das tabelas temporárias
cpc-Rb0512b1.i
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-rb0512b1-entrada
def temp-table tmp-cpc-rb0512b1-entrada no-undo
field in-evento-programa as char format "x(10)"
field nm-ponto-chamada-cpc as char format "x(20)"
field cd-modalidade like propunim.cd-modalidade
field nr-proposta like propunim.nr-proposta
field cd-unimed like propunim.cd-unimed
field cd-usuario like usuario.cd-usuario
field lg-modulo like evenfatu.lg-modulo
field cd-modulo like tipleven.cd-modulo
field dt-ult-dia as date format "99/99/9999"
field dt-ref-ant as date format "99/99/9999"
field aa-referencia like notacred.aa-referencia
field mm-referencia like notacred.mm-referencia
field dt-inclusao-plano like usuario.dt-inclusao-plano
field dt-proporcion like usuario.dt-inclusão-plano.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que será passado para a cpc-rb0512b1.p. O valor desse campo é:
"ALTERA".
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para o programa rb0512b1.p:
"ALT-CUSTO-MODU"
cd-modalidade – Código da modalidade da proposta que está sendo calculada.
nr-proposta – Número da proposta que está sendo calculada.
cd-unimed – Código da Unimed repassada
cd-usuario – Código do Usuário
lg-modulo – Indicador se calcula por módulo
cd-modulo – Código do Módulo
dt-ult-dia – Data do último dia do mês que está sendo gerado o repasse
dt-ref-ant – Data de referencia anterior do repasse
aa-referencia – Ano referencia do repasse
mm-referencia – Mês de referencia do repasse
dt-inclusao-plano – Data de inclusão do beneficiário
dt-proporcion – Data proporcional na inclusão.
Tabela de saída tmp-cpc-rb0512b1-saida
def temp-table tmp-cpc-rb0512b1-saida no-undo
field lg-undo-retry as log
field vl-modulo like tabpremo.qt-custo-modulo
field nr-faixa-etaria-inc like pl-gr-pa.nr-faixa-etaria
field nr-faixa-etaria-atu like pl-gr-pa.nr-faixa-etaria
field nr-faixa-etaria-exc like pl-gr-pa.nr-faixa-etaria
field qt-fator-mult-inc like pl-gr-pa.qt-fator-multiplicador
field qt-fator-mult-insc like pl-gr-pa.qt-fat-mult-insc
field qt-fator-mult-ant like pl-gr-pa.qt-fator-multiplicador
field qt-fator-mult-atu        like pl-gr-pa.qt-fator-multiplicador
   field qt-fator-mult-exc             like pl-gr-pa.qt-fator-multiplicador.
Definição campo a campo da tabela de saída