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.