Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist 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 ICETOOL - RESIZE DYNAMICALLY kranthikumarb DFSORT/ICETOOL 0 Tue Nov 21, 2017 5:30 pm
This topic is locked: you cannot edit posts or make replies. Need help how to pass the ESP variabl... Venkichaitu JCL & VSAM 12 Thu Nov 02, 2017 3:53 am
No new posts Changing sort Card Dynamically vickey_dw DFSORT/ICETOOL 5 Sat Aug 19, 2017 2:33 pm
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

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us