Hi,

I am working on a Presstalk, it looks like it is going ok except for the last page not overflowing.

Something must me wrong with the exiting loop:

until((trim(@(&iLigneEnCours+1,1,5))='') or &iLigneEnCours=&current.lpp)

I have provided the resultant pdf, the last page is the problem, I want one more overflow page.

Tx for your help,

Yves


define(&i,integer,0)
&iNbLignesAffichees:=0
setstyle(&style1)
translate(.9886,4.55)


For(&i,0,1,&iNbPersonnes-1)
&iLigneDebut:=(&i*41)+23
&iLigneEnCours:=&iLigneDebut
&iNbLignesAffichees:=&iNbLignesAffichees+1

show(trim(@(&i+3,1,99)))
crlf(0)
translate(2.75,0)
Repeat()
show(trim(@(&iLigneEnCours,1,99)))
crlf(.181)
&iNbLignesAffichees:=&iNbLignesAffichees+1
&iLigneEnCours:=&iLigneEnCours+1

if(&iNbLignesAffichees=35)
crlf(.2)
show(trim('-NEXT PAGE SUIVANTE-'))
showpage()
setstyle(&style1)
&iNbLignesAffichees:=1
@header()
translate(3.7386,4.55)
crlf(0)
endif()
until((trim(@(&iLigneEnCours+1,1,5))='') or &iLigneEnCours=&current.lpp)
translate(-2.75,0)
crlf()
Endfor()



sample

You only do a showpage when you reach 35. You migth want to check after the until if you have still lines that haven't been displayed on a page and if so, do a showpage

Tx Jean-Cedric, I will try that.