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
 

 

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
This topic is locked: you cannot edit posts or make replies. Natural ADABAS Opening with CTS enikhilk Mainframe Jobs 0 Wed Nov 30, 2016 5:37 pm
No new posts How to show message using batch jobs madprasy TSO/ISPF 7 Fri Sep 09, 2016 6:55 pm
No new posts Casting a Binary Number to Numeric in... Bob Steinkraus Java & MQSeries 6 Tue Aug 09, 2016 5:58 pm
No new posts Don't allow CICS to submit batch jobs prino JCL & VSAM 5 Mon Jul 25, 2016 3:26 pm
No new posts Predicting jobs which are about to re... kpanchabhai85 DFSORT/ICETOOL 4 Thu Jun 30, 2016 7:51 pm


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