RE: last record to be wrote

what i want its to wrote on the bottom of each page that is print (before
writing the header), not on the end of the file,

Pedro Salé Reis
MIS Assistent
Deptº Informática
Hilti (PORTUGAL)
Tel. +351 22 956 8145
Fax. +351 22 956 81 90
E-mail reisped@hilti.com



@@-  -----Mensagem original-----
@@-  De: Njål Fisketjøn [mailto:n.f@figu.no]
@@-  Enviada: Quarta-feira, 26 de Setembro de 2001 12:24
@@-  Para: rpg400-l@midrange.com
@@-  Assunto: RE: last record to be wrote
@@-
@@-
@@-  Pedro Salé Reis wrote:
@@-
@@-  > I have a printer file with a list of elements , with a header,
@@-  > but i need a
@@-  > bottom line to, so
@@-  > can anyone tell me if there a way of printing a bottom
@@-  line on a printer
@@-  > file, without using a variable counter , ..is there any keyword
@@-  > that define
@@-  > the last record to be write, like the overflow keyword?
@@-  >
@@-
@@-  something like this will do:
@@-
@@-  read file
@@-  dow not %eof(file)
@@-  ...
@@-  write detail
@@-  ...
@@-  read file
@@-  enddo
@@-
@@-
@@-  write endfmt
@@-
@@-
@@-  _______________________________________________
@@-  This is the RPG programming on the AS400 / iSeries
@@-  (RPG400-L) mailing list
@@-  To post a message email: RPG400-L@midrange.com
@@-  To subscribe, unsubscribe, or change list options,
@@-  visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
@@-  or email: RPG400-L-request@midrange.com
@@-  Before posting, please take a moment to review the archives
@@-  at http://archive.midrange.com/rpg400-l.
@@-