So I figured I'd run a quick test allocating a PDS with a name fitting my 
mask using JCL.  The write statement (shown below) should show me the 
DSORG presented to SMS. 
    WRITE 'DCN1000 ' &DSN ' ' &PGM ' ' &DSORG ' ' &DATACLAS

So here's the JCL segment
4 //OUTLOAN   DD DSN=T.PM.CWSCW02M.CWSBCWI1.DMLOAN.PRECODE1.DDK, 
  //             DISP=(NEW,CATLG), 
  //             RECFM=FB,LRECL=205,BLKSIZE=0, 
  //             SPACE=(CYL,(90,5,15),RLSE), 
  //             STORCLAS=SCTEST, 
  //             MGMTCLAS=MCTEST 

and here's the IGD SMS sysout statement: 
4 IGD01007I DCN1000 T.PM.CWSCW02M.CWSBCWI1.DMLOAN.PRECODE1.DDK IEFBR14 PO 
DCSTDFLT 

If you compare the write stmt to the sysout, it's pretty clear to me that 
I should be able to use the suggested statement (shown below)to correctly 
assign my dataclas.
       WHEN (&DSORG NE 'PO' AND &DSORG NE 'VS')

Thanks for all the input!
dd keller


////////////////////////////////
 

>>My SMS experience is that directory blocks in space allocation will 
cause
>>DSORG to be completed as "PO" and DEFINE or VSAM in JCL will see DSORG 
set
>>to "VS". That means whatever is leftover, is "PS". I think this is what
>>someone meant by checking what it isn't.
**************************************************************************************
This e-mail message and all attachments transmitted with it may contain legally 
privileged and/or confidential information intended solely for the use of the 
addressee(s). If the reader of this message is not the intended recipient, you 
are hereby notified that any reading, dissemination, distribution, copying, 
forwarding or other use of this message or its attachments is strictly 
prohibited. If you have received this message in error, please notify the 
sender immediately and delete this message and all copies and backups thereof.

Thank you.
**************************************************************************************

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to