I just use IKJEFT01 but the caveat is you need to BPX rexx in SYSEXEC 
this works well for me, you can use any shell command 




//SYSA EXEC PGM=IKJEFT1B,REGION=0K 
//SYSTSPRT DD SYSOUT=* 
//SYSEXEC DD DSN=SYS1.SBPXEXEC,DISP=SHR 
//SYSTSIN DD * 
PROF MSGID WTPMSG 
oshell cd /TEMPA 
MKDIR '/TEMPA/SYSA' MODE(7,7,7) 
MKDIR '/TEMPA/PLEX1' MODE(7,7,7) 
MKDIR '/TEMPA/PLEX1/ftp' MODE(7,7,7) 
MKDIR '/TEMPA/SYSA/usr' MODE(7,7,5) 
MKDIR '/TEMPA/SYSA/usr/local' MODE(7,7,5) 
MKDIR '/TEMPA/SYSA/usr/local/.ssh' MODE(7,7,5) 
........................................................................................
 


oshell ln -s /SYSA/usr/local/.ssh /TEMPA/.ssh 
oshell ln -s /SYSA/usr/local/abinitio /TEMPA/abinitio 
oshell ln -s /SYSA/usr/local/ahin /TEMPA/ahin 
oshell ln -s /SYSA/usr/local/ahinarch /TEMPA/ahinarch 
oshell ln -s /SYSA/usr/local/build /TEMPA/build 
oshell ln -s /SYSA/usr/local/ca-ops /TEMPA/ca-ops 
oshell ln -s /SYSA/usr/local/cai /TEMPA/cai 
oshell ln -s /PLEX1/usr/local/ftp /TEMPA/ftp 
oshell ln -s /SYSA/usr/local/grp /TEMPA/grp 
oshell ln -s /PLEX1/usr/local/HIS /TEMPA/HIS 
oshell ln -s /SYSA/usr/local/IDIGMAIN /TEMPA/IDIGMAIN 
oshell ln -s /SYSA/usr/local/incoming /TEMPA/incoming 
oshell ln -s /SYSA/usr/local/incoming_dev /TEMPA/incoming_d 
oshell ln -s /SYSA/usr/local/nfs /TEMPA/nfs 
----- Original Message -----

From: "Paul Gilmartin" <[email protected]> 
To: [email protected] 
Sent: Tuesday, August 15, 2017 10:26:15 AM 
Subject: Re: OMVS Command in JCL 

On Tue, 15 Aug 2017 08:32:34 +0300, venkat kulkarni wrote: 
> 
>OSHELL 
> { 
> echo '!rm -r /u/venkat/test_01.txt' ; + 
> echo '!rm -r /u/venkat/test_01.txt' ; } 
> 
>Please suggest, if any changes in this JCL is required to make this full 
>process work. 
> 
Or, the alternative (untested): 

//STEP EXEC PGM=BPXBATCH, PARMDD=CMDS 
//STDOUT DD SYSOUT=(,) 
//STDERR DD SYSOUT=(,) 
//PARMDD DD * 
set -x; 
cp "//'IBM06.DATA.TEST1''" /u/venkat/test_01.txt; 
cp "//'IBM06.DATA.TEST2''" /u/venkat/test_02.txt; 
rm -r /u/venkat/test_01.txt' ; 
rm -r /u/venkat/test_02.txt' ; 
// 

-- gil 

---------------------------------------------------------------------- 
For IBM-MAIN subscribe / signoff / archive access instructions, 
send email to [email protected] with the message: INFO IBM-MAIN 


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to