Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
How to run the Jobs under Natural/Adabas

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

New User


Joined: 09 Apr 2007
Posts: 4
Location: Buenos Aires

PostPosted: Sun Apr 15, 2007 10:12 am    Post subject: How to run the Jobs under Natural/Adabas
Reply with quote

Sorry, I'm newbie, i'm gonna work with a OS/390 and Adabas/Natural as a Job Streamer. I only know Cobol/DB2 world, where I need a short Job to compile and link the Cobol source
EXEC COBCL
and another Job to run the object file (with its own FILE-IN FILE-OUT, or sysin, etc).

How is it with Natural/Adabas?, can you gimme some Jobs examples; i really need your help


Sorry for my english
Back to top
View user's profile Send private message

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Sun Apr 15, 2007 2:43 pm    Post subject:
Reply with quote

I didn't understand your question:
1. Would you like to know how to invoke a NATURAL program in batch (ADABAS is a database, you can't "run" it)?
2. Would you like to know how to submit a JCL from within NATURAL?

The answer for the first question:
In order to invoke a NATURAL program in batch, you invoke NATURAL nucleus as a PGM=, and supply your input (such as library and program name) in the CMSYNIN card.
Since every shop has it's own NATURAL nucleus and libraries, my example won't help you. You will have to ask other users or your system guys.
A typical NATURAL job will include the following cards:
CMWKF0n - Where n is a work file number.
CMPRT0n - Where n is a print file number.
CMSYNIN - NATURAL input
CMPRINT - Default NATURAL messages.

The answer for the second question:
Generating and submitting a job from within NATURAL is done in the same way as in other languages: The basic method is to generated the JCL cards and write them to internal reader.
Software AG provides NATRJE together with NATURAL, to assist you in this mission. NATRJE is documented in Software AG's manuals.
You can allocate a work file to internal reader (INTRDR), and then fill this work file with the JCL cards.
Another methods might include: Call to a REXX exec, a COBOL program, or (under CICS) TD queue.

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

New User


Joined: 09 Apr 2007
Posts: 4
Location: Buenos Aires

PostPosted: Sun Apr 15, 2007 6:28 pm    Post subject:
Reply with quote

Very very much for answering. What I'm trying to say is, in Cobol you have to do this in order to COMPILE and LINK a source:

//COMPILE&LINK JOB ,'SHANO',CLASS=B,MSGCLASS=O,NOTIFY=SHANO
//STEP0 EXEC COBCL,SHANO,PGM=COBOL-PGM

and to run it:

//RUN JOB ,'SHANO',CLASS=B,MSGCLASS=O,NOTIFY=SHANO
//STEP0 EXEC PGM=COBOL-PGM
//STEPLIB DD DSN=CURSO14.PGMLIB,DISP=SHR
//SYSOUT DD SYSOUT=*

I use to do write my JCL jobs in a dataset (under ISPF) and SUBMMIT.

Now, what I must to do with a Natural Source Coude, to compile&link and run it, under TSO/ISPF ? (what will be the "standard rule" for that?)
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Sun Apr 15, 2007 8:59 pm    Post subject:
Reply with quote

The NATURAL language is interpreted, not compiled. You don't compile a NATURAL source; you CATALOG or STOW it from within NATURAL editor/NSPF editor/CATALL.

Again, in order to run a batch NATURAL, (your RUN job), you execute NATURAL nucleus, and provide the program name in CMSYNIN.

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

New User


Joined: 09 Apr 2007
Posts: 4
Location: Buenos Aires

PostPosted: Sun Apr 15, 2007 11:33 pm    Post subject: Re: How to run the Jobs under Natural/Adabas
Reply with quote

I see, i see , Adabas/Natural world seems pretty much different from Cobol/DB2 world, which is really bad for me as a Junior Job Streamer.
I dont understand at all which is NATURAL nucleus, is part of the Natural software, or it's like a "procedure" called from a JCL job?, how will be an analogy with cobol? could u post some jobs plz . And again, sorry.
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2360
Location: Israel

PostPosted: Mon Apr 16, 2007 12:50 am    Post subject:
Reply with quote

There is no analogy to the COBOL world, since NATURAL (again) is an interpreted language, versus COBOL, which is a compiled language.

NATURAL nucleus is the only load module you can call when you want to invoke NATURAL: either under CICS, under TSO or in batch.

The best method to find the NATURAL nucleus name is to ask your system guys or your coworkers.

Alternate method for locating the NATURAL nucleus is to find the TSO procedure that is in use to access NATURAL (usually a REXX exec or CLIST), and look for a CALL command within it.

Don't bother to locate the NATURAL nucleus under CICS: Usually it is linked with different modules then the TSO/batch nucleus.

As always - reading the fine manuals (which contain lots of examples) is a good idea.

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

New User


Joined: 26 Mar 2007
Posts: 9
Location: UK

PostPosted: Fri Jun 22, 2007 2:48 pm    Post subject: I see, i see , Adabas/Natural world seems pretty much differ
Reply with quote

Hi piportill4,

It might be too late to post a reply, but, I faced the same scenario some time back .I have worked on COBOL/DB2 then switched to Natural/Adabas .... Let me know if you are still wandering in the woods icon_smile.gif.

Regards,
Utkarsh
Back to top
View user's profile Send private message
M Venkatesh

New User


Joined: 24 Aug 2007
Posts: 2
Location: Chennai

PostPosted: Fri Aug 24, 2007 1:10 pm    Post subject:
Reply with quote

I guess I have been too lates.....
Best bet would asking for sample jobs from your teammates.
Let me if you need help..
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 ejck thru rexx to multiple jobs insid... Susanta All Other Mainframe Topics 5 Tue Sep 19, 2017 1:39 pm
No new posts self-restarting jobs in OPC jzhardy IBM Tools 1 Mon Aug 21, 2017 10:15 am
No new posts Reg:Displaying the particular month o... bhavana yalavarthi All Other Mainframe Topics 4 Sat Jul 08, 2017 8:13 pm
No new posts Determine Region with max bandwidth f... seahawk789 COBOL Programming 3 Mon Feb 27, 2017 8:26 pm
No new posts Release of Adabas Cursor mohitsethi All Other Mainframe Topics 1 Mon Feb 06, 2017 8:36 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us