DEFINE STGCLASS

1 DEFINE STGCLASS(storage-class)
2! DESCR(' ') (1) 
2?
2 DESCR(string)
3? LIKE(stgclass-name)
4! CMDSCOPE(' ')
4?
4 CMDSCOPE(qmgr-name)4.1 (2) 

4 CMDSCOPE(*) (2) 
5? PSID(integer)
6! PASSTKTA(' ') (1) 
6?
6 PASSTKTA(aname)
7! QSGDISP(QMGR)
7?
7 QSGDISP(COPY) (2) 
7 QSGDISP(GROUP) (2) 
8! NOREPLACE
8?
8 REPLACE
9! XCFGNAME(' ') (1) 
9?
9 XCFGNAME(gname)
10! XCFMNAME(' ') (1) 
10?
10 XCFMNAME(mname)