Abrangências: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
Versões: | Microsiga Protheus 8.11 , Microsiga Protheus 10 |
Compatível Países: | Todos |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Espanhol , Inglês |
Este ponto de entrada tem por finalidade, validar se a rotina selecionada na MBrowse será executada ou não a partir do retorno lógico do ponto de entrada.
MBRWBTN - Validação da rotina ( [ cAlias ], [ nRecno ], [ nOption ], [ cFunction ] ) --> lRet
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
cAlias | Caracter | Variável com o alias da rotina. | |||||||||||||||
nRecno | Array of Record | Variável com o conteúdo do recno do registro atual selecionado no Browse. | |||||||||||||||
nOption | Array of Record | Variável com o conteúdo da opção da rotina selecionada. Exemplo: Rotina de Incluir, nOption = 3. | |||||||||||||||
cFunction | Array of Record | Variável com o nome da rotina selecionada. |
User Function MBRWBTN() Local cText := ""Local lRet := .T.cText := "Alias [ " + PARAMIXB[1] + " ]" + CRLFcText += "Recno [ " + AllTrim(Str(PARAMIXB[2])) + " ]" + CRLFcText += "Recno [ " + AllTrim(Str(PARAMIXB[3])) + " ]" + CRLFcText += "Recno [ " + PARAMIXB[4] + " ]" + CRLFlRet := MsgYesNo(cText,"Deseja Executar?")Return lRet
Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
Array of Record | Global | Não |