I agree with this. Is not this statement thats causing the problem ? CHGJOB outq(QUSRSYS/JUNK) At the end of the job , there should be a command to change the outq back to what it was. CHGJOB OUTQ(*USRPRF) right? --- "Ingvaldson, Scott" <SIngvaldson@xxxxxxxxxxxx> wrote: > Murali - > > If you want to email your report it will need to go > to hold status. If you > want to both print and email your report it will > need to be SAVE(*YES). > OVRPRTF HOLD(*NO) SAVE(*YES) will do this. If you > want the spooled file to > be cleaned up after you email it you can add DLTSPLF > FILE(QPQUPRFIL) > SPLNBR(*LAST) to your program after you email the > report. > > OVRPRTF >> F1 = HELP > > CHGSPLFA >> F1 = HELP > > GO CMDSPLF = Spooled File Commands > > Regards, > > Scott Ingvaldson > AS/400 System Administrator > GuideOne Insurance Group > > -----Original Message----- > date: Wed, 24 Mar 2004 03:02:41 -0800 (PST) > from: murali dhar <hydchap1@xxxxxxxxx> > subject: RE: CHGJOB > > If the report autromatically prints we would not be > able to email it since the spool file would not be > there after printing. These spool files are directed > to JUNK by using CHGJOB. > Spool file are on hold. > Could not get any conclusion aftre checking queries. > > Thanks, > Murali. > > --- Emmanuel Zannis <emmanuel.zannis@xxxxxxxxxxx> > wrote: > > Check your queries. > > > > -----Original Message----- > > From: murali dhar [mailto:hydchap1@xxxxxxxxx] > > Sent: 24 March 2004 10:03 AM > > To: Midrange Systems Technical Discussion > > Subject: CHGJOB > > > > Hi, Greetings for a good day! > > Below is my part of my CL program : > > > > PGM > > > > > DCL VAR(&RECS) TYPE(*DEC) LEN(10) > > > DCL VAR(&PLIB) TYPE(*CHAR) LEN(10) > > > > > YGETPLIB PLIB(&PLIB) > > > > > CHGJOB OUTQ(QUSRSYS/JUNK) > > > > > RUNQRY QRY(YSGOMNITRD) QRYFILE((&PLIB/YTRNF1) > + > > (YCUSTOMNI)) OUTTYPE(*OUTFILE) + > > > OUTFILE(QTEMP/IFEMPTY) > > > > > RTVMBRD FILE(QTEMP/IFEMPTY) NBRCURRCD(&RECS) > > > > > IF COND(&RECS *EQ 0) THEN(GOTO > > CMDLBL(ENDIT)) > > > > RUNQRY QRY(YSGOMNITRD) QRYFILE((&PLIB/YTRNF1) > + > > (YCUSTOMNI)) OUTTYPE(*PRINTER) + > > > > > OUTFILE(QTEMP/YSGOMNITRD) > > > > When I run this job , I found this puts spool file > > on hold(it changes the outputq to junk): > > > > How do I make this program modify sothat it should > > not put spool file on hold ? > > Can I replace with OVRPRTF? any ideas? please > post > > Thanks in adv, > > Murali. > > This message and accompanying documents are covered > by the Electronic > Communications Privacy Act, 18 U.S.C. §§ 2510-2521, > and contains information > intended for the specified individual(s) only. This > information is > confidential. If you are not the intended recipient > or an agent responsible > for delivering it to the intended recipient, you are > hereby notified that > you have received this document in error and that > any review, dissemination, > copying, or the taking of any action based on the > contents of this > information is strictly prohibited. If you have > received this communication > in error, please notify us immediately by e-mail, > and delete the original > message. > > _______________________________________________ > This is the Midrange Systems Technical Discussion > (MIDRANGE-L) mailing list > To post a message email: MIDRANGE-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: > http://lists.midrange.com/mailman/listinfo/midrange-l > or email: MIDRANGE-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the > archives > at http://archive.midrange.com/midrange-l. > __________________________________ Do you Yahoo!? Yahoo! Finance Tax Center - File online. File on time. http://taxes.yahoo.com/filing.html
As an Amazon Associate we earn from qualifying purchases.
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.