/* -

              * Start the demonstration model in batch -

              * modify for your system -

              */

 

             PGM

 

             SBMJOB     CMD(CALL PGM(MDLDMOSRRG)) JOB(MDLDMOSR) +

                          JOBPTY(9)

             SNDPGMMSG  MSG('Demo model server started in job queue')

 

             ENDPGM