[sqlwin] =?iso-8859-1?Q?RE=3A_=5Bsqlwin=5D_numera=E7=E3o_no_qrp?=

[Fernando Simonetti]

Segue um exemplo que baixei da internet.
� uma outra forma de fazer.

 <<xofy.app>> 
 <<xofytest.qrp>> 

> ----------
> De:   ya_info[SMTP:[EMAIL PROTECTED]]
> Responder:    [EMAIL PROTECTED]
> Enviada:      Ter�a-feira, 10 de Setembro de 2002 12:06
> Para:         [EMAIL PROTECTED]
> Assunto:      [sqlwin] numera��o no qrp
> 
> Pessoal, desculpem a demora...
> Eu n�o sei se esta � a melho solu��o, mas foi a �nica que 
> consegui.
> 
> [ nesta rotina pego a quantidade de folhas ]
> 
> ** nContaItens -> quantidade de linhas que trar� na minha 
> query
> ** 9 -> quantas linha cabem na minha folha
> 
> While SqlFetchNext( hSqlTimer, nErro )
>  If nContaItens > 9
>       Set nTotalFolhas = SalNumberTruncate( (nContaItens / 
> 9), 3, 0 )
>       If SalNumberTruncate( SalNumberMod((nContaItens / 9), 
> 1), 1, 1 ) > 0
>               Set nTotalFolhas = nTotalFolhas + 1
>  Else
>       Set nTotalFolhas = 1
> 
>  Set tblMedicamentos.colnNrTotalFolha = nTotalFolhas
> 
> [ fim ]
> 
> 
> A p�gina, vc tem a numera��o na pr�pria fun��o PageNumber() 
> no report.
> 
> Ent�o...
> 
> No relat�rio ficaria pageNumber() '/' nTotalFolhas
> 
> Qualquer d�vida ou uma melhor solu��o...
> []'s
> Fab�.
> 
> 
>  
> ---
> UOL Elei��es 2002 - Todos os lances da disputa pol�tica
> http://eleicoes.uol.com.br/
> 
> =============================================Lista de Centura SQLWindows
> Administrador : [EMAIL PROTECTED]
> [ http://www.centuraexplorer.com ]
> Para sair desta lista mande mensagem para:
> [EMAIL PROTECTED] sem nada no Subject e
> com o comando a seguir no corpo da msg:
> "unsubscribe sqlwin" (sem as aspas)
> =============================================
> 

xofy.app
Description: Binary data

xofytest.qrp
Description: Binary data