Steps of creating the subsystem :
CREATE Subsystem description (CRTSBSD) : First of all we create subsystem description as below:
CRTSBSD SBSD (AMINEM/MYSBSD) POOLS ((2 *BASE)) MAXJOBS(2) TEXT('My subsystem description')
Here, the subsystem job will run in pool 2 and will use *BASE for main memory storage. There can maximum of 2 jobs inside the subsystem at a time.
Create Job queue (CRTJOBQ) : Then we create a job queue as below:
CRTJOBQ JOBQ (AMINEM/MYJOBQ) TEXT('My job queue') 
Add Job Queue Entry (ADDJOBQE) : Once the job queue is created, then we attach the (ADDJOBQE) command, as follows:
ADDJOBQE SBSD (AMINEM/MYSBSD) JOBQ (AMINEM/MYJOBQ) MAXACT (1)
MAXACT denotes the number of the jobs that can be PROCESS at the same time.
Create Class (CRTCLS)
Class defines the run time attribute e.g. Run priority, Time slice, Default WAIT time, Maximum temporary storage etc.
CRTCLS CLS(AMINEM/MYCLS) RUNPTY(40)
Add Routing Entry (ADDRTGE)
ADDRTGE SBSD(AMINEM/MYSBSD) SEQNBR(9999) CMPVAL(*ANY) PGM(SYS/QCMD) CLS(AMINEM/MYCLS)
Start Subsystem (STRSBS)
STRSBS SBSD(AMINEM/MYSBSD)
Once the subsystem is started it can be used to submit the job.

Steps of creating the subsystem :
Create Subsystem description (CRTSBSD) : First of all we create subsystem description as below:
CRTSBSD SBSD (AMINEM/MYSBSD) POOLS ((2 *BASE)) MAXJOBS(2) TEXT('My subsystem description')
Here, the subsystem job will run in pool 2 and will use *BASE for main memory storage. There can maximum of 2 jobs inside the subsystem at a time.
Create Job queue (CRTJOBQ) : Then we create a job queue as below:
CRTJOBQ JOBQ (AMINEM/MYJOBQ) TEXT('My job queue') 
Add Job Queue Entry (ADDJOBQE) : Once the job queue is created, then we attach the (ADDJOBQE) command, as follows:
ADDJOBQE SBSD (AMINEM/MYSBSD) JOBQ (AMINEM/MYJOBQ) MAXACT (1)
MAXACT denotes the number of the jobs that can be process at the same time.
Create Class (CRTCLS)
Class defines the run time attribute e.g. Run priority, Time slice, Default wait time, Maximum temporary storage etc.
CRTCLS CLS(AMINEM/MYCLS) RUNPTY(40)
Add Routing Entry (ADDRTGE)
ADDRTGE SBSD(AMINEM/MYSBSD) SEQNBR(9999) CMPVAL(*ANY) PGM(SYS/QCMD) CLS(AMINEM/MYCLS)
Start Subsystem (STRSBS)
STRSBS SBSD(AMINEM/MYSBSD)
Once the subsystem is started it can be used to submit the job.