PL298GUI - Condições para Busca de Guias

Ponto-de-Entrada: PL298GUI - Condições para Busca de Guias

Versões:	Microsiga Protheus 10
Compatível Países:	Todos
Sistemas Operacionais:	Todos
Compatível às Bases de Dados:	Todos
Idiomas:	Espanhol , Inglês

Descrição:

Ponto de Entrada PL298GUI na função PLPQGUIA - Pesquisa Guia na Base, antes da execução da select que faz a busca na base.

O ponto de entrada permite que as condições para busca de guias sejam alteradas por customizações do usuário.

Programa Fonte

PLSA298.PRW

Sintaxe

PL298GUI - Condições para Busca de Guias ( < ParamIXB[1]> , < ParamIXB[2]> , < ParamIXB[3]> , < ParamIXB[4]> ) --> aRet

Parâmetros:

Nome

Tipo

Descrição

Default

Obrigatório

Referência

ParamIXB[1]

Caracter

Chave utilizada na busca.

X

ParamIXB[2]

Caracter

Tipo de pesquisa.

X

ParamIXB[3]

Lógico

Confirma pesquisa.

X

ParamIXB[4]

Array of Record

Array que armazena as informações da guias.

X

Retorno

aRet

Array que armazena as informações da guias.

Observações

Tipo de pesquisa:

1- Nome do Usuário

2- Matrícula do Usuário

3- Matrícula Antiga

4- Numero da Autorização de Internação

___________________________________________________________________________________

O array de retorno deve ser composto com o resultado da consulta personalizada, trazendo as seguintes informações:

[1] = "ENABLE" --> obrigatório para os itens ativos

[2] = Operadora do Usuário+"."+Código Empresa+"."+Matricula+"."+Tipo de Registro + "-" + Digito

[3] = Matricula Antiga

[4] = Nome do usuario

[5] = Codigo Operadora+"."+Ano de Internação+"."+Mes de internação+"."+Numero de Internação

[6] = Codigo do Procedimento

[7] = Descrição do Procedimento

[8] = Recno do arquivo BD6

Exemplos

#include 'protheus.ch'   User Function PL298GUI()Local cChave     := ParamIXB[1]Local cTipoPes   := ParamIXB[2]Local lChkChk    := ParamIXB[3]Local aBrowGui   := ParamIXB[4] //Customização do usuário.Return(aBrowGui)

Home

Linha Microsiga Protheus

Páginas filhas