Hi Sir,
Pls, can you contol this stuff?
The page counter is wrong, or many moor...
Thanks for your help
My best regards
Arnold
NB: Please, wath are the parameters to create Page on screen or to print with counter?
===================
cls
$Xitems = 151 # count
$XLIGNE_GROUP = 8 #LIGNE GROUP = HEADER GROUP
$XPAGE_LENGTH = 50 # PAGE LENGTH
$XHEADER = 8
$XHEADER_top_ligne = 3
$XBootom_ligne = 3
$XPAGE =[int](($Xitems-$XHEADER+$XHEADER_top_ligne+$XBootom_ligne+$XLIGNE_GROUP)/$XPAGE_LENGTH)
$Xh_title = "|<C-1 Lnr>|<C-2 Name>|<C-3>|<C ..>|<C-6>|"
# $Xa_1 = "A","B","C","D","E","F","G","H","I","J"
# $Xa_2 = "a","b","c","d","f","g","h"
:outerloop for ($Xnr1 = 1; $Xnr1 -lt ($Xitems+1))
{
for ($Xnr2 = 1; $Xnr2 -le ($XPAGE+1))
{"""<P. nr: $Xnr2/$XPAGE>""""<top>"""
;$Xnr2++
for ($Xnr3 = 1; $Xnr3 -lt $XHEADER;$Xnr3++)
{" |<L-grp : $Xnr3>"+$Xh_title
for ($Xnr4 = 1; $Xnr4 -lt $XLIGNE_GROUP; $Xnr4++)
{"|<L-nr $Xnr4>|<C-Lnr $Xnr1>|<C-Name $Xnr1>|<C-3 $Xnr1>|<C .. $Xnr1>|<C-6 $Xnr1>|"
;$Xnr1 ++
if ($Xnr1 -gt $Xitems){"""<EOP: $Xnr2>"""
break outerloop}
}
}
}
}