A couple of things - &DSN(2) = 'DSNDBD' - 'DSNDBD' in the 2nd level generally identifies the data component of a DB2 LDS. Data components do not get assigned their own SMS Constructs. Constructs are assigned at the cluster level. I see this as useless code unless your shop is actually using cluster names with DSNDBD as the 2nd level.
2ndly - the answer to your question is going to depend on what's in the filterlist &DB2E. If it contains an entry like DB2E.** , then all those datasets would be assigned SCDB2 in the &DSN(1) segment and then re-assigned SCSMS in the SELECT/WHEN you've shown us. This is a result of not having a EXIT in the first set of statements - the allocation falls through into the next code segment and gets re-evaluated. And it will continue to be re-evaluated after your SET &STORCLAS = 'SCSMS' as that statement also doesn't appear to have a paired EXIT. Without the WRITE stmts Lisa mentioned, it's pretty hard to tell from what you've shown us. Your allocation could actually have several storage classes assigned and re-assigned, with some other segment having the final assignment of 'SCSMS' before it finally falls out of SMS. My general rule of thumb is that the only time I don't pair a SET with an EXIT is when I want to set a default StorCLas. I always pair a SET with a WRITE and generally its a SET, WRITE, & EXIT. I'd recommend investigating NAVIQUEST to use in testing your code & any changes you're thinking of making. ddk //////////////////////////////// I've inherited an SMS setup and I know little about SMS but this I know isn't working. In the storage class ACS routines is this snippet - IF &DSN(1) = 'DB2E' THEN DO IF &DSN(2) = 'DSNDBC' THEN DO SET &STORCLAS='SCDB2' END IF &DSN(2) = 'DSNDBD' THEN DO SET &STORCLAS='SCDB2' END END followed by this - SELECT WHEN (&DSN = &DB2E) SET &STORCLAS = 'SCSMS' Question. Any dataset of the form DB2E.DSNDBC.** is getting the storage class SCSMS and not SCDB2 which is what is required. I want all DB2E.DSNDBC.** datasets to get SCDB2 and any other DB2E.** dataset to get SCSMS. What is wrong with the above syntax please. Jim McAlpine 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN