LinhaFinalRel

Esta função foi desenvolvida para relatórios do tipo Texto que necessitam de preenchimento de todas as linhas do final deste, por exemplo os modelos fiscais da contabilidade.

Sintaxe: LinhaFinalRel (Numero pQtdCol,Numero pQtdLinFin, Numero pNumLin, alfa pCaracter, alfa end pLinha);

Parâmetros:

Nome Tipo Descrição
PQtdCol Numero Quantidade de Colunas no Modelo.
PQtdLinFin Numero Quantidade de Linhas a serem impressas até o final do relatório.
PNumLin Numero Linha atual a ser impressa.
PCaracter Alfa Caractere a ser usado para formação da linha.
PLinha Alfa Retorno para linha atual.

Tipo de retorno: PLinha: Alfa de retorno para linha atual.

Exemplo:

No evento depois de Imprimir da seção Total_Geral, coloque esta regra:

Para (i=VQtdLinImp;i<63;i++)

ListaSecao("Adicional_LinhaFinal");

Na seção "Adicional_LinhaFinal", coloque uma descrição e no evento "Na Impressão" desta, coloque esta regra:

Definir Alfa vLinFin;

vNumLin = 63 - vQtdLinImp; /*Numero de linhas que devem ser impressas*/

j = I - vQtdLinImp + 1; /*Linha a ser impressa no momento*/

LinhaFinalRel (132,vNumLin,J,".",vLinFin);

valStr = vLinFin; /*Retorno alfa com a descrição da linha atual */

cancel(2);

VqtdLinImp é uma variável que contém a quantidade de linhas impressas, que deve ser controlada pelo programador do modelo. 63 é o numero de linhas no modelo, já desconsiderando um rodapé de 3 linhas= 66linhas."Adicional_LinhaFinal", é uma seção adicional que será impressa até o final do relatório.

Utilização da Função (dependentes): Nenhum dependente.

Observações: Esta função deve ser chamada de um Loop na regra e o que fará é retornar todas as linhas que devem ser impressas até o final do relatório.Somente para relatórios texto. Nos relatórios modo gráfico pode ser utilizada a função PreenchePagina. Ex: Preench ePagina(8,7,1,"Preto","Amarelo"), a qual permite determinar que uma página seja preenchida com hachuras.

(Verificar em Funções Gerais - PreenchePagina)

Este artigo ajudou você?