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.

...

__RefHeading__86461_1756225838Localização
Dentro da api-propabra.p, quando a função especificada for igual a "ABR".
Âncora__RefHeading__19801_2053127524__RefHeading__19801_2053127524 Âncora__RefHeading__5956_486694287__RefHeading__5956_486694287 Âncora__RefHeading__1167_213273755__RefHeading__1167_213273755 Âncora__RefHeading__10565_644533341__RefHeading__10565_644533341 Âncora__RefHeading__86463_1756225838__RefHeading__86463_1756225838
Ponto de Utilização
"ABRAN-MOVTO"
Âncora__RefHeading__19803_2053127524__RefHeading__19803_2053127524 Âncora__RefHeading__5958_486694287__RefHeading__5958_486694287anchor
__RefHeading__1169_213273755__RefHeading__1169_213273755 Âncora__RefHeading__10567_644533341__RefHeading__10567_644533341 Âncora__RefHeading__86465_1756225838__RefHeading__86465_1756225838Include das definições das tabelas temporárias
cpc-api-propabra.i
Âncora__RefHeading__19805_2053127524__RefHeading__19805_2053127524 Âncora__RefHeading__5960_486694287__RefHeading__5960_486694287 Âncora__RefHeading__1171_213273755__RefHeading__1171_213273755anchor
__RefHeading__10569_644533341__RefHeading__10569_644533341 Âncora__RefHeading__86467_1756225838__RefHeading__86467_1756225838

Tabelas de entrada e saída
Âncora__RefHeading__19807_2053127524__RefHeading__19807_2053127524 Âncora__RefHeading__5962_486694287__RefHeading__5962_486694287 Âncora__RefHeading__1173_213273755__RefHeading__1173_213273755 Âncora__RefHeading__10571_644533341__RefHeading__10571_644533341anchor
__RefHeading__86469_1756225838__RefHeading__86469_1756225838

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. Os valores desse campo podem ser:
• "ROTINA".
• nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa ue a utiliza. Para o programa api-propabra.p:
• "ABRAN-MOVTO"
• 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.