Skip,
      The following jcl should do the trick - 

//ZZZSKIP  JOB (ZZZ,1234),'TEST',                                  
//         MSGCLASS=2,CLASS=M,NOTIFY=&SYSUID,                      
//         MSGLEVEL=(1,1),TIME=1440,                               
//         REGION=0M                                               
//*                                                                
//SYMBOLS  EXPORT SYMLIST=*                                        
//*                                                                
//D1       SET D=&LYYMMDD.                                         
//T1       SET T=&LHHMMSS.                                         
//*                                                                
//TIMETEST EXEC PGM=IKJEFT01                                       
//SYSTSPRT DD DISP=(,CATLG),SPACE=(TRK,1),RECFM=FB,LRECL=80,       
//            UNIT=SYSALLDA,                                       
//            DSN=ZZZ.SKIP.REPORT.D&D..T&T                         
//SYSTSIN  DD DUMMY                                                

Hope it helps..... Roger


On Thu, 21 Jul 2016 19:53:44 +0000, Jesse 1 Robinson <jesse1.robin...@sce.com> 
wrote:

>I'm trying to use system symbols in batch JCL under z/OS 2.1. Specifically, 
>I'd like to create a DSN like this:
>
>   TSOSKIP.REPORT.D-local-date.T-local-time
>
>I've perused KC but still cannot get to work. Now maybe DSN simply does not 
>allow embedded symbolics, but I did not see that prohibition. Here's what I 
>get.
>
>3 // SET D=&LDATE
>4 // SET T=&LTIME
>  //*
>5 //TIMETEST EXEC PGM=IKJEFT01
>6 //SYSTSIN  DD *
>7 //SYSTSPRT DD DISP=(,CATLG),SPACE=(TRK,1),RECFM=FB,LRECL=80,
>  //            UNIT=SYSALLDA,
>  //            DSN= TSOSKIP.REPORT.D&D..T&T
>  IEFC653I SUBSTITUTION JCL - 
> DISP=(,CATLG),SPACE=(TRK,1),RECFM=FB,LRECL=80,UNIT=SYSALLDA,
>  DSN= TSOSKIP.REPORT.D&LDATE.T&LTIME
>. MESSAGE
>7 IEFC627I INCORRECT USE OF AMPERSAND IN THE DSN FIELD
>
>I read that system symbols must be enabled by class, which I did for class A: 
>$HASP837 JOBCLASS(A)         SYSSYM=ALLOW
>
>But it looks like my job is failing at conversion and never getting to 
>execution. Shouldn't this be easy? ;-)
>
>.
>.
>.
>J.O.Skip Robinson
>Southern California Edison Company
>Electric Dragon Team Paddler
>SHARE MVS Program Co-Manager
>323-715-0595 Mobile
>626-302-7535 Office
>robin...@sce.com<mailto:robin...@sce.com>
>
>
>----------------------------------------------------------------------
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to