|
View previous topic :: View next topic
|
| Author |
Message |
piportill4
New User
Joined: 09 Apr 2007
Posts: 4
Location: Buenos Aires
|
|
|
|
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 |
|
 |
ofer71
Global Moderator
Joined: 27 Dec 2005
Posts: 2358
Location: Israel
|
|
|
|
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 |
|
|
piportill4
New User
Joined: 09 Apr 2007
Posts: 4
Location: Buenos Aires
|
|
|
|
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 |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005
Posts: 2358
Location: Israel
|
|
|
|
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 |
|
|
piportill4
New User
Joined: 09 Apr 2007
Posts: 4
Location: Buenos Aires
|
|
|
|
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 |
|
|
ofer71
Global Moderator
Joined: 27 Dec 2005
Posts: 2358
Location: Israel
|
|
|
|
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 |
|
|
utkarshtewari
New User
Joined: 26 Mar 2007
Posts: 9
Location: UK
|
|
|
|
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  .
Regards,
Utkarsh |
|
| Back to top |
|
|
M Venkatesh
New User
Joined: 24 Aug 2007
Posts: 2
Location: Chennai
|
|
|
|
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 |
|
|
|
|
