|
View previous topic :: View next topic
|
| Author |
Message |
nartcr
New User
Joined: 06 Jun 2007
Posts: 83
Location: anada
|
|
|
|
Hi all -
I am transferring files from Mainframe to Unix system.
This is the mainframe control card parameters :-
| Code: |
SUBMIT PROC=NDMPARM -
NEWNAME=ZAAAAAAA -
&JOBNAME=ZAAAAAAA -
&DSNIN=EEEE.FFFF.GGGG.HHHH.G0055V00 -
&DSNOUT=CAR.MARUTI.997. -
&PARTID=CAR -
&DTYPE=MARUTI -
&DFORMAT=997 -
&IO=OUT -
&UNWRAPLEN=80 -
&UNWRAPCHAR=NULL -
&DATE=%SUBDATE -
&TIME=%SUBTIME
|
Here is the Process
| Code: |
NDMPARM PROCESS PNODE=PNODENAME -
SNODE=SNODENAME
STEP1 COPY FROM(DSN=&DSNIN -
DISP=SHR -
PNODE ) -
COMPRESS(PRIME=X'40') -
TO (DSN=&DSNOUT -
DISP=shr -
SNODE -
SYSOPTS=":datatype=text: :strip.blanks=no:" )
STEP2 IF (STEP1 EQ 0) THEN
STEP3 SYMBOL &FNAME=&DSNOUT || &DATE || &TIME
EIF
STEP4 IF (STEP1 EQ 0) THEN
RUN TASK (PGM=UNIX) -
SNODE -
SYSOPTS=\"Mainframe2ECG.ksh &PARTID &DTYPE &DFORMAT \ || -
\&DSNOUT &UNWRAPLEN &UNWRAPCHAR FALSE FALSE OUT &FNAME"\
EIF
|
Now whenever I submit the job, the value in FNAME [ at present it would be DSNOUT.DATETIME - for ex "CAR.MARUTI.997.20090101123026" ] gets send to Unix using Connect Direct.
Question :- Without modifying the Process -- I need to send the file with '.pgp' extension added to it.
The file should be DSNOUT.DATETIME.PGP [ "CAR.MARUTI.997.20090101123026.PGP" ]
I tried modifying the parameters like this
&TIME=%SUBTIME || '.PGP' << This threw me an error - I am not sure how to add .PGP extension without modifying the Process.
Any help - much appreciated. |
|
| Back to top |
|
 |
superk
Global Moderator
Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA
|
|
|
|
| I can't see that there's any other way. Sorry. |
|
| Back to top |
|
|
nartcr
New User
Joined: 06 Jun 2007
Posts: 83
Location: anada
|
|
|
|
| I settled in modifying the process ! Thanks. |
|
| Back to top |
|
|
|
|
