Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • HSM24ROT - Processos de Atendimento

Ponto-de-Entrada: HSM24ROT - Processos de Atendimento
Versões: Microsiga Protheus 10
Compatível Países: Brasil
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Adiciona botão nos processos de atendimento (Internaçao, Ambulatorial, Pronto Atendimento, Atendimento Doação).
Programa Fonte 
.PRW
Sintaxe

HSM24ROT - Processos de Atendimento ( ) --> aRot

Retorno
    aRot(vetor)
  • Retorna a primeira posição com o texto do botão, segunda posição a Rotina a ser executada, terceira posição 0 (zero), quarta posição (1 - Pesquisa, 2 - Consulta, 3 - Inclusão, 4 - Alteração, 5 - Exclusão).
Exemplos 
User Function HSM24ROT() Local cTAPE := ParamIxb[1] // Tipo de AtendimentoLocal aRot := {}If cTAPE == "0" // 0-Internação 1-Ambulatorial  2-Pronto Atendimento 3-Atendimento Doacao   aRot := {{"Teste","u_Teste()",0,02}}EndIfReturn(aRot)User Function Teste()   MsgAlert("Passei pelo ponto HSM24ROT!")Return