Preencher

Função para preencher com um caractere específico (aCaracter) a um valor (aCampo), até atingir um determinado tamanho (aTamanhoCampo) tanto à esquerda ou à direita (aPreencheEsquerda) em um campo de texto do relatório.

Sintaxe: Preencher(Alfa aCaractere, Alfa End aString, Numero aTamanho, Numero aPreencherEsquerda);

Parâmetros:

Nome Tipo Descrição
aCaractere Alfa Campo texto a ser inserido.
aString Alfa Campo texto do relatório que recebe o valor do aCaractere.
aTamanho Numero Tamanho total do campo a ser complementado com o valor do aCaractere.
aPreencherEsquerda Numero Valores: 0-Verdadeiro / 1- Falso. Quando for 1, preenche o aCaractere à direita.

Exemplo:

No relatório existe o campo "Descricao001" que deve receber o valor passado na função. Exemplo 1:

Definir Alfa Descricao001;

Descricao004 = "TESTE";

Preencher("#", Descricao001, 10, 0);

O conteúdo do campo "Descricao001" será ####TESTE totalizando a quantidade de 10

informada no parâmetro aTamanho. Exemplo 2:

Definir Alfa Descricao001;

Descricao004 = "TESTE";

Preencher("@", Descricao001, 15, 1);

O conteúdo do campo "Descricao001" será TESTE@@@@@@@@@@ totalizando a quantidade de 15 informada no parâmetro aTamanho.

Este artigo ajudou você?