CPC-BOSAUPRODUCAOMEDICA

• Rotina responsável por retornar a produção médica referente ao APP da Unimed Brasil.

Localização

• Dentro do programa appUnimedBrasil/Medico/bosau/bosauProducaoMedica.p

Ponto de Utilização

• "ANTES-PROCESSO"

• "DEPOIS-PROCESSO"

Include das definições das tabelas temporárias

• cpc/cpc-bosauprodmedica.i

Tabelas de entrada e saída

Tabela de entrada  tmp-cpc-bosauprodmedica-entrada

def temp-table tmp-cpc-bosauprodmedica-entrada   no-undo    
    field nm-ponto-chamada-cpc       as char format "x(20)".

Definição campo a campo da tabela de entrada

• nm-ponto-chamada-cpc - Ponto de chamada da CPC.

Tabela de entrada e saída tmpParams

def temp-table tmpParams   no-undo    
	field X-Matricula as integer
    field dtInicio    as date
    field dtFim       as date.

Definição campo a campo da tabela de entrada

• X-Matricula: Matrícula do médico.
• dtInicio: Data início da produção médica.
• dtFim: Data Fim da produção médica.

Tabela de entrada e saída tmpProducao

def temp-table tmpProducao   no-undo    
	field producaoId       as integer
    field nomePaciente     as character
    field nrGuia           as character
    field procedimentoId   as integer
    field nomeProcedimento as character
    field dtRealizacao     as character
    field quantidade       as character.

Definição campo a campo da tabela de entrada

• producaoId: Identificação única da tabela temporária.
• nomePaciente: Nome do paciente.
• nrGuia: Número da guia.
• procedimentoId: Código do procedimento.
• nomeProcedimento: Descrição do procedimento.
• dtRealizacao: Data de realização do procedimento.
• quantidade: Quantidade do procedimento

Tabela de saida tmp-cpc-bosauprodmedica-saida

def temp-table tmp-cpc-bosauprodmedica-saida     no-undo
    field lg-ignora-bo                    as logical    
    field lg-undo-retry                   as logical                             
    field ds-mensagem                     as char format "x(75)". 

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

• lg-ignora-bo – Indica se a lógica da BO será ignorada, considerando apenas a regra da CPC para criação das tabelas de saída da BO. É válido apenas para o ponto "ANTES-PROCESSO".
• ds-mensagem – Aponta a mensagem de erro tratado que ocorreu na CPC.
• lg-undo-retry - Indica que ocorreu erro. Ao preencher esse campo será criada um registro na rowerrors com a mensagem definida no campo ds-mensagem.