Árvore de páginas

Ponto-de-Entrada: TK380VLD - Validação de respostas do script dinâmico
Abrangências: Microsiga Protheus 10
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil)
Descrição:
O ponto de entrada TK380VLD será utilizado para validar respostas do script dinâmico tipo "Pesquisa"   
Programa Fonte
TMKA380E.PRW
Sintaxe

TK380VLD - Validação de respostas do script dinâmico ( [ ParamIXB[1] ], [ ParamIXB[2] ], [ ParamIXB[3] ], [ ParamIXB[4] ] ) --> lRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
ParamIXB[1] Caracter Formato do Script 1- Atendimento 2- Pesquisa.
ParamIXB[2] Array of Record Número de sequencia de Tela (primeira pergunta = tela 1).
ParamIXB[3] Array of Record Array com os controles das perguntas e respostas.
ParamIXB[4] Array of Record Array com as perguntas.
Retorno
    lRet(logico)
Exemplos
User Function TK380VLD()  Local cFormato   := ParamIXB[1]      // Formato do Script 1- Atendimento 2- PesquisaLocal nPanel     := ParamIXB[2]        // Número de sequencia de Tela(primeira pergunta = tela 1)Local aControl   := ParamIXB[3]       // Array com os controles das perguntas e respostasLocal aPerguntas := ParamIXB[4]   // Array com as perguntas  Local lRet 		 := .T.  If cFormato =="2" .And. aControl[nPanel][4] == 0	Alert("Passou pelo ponto de entrada - TK380VLD")	lRet:= .F.EndIf Return lRet
Variáveis
Nome Tipo Escopo Pode Alterar descrição
Array of Record Global Não