Ponto-de-Entrada: HSM17RES - Laudo e Resultado
| Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todas TotvsDbAccess |
| Idiomas: | Espanhol , Inglês |
Descrição:
O ponto de entrada HSM17RES, permite a personalização da rotina "Laudo e Resultado (HSPAHM17)". É executado após o clique nos botões "Resultado" e "Liberar".
Programa Fonte
HSPAHM17.PRW
Sintaxe
HSM17RES - Laudo e Resultado ( [ ParamIXB[1] ], [ ParamIXB[2] ], [ ParamIXB[3] ], [ ParamIXB[4] ] )
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| ParamIXB[1] | Caracter | cAlias (Alias do arquivo aberto no Browse (GBY - Solicitação de Exames) | GBY | ||||||||||||||
| ParamIXB[2] | Numérico | nReg - Numero do R_E_C_N_O_ posicionado do arquivo aberto no Browse (Nome do arquivo de acordo com o primeiro parametro) | |||||||||||||||
| ParamIXB[3] | Numérico | nOpc - Número da opção selecionado no Browse (3 = Resultado, 4 = Liberação) | |||||||||||||||
| ParamIXB[4] | Lógico | lLiberacao - se for True = liberação(Opção Liberação do Browse) | .F. |
Retorno
-
()
Observações
O ponto de entrada HSM17RES, permite a personalização da rotina "Laudo e Resultado (HSPAHM17)", e é executado após o clique nos botões "Resultado" e "Liberar".
Exemplos
User Function HSM17RES() Local nOpc := ParamIXB[2]If nOpc == 3 //Resultado MsgAlert("Passei pelo ponto HSM17RES - Opção Resultado")Else MsgAlert("Passei pelo ponto HSM17RES - Opção Liberação")EndIfReturn