JES2 and purge by batch



JES, JES2, JCL utilities, IDCAMS, Compile & Run JCLs, PROCs etc...

JES2 and purge by batch

Postby samb01 » Fri Sep 06, 2013 2:48 pm

Hello,
i would like to purge all the job sysout with MSGCLASS=B by batch which have ten days old.

Is-it possible by batch ?

Thanks for your help.
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Re: JES2 and purge by batch

Postby NicC » Fri Sep 06, 2013 6:02 pm

Probably - what are you going to execute in batch? Probably SDSF? With, perhaps a Rexx wrapper?
The problem I have is that people can explain things quickly but I can only comprehend slowly.
Regards
Nic
NicC
Global moderator
 
Posts: 3025
Joined: Sun Jul 04, 2010 12:13 am
Location: Pushing up the daisies (almost)
Has thanked: 4 times
Been thanked: 136 times

Re: JES2 and purge by batch

Postby prino » Fri Sep 06, 2013 6:28 pm

Use, if you're allowed to do so, the JES2 $O command
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
User avatar
prino
 
Posts: 635
Joined: Wed Mar 11, 2009 12:22 am
Location: Vilnius, Lithuania
Has thanked: 3 times
Been thanked: 28 times

Re: JES2 and purge by batch

Postby Akatsukami » Fri Sep 06, 2013 7:48 pm

samb01 wrote:Hello,
i would like to purge all the job sysout with MSGCLASS=B by batch which have ten days old.

Is-it possible by batch ?

As you can see, there is a powerful and flexible Rexx/SDSF interface.
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: JES2 and purge by batch

Postby samb01 » Mon Sep 09, 2013 5:09 pm

Hello,

i have an error after this command :

ADDRESS SDSF "ISFACT ST TOKEN('"TOKEN.IX"') PARM(NP P)"



Here is the error :

    23 *-*    /* IDENTIFIED BY THE TOKEN VARIABLE.  NOTE     */                 
    24 *-*    /* THE TOKEN MUST BE ENCLOSED IN SINGLE QUOTES */                 
    25 *-*    ADDRESS SDSF "ISFACT ST TOKEN('"TOKEN.IX"') PARM(NP P)"           
       >L>      "ISFACT ST TOKEN('"                                             
       >C>      "TOKEN.1"                                                       
       >V>      "3h4hhoSZo5KWVMNFxEBBQO5Qw0x4QGlA1IP8LEyWl4NTl1NATomihhIOIJKEQGB
       >O>      "ISFACT ST TOKEN('3h4hhoSZo5KWVMNFxEBBQO5Qw0x4QGlA1IP8LEyWl4NTl1
iMyxwBEQEHW1g=="                                                               
       >L>      "') PARM(NP P)"                                                 
       >O>      "ISFACT ST TOKEN('3h4hhoSZo5KWVMNFxEBBQO5Qw0x4QGlA1IP8LEyWl4NTl1
iMyxwBEQEHW1g==') PARM(NP P)"                                                   
       +++ RC(8) +++                                                           
    26 *-*    LRC=RC                                                           
       >V>      "8"                                                             

samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Re: JES2 and purge by batch

Postby prino » Mon Sep 09, 2013 5:25 pm

The error is in line 12 of your code!
Robert AH Prins
robert.ah.prins @ the.17+Gb.Google thingy
User avatar
prino
 
Posts: 635
Joined: Wed Mar 11, 2009 12:22 am
Location: Vilnius, Lithuania
Has thanked: 3 times
Been thanked: 28 times

Re: JES2 and purge by batch

Postby samb01 » Mon Sep 09, 2013 7:16 pm

How can you see that ?
I think it's a problem of right may be ?

How could i check it ?
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Re: JES2 and purge by batch

Postby Akatsukami » Mon Sep 09, 2013 8:10 pm

samb01 wrote:How can you see that ?
I think it's a problem of right may be ?

How could i check it ?

Display the messages.
"You have sat too long for any good you have been doing lately ... Depart, I say; and let us have done with you. In the name of God, go!" -- what I say to a junior programmer at least once a day
User avatar
Akatsukami
Global moderator
 
Posts: 1058
Joined: Sat Oct 16, 2010 2:31 am
Location: Bloomington, IL
Has thanked: 6 times
Been thanked: 51 times

Re: JES2 and purge by batch

Postby dick scherrer » Mon Sep 09, 2013 8:24 pm

Hello,

If after reading about the message(s) you are still stuck, you need to post the code (at least the bit that has a problem).

For diagnosing, it is often a good thing to copy the problem code into a small test script and debug.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6268
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 93 times

Re: JES2 and purge by batch

Postby samb01 » Mon Sep 09, 2013 8:33 pm


     37 *-*     IF ISFMSG<>""                                             
        >V>       "NOT AUTHORIZED FOR JOB"                                 
        >L>       ""                                                       
        >O>       "1"                                                     
1       *-*      THEN                                                     
     38 *-*      SAY "ISFMSG IS:" ISFMSG                                   
        >L>        "ISFMSG IS:"                                           
        >V>        "NOT AUTHORIZED FOR JOB"                               
        >O>        "ISFMSG IS: NOT AUTHORIZED FOR JOB"                     
 ISFMSG IS: NOT AUTHORIZED FOR JOB                                         
     39 *-*      /* THE ISFMSG2 STEM CONTAINS ADDITIONAL DESCRIPTIVE */   
     40 *-*      /* ERROR MESSAGES                                   */   


thank's.

i don't what can i do to have the right ...
samb01
 
Posts: 427
Joined: Mon Nov 16, 2009 7:24 pm
Has thanked: 1 time
Been thanked: 0 time

Next

Return to JCL

 


  • Related topics
    Replies
    Views
    Last post