Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
How to download a Natural Object into .txt file

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> NATURAL & MQSERIES
Author Message
atulrukmangad

New User


Joined: 10 Apr 2006
Posts: 13

PostPosted: Fri Aug 25, 2006 5:38 pm    Post subject: How to download a Natural Object into .txt file
Reply with quote

Hi All,
If any one could suggest how to download a Natural Object as a text file in .txt format then it will be a great help. For your Information I am using Natural 3.1.

Atul
Back to top
View user's profile Send private message
References
PostPosted: Fri Aug 25, 2006 5:38 pm    Post subject: Re: How to download a Natural Object into .txt file Reply with quote

ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 1754
Location: Israel

PostPosted: Fri Aug 25, 2006 6:55 pm    Post subject:
Reply with quote

Hi. You have few options:
1. SYSTRANS - Which is a SAG utility that meant to do exactly what you want.
2. One of the user exists provided with NATURAL that can read a source program and save it to work file.
3. From NATURAL batch, issue the LIST command.

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

New User


Joined: 16 May 2006
Posts: 3
Location: Johannesburg

PostPosted: Thu Sep 14, 2006 7:40 pm    Post subject: Re: How to download a Natural Object into .txt file
Reply with quote

Hi there,

You can run this JCL: Change the steplib and the CMSYNIN paremeters

//XXXXNAT2 JOB (034AD1S,DS),MO,CLASS=C,NOTIFY=CAF4,MSGCLASS=V
//* TYPRUN=HOLD
//*JOBPARM SYSAFF=RC30
//*ROUTE XEQ RC30
//NAT EXEC PGM=NATBBTCH,PARM='MT=999,AUTO=OFF'
//STEPLIB DD DSN=TRADABO.N007.ADALOAD,DISP=SHR
// DD DSN=TRADABO.ADABAS.LOAD,DISP=SHR
//DDCARD DD DSN=TRADABO.N007.CTLLIB(RUNUSER),DISP=SHR
//SYSOUT DD SYSOUT=*
//DDPRINT DD DUMMY,DCB=BLKSIZE=133
//CMPRINT DD SYSOUT=*
//CMPRT01 DD SYSOUT=*
//CMSYNIN DD *
BEBREF,USERID
L N PCCM02N0
FIN




Regards,
MHF
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 1754
Location: Israel

PostPosted: Thu Sep 14, 2006 7:44 pm    Post subject:
Reply with quote

What is BEBREF?

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

New User


Joined: 16 May 2006
Posts: 3
Location: Johannesburg

PostPosted: Thu Sep 14, 2006 8:26 pm    Post subject: Re: How to download a Natural Object into .txt file
Reply with quote

BEBREF is a library at our installation. It is where the production source sits. I just used it as an example.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> NATURAL & MQSERIES All times are GMT + 6 Hours
Page 1 of 1