Why is EZACFSM1 required to use &LYYMMDD in an instream DD?  Couldn't the OP 
just use:

//TSOUSERX JOB . . . 
// EXPORT SYMLIST=*
// SET MYDATE=&LYYMMDD
//SYSTSIN DD *,SYMBOLS=JCLONLY
CONTROL CARD UISNG &MYDATE
/*

to substitute that value? (tested using IEBGENER with a SYSUT1 instream and 
SYSUT2 DD SYSOUT=*)

Using symbols in a regular file (Unix or MVS) of course requires EZACFSM1, but 
for an instream control card file it is not required.

Peter

-----Original Message-----
From: IBM Mainframe Discussion List <[email protected]> On Behalf Of 
Michael Oujesky
Sent: Wednesday, June 15, 2022 11:42 AM
To: [email protected]
Subject: Re: SFTP JOB Data parameter

As a starting point:
//SFTPSEBC JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=&SYSUID
//TAILOR  EXEC PGM=PGM=EZACFSM1
//SYSOUT   DD   DISP=(NEW,PASS,DELETE),DSN=&CMDS,
//         UNIT=VIO,SPACE=(TRK,(1)),
//         RECFM=FB,LRECL=80,BLKSZE=800
//SYSIN    DD *
OSHELL { echo 'lcd /u/op117/';
          echo 'cd /FRB/EBCClearing/Staging/tmp';+
          echo 'ASCII'; +
          echo 'get EBC-GOV-&LYYMMDD..txt'; } | +
        sftp -P 2222 [email protected]
OGET '/u/op117/EBC-GOV-&LYYMMDD..txt'                      -
      'NBFDP.DATA.XX.XX.SFTP'
//STEP1   EXEC PGM=IKJEFT01,REGION=0M
//SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC
//SYSTSIN   DD DSN=&CMDS,DISP=(OLD,DELETE)
//OUTPUT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
/*

At 05:44 AM 6/15/2022, saurabh khandelwal wrote:
>--
>
>Dear All,
>
>I am am running below Job in TSO env and getting to get file file from 
>windows to Mainframe env.
>
>Initially file was static and all worked well. But now, requirement is 
>to get the file, which has current time stamp on daily basis.
>
>Ex : EBC-GOV-yyyymmdd.txt'   in this yyyymmdd should be replace with 
>year/month/date.
>
>But I am unable to find way to achieve this goal. Can you please help 
>on this issue.
>//SFTPSEBC JOB (7330),MSGCLASS=X,CLASS=P,NOTIFY=&SYSUID
>//STEP1   EXEC PGM=IKJEFT01,REGION=0M
>//SYSEXEC  DD   DISP=SHR,DSN=SYS1.SBPXEXEC
>//SYSTSIN   DD DSN=NP.LIB.CLIST(SFTPSEBC),DISP=SHR
>//OUTPUT DD SYSOUT=*
>//SYSTSPRT DD SYSOUT=*
>/*
>EDIT      NP.LIB.CLIST(SFTPSEBB) - 01.01                Columns 00001 00072
>Command ===>                                                  Scroll ===> CSR
>000007 OSHELL { echo 'lcd /u/op117/';
>000008          echo 'cd /FRB/EBCClearing/Staging/tmp';+
>000009          echo 'ASCII'; +
>000010          echo 'get EBC-GOV-yyyymmdd.txt'; } | +
>000011        sftp -P 2222 [email protected]
>000012 OGET '/u/op117/EBC-GOV-yyyymmdd.txt'                      -
>000013      'NBFDP.DATA.XX.XX.SFTP'
>
>****** **************************** Bottom of Data
>****************************
--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

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

Reply via email to