import.css=/download/attachments/327912/newLayout.css

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:
NomeTipoDescriçãoDefaultObrigatórioReferência
ParamIXB[1]CaracterChave utilizada na busca.X
ParamIXB[2]CaracterTipo de pesquisa.X
ParamIXB[3]LógicoConfirma pesquisa.X
ParamIXB[4]Array of RecordArray que armazena as informações da guias.X
Retorno
    aRet(array_of_record)
  • 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)