RE: Old Journal Receivers problem

[Neil Palmer <npalmer@xxxxxxxxxxx>]

On CHGJRN command, check the system help for the MNGRCV(*SYSTEM) parm
option.
For deleting, you could just DLTJRNRCV using a generic name.
>From WRKRPYLE add a system reply list entry to take a 'C' option to
CPA7025 (journal received not saved) so it won't delete any not yet
saved.  You can name a specific journal by creating multiple entries for
CPA7025 using the compare data - for example:

                       Change Reply List Entry (CHGRPYLE)



 Type choices, press Enter.



 Sequence number  . . . . . . . . > 1002          1-9999

 Message identifier . . . . . . .   CPA7025       Character value,
*SAME, *ANY
 Compare data:

   Comparison data  . . . . . . .   'NETJRN'

   Message data start position  .   1             1-999, *SAME, *NONE

 Message reply  . . . . . . . . .   'C'



                            Additional Parameters



 Dump the sending job . . . . . .   *NO           *SAME, *NO, *YES

 Coded character set ID . . . . .   *JOB          *JOB, *SAME, *HEX...




Neil Palmer                                AS/400~~~~~      
NxTrend Technology - Canada   ____________          ___  ~     
Thornhill, Ontario,  Canada   |OOOOOOOOOO| ________  o|__||=   
Phone: (905) 731-9000  x238   |__________|_|______|_|______)   
Cell.: (416) 565-1682  x238    oo      oo   oo  oo   OOOo=o\   
Fax:   (905) 731-9202       ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 
mailto:NPalmer@NxTrend.com    AS/400  The Ultimate Business Server      
http://www.NxTrend.com

> -----Original Message-----
> From: BKstaple [SMTP:BKstaple@aol.com]
> Sent: Friday, April 24, 1998 9:47 PM
> To:   MIDRANGE-L@midrange.com
> Subject:      Old Journal Receivers problem
> 
> Greetings All;
> 
> I have a journal problem.  This journal starts to exceed 1.5 gig every
> day, so
> I have wrote a program that will go out 3 times a day to detach the
> journal
> reciever, then generate and attach a new one. (The software vendor
> says that
> they need all of their files journaled to one journal for commitment
> control)
> 
> What I want to know is, is there a way to programatically delete the
> old
> recievers after they have been saved?
> 
> Thanks for any help that you can give.
> 
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---