English
Español
InsereEspacos
Esta função retorna uma string com espaços entre caracteres ou números.
Sintaxe: InsereEspacos(Numero xTipo, Numero xValor, Alfa xString, Alfa End xStringEspaco);
(Numero xTipo,Numero xValor, Alfa xString, Alfa End xStringEspaco)
Parâmetros:
xTipo: Identifica o tipo de dado. Pode ser: (0-String,1-Data,2-numero,3-Telefone,4-valor,5-CEP);
xValor: Número Referente ao tipo, válido somente se o tipo de entrada for numérico;
xString: String referente ao tipo, válido somente se o tipo de entrada for string;
xStringEspaco: Variável alfa de retorno que receberá o valor intercalado com espaços.
Importante: Os parâmetros Valor e String serão utilizados alternadamente, conforme o tipo de entrada.
Exemplo1:
/*Inserir espaços no nome do colaborador. "João da Silva"*/
Definir Alfa xnome;
InsereEspacos(0,0,R034FUN.NomFun,xnome);
Logo, a variável xnome retornará "J O Ã O D A S I L V A".
Exemplo2:
/*Inserir espaços no salário do colaborador (R$1500,12). */
Definir Alfa xvalor;
InsereEspacos(2,R034FUN.ValSal,"",xvalor);
Logo, a variável xvalor retornará "1 5 0 0 1 2".
Utilização: Gerador de Relatórios.
Disponível para o módulo: Administração de Pessoal.
English
Español
