CPC-API-PROPABRA.p

• Rotina utilizada para especializar abrangência por Abrangência X Proposta X Procedimento/Insumo.
• Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
• A CPC receberá uma tabela temporária com os dados da modalidade, proposta, procedimento ou tipo e código do insumo em questão, e retornará, se houver, a respectiva abrangência cadastrada.

Localização

• Dentro da api-propabra.p, quando a função especificada for igual a "ABR".

Ponto de Utilização

• "ABRAN-MOVTO"

Include das definições das tabelas temporárias

• cpc-api-propabra.i

Tabelas de entrada e saída

Tabela de entrada tmp-cpc-api-propabra-entrada

def temp-table tt-cpc-api-propabra-entrada no-undo

field in-evento-programa                as char format "x(06)"
field nm-ponto-chamada-cpc          as char format "x(15)"
field lg-mensagem-na-tela             as logical
field cd-modalidade                      like modalid.cd-modalidade
field nr-proposta                          like propost.nr-proposta
field cd-tipo-insumo                      like tipoinsu.cd-tipo-insumo
field cd-insumo-par                       like insumos.cd-insumo
field cd-procedimento                   as int format "99999999".

Definição campo a campo da tabela de entrada

• • • in-evento-programa – Evento do programa que chama a cpc-api-propabra.
    • nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza.
    • lg-mensagem-na-tela – Indica se as mensagens de erro devem ser dispostas na tela ou não. Caso o indicador for não o campo da tabela de saída ds-mensagem-relatorio deve ser preenchido. (não obrigatório).
    • cd-modalidade – Código da modalidade do beneficiário.
    • nr-proposta: Número da proposta do beneficiário.
    • cd-tipo-inusmo: Código do tipo de insumo. Se não informado, valor deve ser zero.
    • cd-inusmo-par: Código do insumo. Se não informado, valor deve ser zero.
    • cd-procedimento: Código do procedimento. Se não informado, valor deve ser zero.

Tabela de saída tmp-cpc-api-propabra-saida

def temp-table tt-cpc-api-propabra-saida no-undo

field lg-undo-retry                         as logical
field ds-mensagem-relatorio          as char format "x(75)"
field cd-abrangencia-plano            like abraplan.cd-abrangencia-plano.

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 qualer 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.
    • cd-abrangencia-plano: código da abrangência a ser retornado pela CPC.