Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to pass a value dynamically to EZACFSM1

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
agsathyan

New User


Joined: 06 Apr 2009
Posts: 4
Location: India

PostPosted: Sun Nov 04, 2012 1:20 pm    Post subject: How to pass a value dynamically to EZACFSM1
Reply with quote

Requirement:
-------------------
Need to populate a FTP destination file name in format XXX_RFSI_EXTRA_20121104_104522.TXT where XXX can be 001, 002 ... 009

Sample Code:
------------------
I tried to populate the file name using program EZACFSM1 as below.
But i am not able to pass the value of XXX dynamically.

//STEP001 EXEC PGM=EZACFSM1
//SYSIN DD *
PUT 'KANDA.RFSI.SCRIPT.EXTRA.DATA' +
XXX_RFSI_EXTRA_20&LYYMMDD_&LHHMMSS..TXT
QUIT
/*
//SYSOUT DD DSN=KANDA.SAMPLE.FTPPARM,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,(1,1),RLSE),
// DCB=(LRECL=80,RECFM=FB)
//*


Expected Output in KANDA.SAMPLE.FTPPARM :
----------------------------------------------------------
when XXX = 001, output should be:

PUT 'KANDA.RFSI.SCRIPT.EXTRA.DATA' +
001_RFSI_EXTRA_20121104_104522.TXT
QUIT

when XXX = 002, output should be:

PUT 'KANDA.RFSI.SCRIPT.EXTRA.DATA' +
002_RFSI_EXTRA_20121104_104522.TXT
QUIT

Query:
-----------
Is there a way to pass the value of XXX dynamically to EZACFSM1 ?

Thanks & Regards,
Agsathyan
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Sun Nov 04, 2012 8:36 pm    Post subject:
Reply with quote

Hello,

Not that i know of, but you could create the control statements with the XXX resolved and then use the generated statements in the EZACFSM1 step.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts JES2 JEC: Use UNIX Pipes to Pass Data... Virendra Shambharkar JCL & VSAM 21 Tue Dec 20, 2016 6:55 pm
This topic is locked: you cannot edit posts or make replies. How to pass the previous month date i... Suganya87 DFSORT/ICETOOL 5 Mon Oct 31, 2016 4:13 pm
No new posts how to DYNAMICALLY write sort cond to... mohamedmubee COBOL Programming 13 Fri Aug 26, 2016 11:46 pm
No new posts PL/I: opening file w/ dynamically det... Sam Dodgers PL/I & Assembler 6 Wed Jul 27, 2016 4:05 pm
No new posts Is it possible to pass variables of s... Csongor CLIST & REXX 2 Fri Jun 10, 2016 7:33 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us