         PROC                                                           SG$00010
SG$LKMPS NAME                                                           SG$00020
         INCLUDE   TZ$MPP0,NEWOBJ                                       SG$00030
TK#NENT  EQU       0                                                    SG$00040
         INCLUDE   TZ$MPP1,NEWOBJ                                       SG$00050
//       IF    ('&QMSADV' EQ '').NEXT                                   SG$00060
         INCLUDE   TZ$MPP2,NEWOBJ                                       SG$00070
//.NEXT  IF    ('&QMSBRA' EQ '').NEXT                                   SG$00080
         INCLUDE   TZ$MPP3,NEWOBJ                                       SG$00090
//.NEXT  IF    ('&QMSCAN' EQ '').NEXT                                   SG$00100
         INCLUDE   TZ$MPP4,NEWOBJ                                       SG$00110
//.NEXT  IF    ('&QMSDAT' EQ '').NEXT                                   SG$00120
         INCLUDE   TZ$MPP5,NEWOBJ                                       SG$00130
//.NEXT  IF    ('&QMSERR' EQ '').NEXT                                   SG$00160
         INCLUDE   TZ$MPP7,NEWOBJ                                       SG$00170
//.NEXT  IF    ('&QMSIFS' EQ '').NEXT                                   SG$00180
         INCLUDE   TZ$MPP8,NEWOBJ                                       SG$00190
//.NEXT  IF    ('&QMSINT' EQ '').NEXT                                   SG$00200
         INCLUDE   TZ$MPP9,NEWOBJ                                       SG$00210
//.NEXT  IF    ('&QMSJOU&QMSLOG' EQ '').NEXT                            SG$00220
         INCLUDE   TZ$MPP10,NEWOBJ                                      SG$00230
         INCLUDE   TZ$JRN1,NEWOBJ                                       SG$00240
//.NEXT  IF    ('&QMSMSG' EQ '').NEXT                                   SG$00250
         INCLUDE   TZ$MPP12,NEWOBJ                                      SG$00260
//.NEXT  IF    ('&QMSMST' EQ '').NEXT                                   SG$00270
         INCLUDE   TZ$MPP13,NEWOBJ                                      SG$00280
//.NEXT  IF    ('&QMSRRI' EQ '').NEXT                                   SG$00290
         INCLUDE   TZ$MPP15,NEWOBJ                                      SG$00300
//.NEXT  IF    ('&QMSRRO' EQ '').NEXT                                   SG$00310
         INCLUDE   TZ$MPP16,NEWOBJ                                      SG$00320
         INCLUDE   TZ$MPP25,NEWOBJ                                      SG$00330
//.NEXT  IF    ('&QMSRET' EQ '').NEXT                                   SG$00340
         INCLUDE   TZ$MPP17,NEWOBJ                                      SG$00350
//.NEXT  IF    ('&QMSROU' EQ '').NEXT                                   SG$00360
         INCLUDE   TZ$MPP18,NEWOBJ                                      SG$00370
//.NEXT  IF    ('&QMSSQI' EQ '').NEXT                                   SG$00380
         INCLUDE   TZ$MPP19,NEWOBJ                                      SG$00390
//.NEXT  IF    ('&QMSSQO' EQ '').NEXT                                   SG$00400
         INCLUDE   TZ$MPP20,NEWOBJ                                      SG$00410
//.NEXT  IF    ('&QMSSOU' EQ '').NEXT                                   SG$00420
         INCLUDE   TZ$MPP21,NEWOBJ                                      SG$00430
//.NEXT  IF    ('&QMSTIM' EQ '').NEXT                                   SG$00440
         INCLUDE   TZ$MPP22,NEWOBJ                                      SG$00450
//.NEXT  IF    ('&QMSDAT&QMSTIM&QMSSQO' EQ '').NEXT                     SG$00460
         INCLUDE   TZ$MPP24,NEWOBJ                                      SG$00470
//.NEXT  NOP                                                            SG$00480
         INCLUDE   TZ$MPP6,NEWOBJ                                       SG$00485
         INCLUDE   TZ$MPP25,NEWOBJ                                      SG$00490
TK#AENT  EQU   0                                                        SG$00500
TK#BENT  EQU   0                                                        SG$00510
TK#DENT  EQU   0                                                        SG$00520
TK#PENT  EQU   0                                                        SG$00530
TK#MENT  EQU   0                                                        SG$00540
TK#RENT  EQU   0                                                        SG$00550
TK#IENT  EQU   0                                                        SG$00560
TK#OENT  EQU   0                                                        SG$00570
TK#SENT  EQU   0                                                        SG$00580
TK#TENT  EQU   0                                                        SG$00590
TK#CENT  EQU   0                                                        SG$00600
TK#EENT  EQU   0                                                        SG$00610
TK#WENT  EQU   0                                                        SG$00620
TK#JENT  EQU   0                                                        SG$00630
TK#LENT  EQU   0                                                        SG$00640
TK#ZENT  EQU   0                                                        SG$00650
TK#UENT  EQU   0                                                        SG$00660
TK#VENT  EQU   0                                                        SG$00670
TK#XENT  EQU   0                                                        SG$00680
TK#DAENT EQU   0                                                        SG$00690
TK#IFENT EQU   0                                                        SG$00700
         END                                                            SG$00710
