English
Español
EntradaValor
Função utilizada para entrada de valores nas regras.
Sintaxe: EntradaValor(alfa PCaption,alfa pDesTit,Numero pTipDad,Alfa pMasc,alfa pIniAlfa,Numero pIniNum,Alfa end pRetAlfa,Numero end pRetNum,Numero end pTipSai);
Parâmetros:
| Nome | Tipo | Descrição |
|---|---|---|
| PCaption | Alfa | Valor ou variável que indicará o nome da tela. |
| pDesTit | Alfa | Valor ou variável que indicará o nome da descrição do título do campo de entrada. |
| pTipDad | Numero | Valor ou variável que indicará o tipo do dado para o
campo de entrad;. (1=Números inteiros, 2=Números com casas decimais, 3=Data, 4=Hora, 5=Alfa e 6=Senha). |
| pMasc | Alfa | Valor ou variável que indicará a mascara para ser aplicada no campo de entrada. |
| pIniAlfa | Alfa | Valor ou variável que indicará o valor inicial alfanumérico para o campo de entrada. |
| pIniNum | Numero | Valor ou variável que indicará o valor inicial numérico para o campo de entrada. Observação: esse parâmetro possui um limite, onde o valor máximo suportado pelo sistema é de 2.147.483.647. |
| pRetAlfa | Alfa | Variável que receberá o retorno informado no campo de entrada. |
| pRetNum | Numero | Variável que receberá o retorno informado no campo de entrada. |
| pTipSai | Numero | Variável que receberá o tipo que o usuário saiu da tela; (1-OK;0-Só fechou a form). |
Tipo de retorno:
- RetAlfa: Variável alfanumérica que receberá o retorno informado no campo de entrada.
- pRetNum: Variável numérica que receberá o retorno informado no campo de entrada.
- pTipSai: Variável numérica que receberá o tipo que o usuário saiu da tela; (1-OK;0-Só fechou a form).
Características: A tela da função salva a posição onde o usuário a definiu na última exibição, sendo a tela sempre reexibida nessa posição. Essa característica não ocorre se a função for chamada por alguma regra executada na entrada do sistema, antes da exibição da tela principal do sistema.
Exemplo:
Definir Alfa xRetAlfa;
Definir Numero xRetNumero;
Definir Numero xTipSai;
Definir Numero xValNumero;
/* Tipo Números Inteiros */
EntradaValor("Número", "Informe um número:", 1, "9", "", 9, xRetAlfa,
xRetNumero, xTipSai);
/* Tipo Números Inteiros */
EntradaValor("Número", "Informe um número:", 1, "ZZZ.ZZZ.ZZ9", "",
999999999, xRetAlfa, xRetNumero, xTipSai);
/* Tipo Números Negativos */
EntradaValor("Número", "Informe um número negativo:", 2,
"#-2#ZZZ.ZZ9,99999", "", 10, xRetAlfa, xRetNumero, xTipSai);
/* Tipo Números com casas decimais */
EntradaValor("Dinheiro", "Informe o valor monetário:", 2,
"ZZZ.ZZZ.ZZ9,99", "", 111222333.88, xRetAlfa, xRetNumero, xTipSai);
/* Tipo Data */
DataHoje(xValNumero);
EntradaValor("Data", "Informe uma Data:", 3, "DD/MM/YYYY", "",
xValNumero, xRetAlfa, xRetNumero, xTipSai);
/* Tipo Hora */
xValNumero = 720 /* equivalente a 12:00 (meio dia) */;
EntradaValor("Hora", "Informe uma Hora:", 4, "HH:MM", "", xValNumero,
xRetAlfa, xRetNumero, xTipSai);
/* Tipo Texto*/
EntradaValor("Texto", "Informe o texto:", 5, "A[150]", "Valor de texto a
ser digitado
.................................................................................................................no
fim", 1, xRetAlfa, xRetNumero, xTipSai);
/* Tipo Texto com máscara de memorando. A máscara #(50,4)# significa 50
colunas e 4 linhas, considerando possíveis quebras de linha e caracteres
especiais que consomem caracteres na máscara*/
EntradaValor("Memorando de texto", "Informe o valor do memorando:", 5,
"#(50,4)#", "", 0 , xRetAlfa, xRetNumero, xTipSai);
/* Tipo Senha */
EntradaValor("Senha", "Informe a senha:", 6, "********************", "",
0, xRetAlfa, xRetNumero, xTipSai);
Outro exemplo:
EntradaValor("Entre com algo","Informe Qualquer Coisa!", 2, "ZZZ.ZZZ.ZZ9,99", "", 1456.98, VValorAlfa, VValorNum, VTipSai);
Exemplo de texto com várias linhas:
/*Tipo texto com múltiplas linhas*/
Definir Alfa aRetAlf; EntradaValor("Cabeçalho","Texto",5,"#(40,3)#","",0,aRetAlf,nRetNum,nTipSai);
/* Exemplo de uso na regra com o tipo Texto (5) como se fosse campo
numérico, utilizando máscara especial "@" e "<" */
EntradaValor("CNPJ do Cliente",vMensagem,5,"#@<#99.999.999/9999-99","",0,vRetAlfa,vRetorno,vTipSai);
Utilizando esta máscara, a edição do campo
ocorrerá da direita para a esquerda, como se fosse um campo numérico.
Retirando o sinal "<" da máscara, a edição ocorrerá como um campo Texto,
ou seja, da esquerda para a direita. Importante ressaltar que o valor
que será digitado no campo não será salvo com a máscara, desta forma
somente o que de fato foi digitado (números) será salvo. Para utilizar
máscaras especiais, é necessário incluir um "#" antes e depois da
máscara especial.
As máscaras especiais "@" e "<" estão documentadas em "Máscaras de
Edição" no Ferramentas de Apoio.
Utilização da Função (dependentes): Nenhum dependente.
English
Español
