
How to Load Natural Source in Batch
NATLOAD, SYSTRANS, EDT
By Dieter W. Storr
Last update: 2 January 2007
Question:
How can you load a Natural source? It's a bit tricky to use ".E" on the right place and not "%%" or "FIN". Some don't like position parameters if using SYSTRANS or NATLOAD.
Answer:
There are different ways:
EDIT
//NATLOAD EXEC NATBATCH
//CMSYNIN DD *
%*
,userid,password
LOGON library
EDIT
// DD DISP=SHR,DSN=SYS3.NATURAL.NAT413.NATCLIPS.SRCE(pgm-name)
// DD *
.E
SAVE pgm-name
FIN
//CMWKF07 DD DUMMY
SYSTRANS
//NATURAL EXEC NATBATCH,NATPARM=',IM=D,INTENS=1'
//CMSYNIN DD DISP=SHR,BUFNO=30,DSN=&SYSUID..DBA.CNTL(NSC)
// DD *
SYSTRANS
L
N,Y,Y,N,Y,N
*
Y
NEWLIB1
FIN
//CMWKF01 DD DISP=SHR,DSN=NATURAL.NAT413.SRCE
//CMWKF07 DD DUMMY for PC
//
Be aware of some lower-case issues when coming from a PC.
Please see also the article "How to use SYSTRANS".
NATLOAD
//NATLOAD EXEC NATBATCH
//CMSYNIN DD *
%*
,userid,password
NATLOAD LOAD VIEW * REP
FIN
//CMWKF01 DD DISP=SHR,DSN=NATURAL.NAT413.SRCE
Top Page
|