Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

NATRJE : No job in the spool

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Java & MQSeries
View previous topic :: :: View next topic  
Author Message
silentarya

New User


Joined: 11 Mar 2007
Posts: 35
Location: Chennai

PostPosted: Tue May 05, 2009 6:44 pm    Post subject: NATRJE : No job in the spool
Reply with quote

Hi,

I am trying to submit a job from within my natural program with the Hex return code from the NATRJE its telling that job submitted successfully. However, I am not abl to get any job in the spool... Can anybody suggest what is wrong in the code?

The codes are as follows...

[Code]

DEFINE DATA
LOCAL
01 #CARD
02 #CARD1 (A80)
02 #CARD2 (A80)
02 #CARD3 (A80)
02 #CARD4 (A80)
01 #COUNT (B4)
01 #FLAG3 (A1)
01 #RETHEX (B2)
END-DEFINE

MOVE '//BRAHMADB JOB (ABCD,EFGH),CLASS=F,TESTING,' TO #CARD1
*
MOVE '// MSGCLASS=X,MSGLEVEL=(1,1)' TO #CARD2
*
MOVE 5 TO #COUNT
MOVE 'L' TO #FLAG3
*
MOVE '//STEP020 EXEC NATURAL,PROGRAM=TMPDISP,APPLID=MYLIB' -
'//CMPRINT DD SYSOUT=* ' TO #CARD3
MOVE '//SYSOUT DD SYSOUT=*' TO #CARD4
CALL 'NATRJE' #CARD #COUNT #FLAG3 #RETHEX
IF #RETHEX = H'0000'
WRITE 'JOB SUBMITTED SUCCESSFULLY'
ELSE
WRITE 'ERROR FROM NATRJE' #RETHEX
END-IF
END

[Code Ends]
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue May 05, 2009 8:45 pm    Post subject:
Reply with quote

Hello,

I don't know if this applies to Natural, but some systems i've worked with needed a "/*EOF" * statement after the "//" at the end of the submitted job.
Syntax corrected
The way this was explained was that this was needed so that the internal reader would be closed and the job actually released to the queue. Keep in mind this was several years ago and not Adabas/Natural.

Still, it might be worth a try. . .
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7999
Location: Bellevue, IA

PostPosted: Tue May 05, 2009 8:51 pm    Post subject:
Reply with quote

Dick: I hope you're referring to '/*EOF' -- I haven't heard of /*EOJ before. The /*EOF is still required for immediate processing of a job submitted through the internal reader. IIRC, if not present, the job will not go to JES until (1) the buffer is filled, (2) a new JOB card is entered into the internal reader, or (3) the address space goes away (i.e., the person signs off).
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Tue May 05, 2009 9:05 pm    Post subject:
Reply with quote

I've always used it with EOJ, so I can't tell you if it will fail without it... icon_biggrin.gif

O.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue May 05, 2009 9:08 pm    Post subject: Reply to: NATRJE : No job in the spool
Reply with quote

Hi Robert,

Quote:
Dick: I hope you're referring to '/*EOF' --
Yup, my hand was quicker than my eye. . . icon_redface.gif

Good catch icon_smile.gif

d
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7999
Location: Bellevue, IA

PostPosted: Tue May 05, 2009 9:10 pm    Post subject:
Reply with quote

/*EOF has saved me untold grief over the years ... I rely upon it!
Back to top
View user's profile Send private message
Bill Dennis

Active Member


Joined: 17 Aug 2007
Posts: 562
Location: Iowa, USA

PostPosted: Wed May 06, 2009 12:11 am    Post subject:
Reply with quote

Have you searched the SYSLOG for BRAHMADB jobname? You may find a JCL ERROR on output queue.

The problem may be the JOB card. The CLASS= parameter must be AFTER the positional parameter PGMMRNAME which you have as 'TESTING'. Ensure a good jobstream by submitting manually.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Java & MQSeries All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts REXX cdoe to purge a JOB from spool a... Sulabh Agrawal CLIST & REXX 11 Thu Mar 09, 2017 11:36 am
No new posts Report output in Spool amitc23 JCL & VSAM 4 Tue Apr 26, 2016 4:32 pm
No new posts Extract specific step spool data enrico-sorichetti JCL & VSAM 1 Thu Feb 04, 2016 9:48 am
No new posts XML generated from cobol is displayin... vangeti COBOL Programming 2 Wed Aug 19, 2015 5:16 pm
No new posts How to find out the line using OFFSET... Vinay Pushpala PL/I & Assembler 1 Fri Apr 03, 2015 11:43 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us