Re: I/O operation was applied to closed file...

["joe" <as400@xxxxxxx>]

...or it could be that the printer should never have been -closed-, the
report is a running total.

joe


----- Original Message -----
From: "Justin Houchin" <justinh@xxxxxxxxxxxxx>
To: "RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
Sent: Monday, June 14, 2004 9:28 AM
Subject: Re: I/O operation was applied to closed file...


> Is this going to fix my problem?
>
> CWilt@xxxxxxxxxxxx wrote:
>
> > Justin,
> >
> > Why close the file?
> >
> > Try using the FEOD op-code to end the current printer file and start a
new
> > one.
> >
> > It will be easier and perform better.
> >
> > HTH,
> > Charles
> >
> >
> >>-----Original Message-----
> >>From: Justin Houchin [mailto:justinh@xxxxxxxxxxxxx]
> >>Sent: Monday, June 14, 2004 8:59 AM
> >>To: rpg400-l@xxxxxxxxxxxx
> >>Subject: I/O operation was applied to closed file...
> >>
> >>
> >>Hi Everyone,
> >> I have a program that writes to two printer files.  The
> >>first file
> >>QSYSPRT gets opened, written, and closed.  The second printer file
> >>TICKET, gets opened, written, and closed after the QSYSPRT file.  The
> >>program this code runs in is a asynchronous job that reads a message
> >>queue, so the job never ends.  History: The program will
> >>receive a work
> >>order number from the message queue and print some paperwork using
> >>QSYSPRT and TICKET printer files. The problem: When I first start the
> >>job and send a work order number to the message queue, the
> >>program picks
> >>up the number and prints the paperwork perfectly, if I send
> >>another work
> >>order number to the message queue the program sends a message to the
> >>QSYSOPR message queue that the program tried to write to a
> >>closed file
> >>TICKET.  I have double checked the code and I feel the TICKET file is
> >>being closed after the first work order is printed.  I
> >>created a debug
> >>breakpoint at the start of the program.  The program breaks at the
> >>beginning of the program when the first work order is read.  But when
> >>the second work order is read, the program does not break and
> >>a message
> >>is sent to QSYSOPR.  I am stumped. Any help would highly be
> >>appreciated.
> >>
> >>Justin
> >>--
> >>This is the RPG programming on the AS400 / iSeries (RPG400-L)
> >>mailing list
> >>To post a message email: RPG400-L@xxxxxxxxxxxx
> >>To subscribe, unsubscribe, or change list options,
> >>visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> >>or email: RPG400-L-request@xxxxxxxxxxxx
> >>Before posting, please take a moment to review the archives
> >>at http://archive.midrange.com/rpg400-l.
> >>
> >
> > --
> > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> --
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>