CPC-WINT0025

• Rotina utilizada para vincular a guia com o registro de consulta.

Pontos de Utilização

• "GRAVA-BENEF"
• "APOS-VINC-GUIA" - a partir da versão 12.1.2305

Include das definições das tabelas temporárias

• cpc-wint0025.i

Tabelas de entrada e de saída

Tabela de entrada tmp-cpc-win0025-entrada

def temp-table tmp-cpc-wint0025-entrada   no-undo
         field in-evento-programa         as char format "x(6)"                 
         field nm-ponto-chamada-cpc       as char format "x(15)"                
         field cd-unidade-carteira        like out-uni.cd-unidade               
         field cd-carteira-usuario        like out-uni.cd-carteira-usuario      
         field dt-validade-carteira       as date format "99/99/9999"           
         field in-abrangencia-intercambio as int format "9"                   
         field nm-usuario                 like out-uni.nm-usuario
         field h-api-wint0025-entrada      as handle.   

Definição campo a campo da tabela de entrada

• in-evento-programa - Indica o nome do evento da cpc;
• nm-ponto-chamada-cpc - Indica o nome do ponto de chamada
• cd-unidade-carteira - Indica a unidade da carteira do usuário
• cd-carteira-usuario - Indica a carteira do usuário
• dt-validade-carteira - Indica a data da validade da carteira do usuário
• in-abrangencia-intercambio - Indica a abrangência do usuário de intercâmbio
• nm-usuario - Indica o nome do usuário
• h-api-wint0025-entrada - tabela com o documento de consulta - 12.1.2305;

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

def temp-table tmp-cpc-wint0025-saida  no-undo
    field lg-undo-retry                  as logical
    field ds-mensagem                 as char
    field aa-guia-atendimento        as int
    field nr-guia-atendimento        as int.

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

• lg-undo-retry   - Indica se ocorreu erro no processo
• ds-mensagem  - Mensagem com a descrição do erro ocorrido no processamento da CPC
• aa-guia-atendimento   - Campo referente ao ano da guia - a partir da versão 12.1.2305
• nr-guia-atendimento - Campo indica o número da guia- a partir da versão 12.1.2305