This works for me:

//COPY        EXEC PGM=IKJEFT01                                 
//SYSTSPRT DD SYSOUT=*                                       
//SYSTSIN   DD *                                              
  SMC FDS('XX.X.XXXXXXXX.XXXXXXXX.XXXX(MMMMMMMM)') +         
      TDS('XXXX.XXXXXXXX.XXXX.XXX(MMMMMMMM)')

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

Reply via email to