wac0019a11

Seta arquivo de funções javascript – "FUNCOESWACESP.JS".
Verifica se para a cidade da clinica os procedimentos da guia poderão ser direcionados para um determinado executante, caso este possua quotas.
Permitir a operadora informar quais grupos de prestadores que não será exigido o uso do cartão magnético e da leitora de biometria.
Permite a operadora alterar o tipo de guia, desconsiderando a associativa tipo de guia x classe de nota.
Caso o cliente não queira executar a chamada da CPC no seu cadastro deve colocar CPC Ativo como não.
Localização
Dentro do programa wac0019a1.p.
Ponto de Utilização
"SETA-FUNCOES"
"DIR-VERCOTA"
"GRUPO-PRESTADOR"
"ALT-TIPO-GUIA"
"TESTA-LEITORA"
Include das definições das tabelas temporárias
CPC-WAC0019A1.I
Tabelas de entrada e saída
Tabela de entrada tmp-cpc-wac0019a1-entrada
def temp-table tmp-cpc-wac0019a1-entrada no-undo
field in-evento-programa as char format "x(06)"
field nm-ponto-chamada-cpc as char format "x(15)"
field cd-unidade-carteira like guiautor.cd-unidade-carteira
field cd-carteira-usuario like guiautor.cd-carteira-usuario
field cd-unidade-executante as int
field cd-prestador-executante as int
field cd-solicitante-aux as int
field cd-unidade-solicitante-aux as int
field cd-clinica-aux as int
field cd-tipo-guia like tip-guia.cd-tipo-guia
field cd-unidade like preserv.cd-unidade
field cd-prestador like preserv.cd-prestador
field in-classe-nota like assotgcl.in-classe-nota
field cd-transacao like tranrevi.cd-transacao.
Definição campo a campo da tabela de entrada
in-evento-programa – Evento do programa que chama a rotina WAC0019a1, na qual será passada para a cpc-wac0019a1.p.
nm-ponto-chamada-cpc – Nome do ponto de chamada da cpc dentro do programa que a utiliza. Para a rotina wac0019a1.p:
"DIR-VERCOTA", "SETA-FUNCOES", "GRUPO-PRESTADOR" ou "ALT-TIPO-GUIA".
cd-unidade-carteira – Código da unidade da carteira do usuário;
cd-carteira-usuario – Código Identificador do beneficiário (carteira);
cd-unidade-executante – Código da unidade do prestador Executante;
cd-prestador-executante – Código do prestador Executante;
cd-solitante-aux – Código do prestador Solicitante;
cd-unidade-solicitante-aux – Código do Prestador Solicitante;
cd-clinica-aux – Código da Clinica do prestador;
cd-tipo-guia – Código do tipo de guia a qual a autorização estará vinculada;
cd-unidade – Código da unidade do prestador;
cd-prestador – Código do prestador;
in-classe-nota – Código da classe da nota;
cd-transacao – Código da transação a qual a autorização estará vinculada.
Tabela de saída tmp-cpc-wac0019a1-saida
def temp-table tmp-cpc-wac0034a-saida no-undo
field lg-undo-retry as log
field ds-mensagem as char format "x(75)"
field lg-alt-nm-usuario as int format 99999999
field cd-unidade-direciona as int
field cd-prestador-direciona as int
field lg-restringe as log
field cd-tipo-guia like tip-guia.cd-tipo-guia
field in-classe-nota like assotgcl.in-classe-nota
field cd-transacao like tranrevi.cd-transacao
field lg-cartao as log
field lg-biometria as log.
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 – Deve conter mensagens de erro quando lg-undo-retry estiver ativo;
lg-alt-nm-usuario –
cd-unidade-redireciona – Código da unidade que o procedimento será direcionada para sua execução.
cd-prestador-redireciona – Código do prestador que o procedimento será direcionado.
lg-restringe – Indica se o grupo do prestador deverá ou não validar o uso do cartão magnético e da leitora biométrica.
cd-tipo-guia – Código do tipo de guia
in-classe-nota – Codigo da classe da nota
cd-transacao – Código da transação
lg-cartao – Desconsidera o uso da leitora de cartão.
Lg-biometria – Desconsidera o uso da leitora biométrica
Tabela de entrada tmp-cpc-wac0019a1-entrada -serv
def temp-table tmp-cpc-wac0019a1-entrada-serv no-undo
field cd-servico as int
field qt-servico as int.
Definição campo a campo da tabela de serviços
cd-servico – Código do procedimento que será direcionado
qt-servico – Quantidade do procedimento a ser direcionado