         PROC                                                           SG$00010
SG$SIZES NAME                                                           SG$00020
// GBL   STDUMP,STELOG,STGEN,STJCS,STLOD1,STLOD2,STLOD3,STMAC,STOBJ     SG$00030
// GBL   STSRC,STTRA,STATRA                                             SG$00040
// GBL   STCAT                                                          SG$00050
// GBL   DUMPSZ,ELOGSZ,GENSZ,JCSSZ,LOD1SZ,LOD2SZ,LOD3SZ,MACSZ,OBJSZ     SG$00060
// GBL   SRCSZ,TRASZ,ATRASZ                                             SG$00070
// GBL   CATSZ                                                          SG$00080
// GBL   DOATRA,DODUMP,DOELOG,DOGEN                                     SG$00090
// GBL   DOCAT                                                          SG$00100
// GBL   OPNSYD                                                         SG$00110
//                                                              NOP     SG$00120
// NOP   DETERMINE WHICH FILES ARE TO BE DONE AT ALL                    SG$00130
//                                                              NOP     SG$00140
//DOATRA JSET  'YES'                                                    SG$00150
// IF    ('&ATRN' EQ 'YES')NEXT                                         SG$00160
//DOATRA JSET  'NO'                                                     SG$00170
//NEXT   NOP                                                            SG$00180
//                                                              NOP     SG$00190
//DOCAT  JSET  'YES'                                                    SG$00200
//                                                              NOP     SG$00210
//DODUMP JSET  'NO'                                                     SG$00220
// IF    ('&SPR1' EQ '')NEXT                                            SG$00230
//       IF    ('&SYD1' NE '0')YESDMP                                   SG$00240
//NEXT   NOP                                                            SG$00250
// IF    ('&SPR2' EQ '')NEXT                                            SG$00260
//       IF    ('&SYD2' NE '0')YESDMP                                   SG$00270
//NEXT   NOP                                                            SG$00280
// IF    ('&SPR3' EQ '')NEXT                                            SG$00290
//       IF    ('&SYD3' NE '0')YESDMP                                   SG$00300
//NEXT   NOP                                                            SG$00310
// IF    ('&SPR4' EQ '')NEXT                                            SG$00320
//       IF    ('&SYD4' NE '0')YESDMP                                   SG$00330
//NEXT   NOP                                                            SG$00340
// GO    NODMP                                                          SG$00350
//YESDMP NOP                                                            SG$00360
//DODUMP JSET  'YES'                                                    SG$00370
//NODMP  NOP                                                            SG$00380
//                                                              NOP     SG$00390
//DOELOG JSET  'NO'                                                     SG$00400
//       IF    ('&SPR1' EQ '')NEXT                                      SG$00410
//       IF    ('&ERL1' NE '0')YESERL                                   SG$00420
//NEXT   IF    ('&SPR2' EQ '')NEXT                                      SG$00430
//       IF    ('&ERL2' NE '0')YESERL                                   SG$00440
//NEXT   IF    ('&SPR3' EQ '')NEXT                                      SG$00450
//       IF    ('&ERL3' NE '0')YESERL                                   SG$00460
//NEXT   IF    ('&SPR4' EQ '')NOERL                                     SG$00470
//       IF    ('&ERL4' NE '0')YESERL                                   SG$00480
// GO    NOERL                                                          SG$00490
//YESERL NOP                                                            SG$00500
//DOELOG JSET  'YES'                                                    SG$00510
//NOERL  NOP                                                            SG$00520
//                                                              NOP     SG$00530
//DOGEN  JSET  'NO'                                                     SG$00540
//                                                              NOP     SG$00550
// NOP   ESTABLISH IF THE $Y$DUMP FILE NEEDS TO BE OPENED               SG$00560
//                                                              NOP     SG$00570
// IF    ('&DODUMP' EQ 'NO')NEXT                                        SG$00580
// IF    ('&TYPE' EQ '8416')NEXT                                        SG$00590
// IF    ('&TYPE' EQ '8418')NEXT                                        SG$00600
//OPNSYD JSET  'YES'                                                    SG$00610
//NEXT   NOP                                                            SG$00620
//                                                              NOP     SG$00630
// NOP   SYSRES FILE SIZES IN 256 BYTE BLOCKS                           SG$00640
//                                                              NOP     SG$00650
//UNUSED JSET  1                        UNUSED AREA IN FRONT OF DISC    SG$00660
//ELOG   JSET  1200                     3  CYL FOR 8414                 SG$00670
//ATRA   JSET  8*280                    8 CYL FOR 8416-8418             SG$00680
//GEN    JSET  480                                                      SG$00690
//DUMP   JSET  262144/256                                               SG$00700
//SRC    JSET  280                                                      SG$00710
//MAC    JSET  5800                                                     SG$00720
//DMACSZ JSET  1                        GAP FOR DIRECTORY EXPANSION     SG$00730
//OBJ    JSET  3100                                                     SG$00740
//DOBJSZ JSET  1                        GAP FOR DIRECTORY EXPANSION     SG$00750
//JCS    JSET  1680                                                     SG$00760
//CATSZ  JSET  1                                                        SG$00770
//LOD3   JSET  12550                                                    SG$00780
//VTOCSZ JSET  1                        VTOC SIZE IN CYLS               SG$00790
//TRA    JSET  8*280                    8 CYL FOR 8416-8418             SG$00800
//LOD1   JSET  280                                                      SG$00810
//RLBSZ  JSET  6                        RUN LIBRARY GAP IN CYLS         SG$00820
//LOD2   JSET  12550                                                    SG$00830
//                                                              NOP     SG$00840
// NOP   SET NUMBER OF BLOCKS PER CYLINDER FOR TRANSIENT FILE           SG$00850
//                                                              NOP     SG$00860
//TRNBLKS JSET &BLKS                                                    SG$00870
//       IF    ('&TYPE' NE '8411').NEXT1                                SG$00880
//TRNBLKS JSET 80                                                       SG$00890
//.NEXT1 IF    ('&TYPE' NE '8430').NEXT2                                SG$00900
//TRNBLKS JSET 608                                                      SG$00910
//.NEXT2 NOP                                                            SG$00920
//                                                              NOP     SG$00930
// NOP   CHECK IF ANY OPTIMIZATION HAS BEEN ASKED FOR                   SG$00940
//                                                              NOP     SG$00950
// IF    ('&LNKR' NE '')OPTIMIZE                                        SG$00960
// IF    ('&ASMB' NE '')OPTIMIZE                                        SG$00970
// IF    ('&RP1G' NE '')OPTIMIZE                                        SG$00980
// IF    ('&ECOB' NE '')OPTIMIZE                                        SG$00990
// IF    ('&SCOB' NE '')OPTIMIZE                                        SG$01000
// IF    ('&FORT' NE '')OPTIMIZE                                        SG$01010
// IF    ('&ICAM' NE '')OPTIMIZE                                        SG$01020
// IF    ('&IMS' NE '')OPTIMIZE                                         SG$01030
// IF    ('&OLM' NE '')OPTIMIZE                                         SG$01040
// IF    ('&LP' NE '')OPTIMIZE                                          SG$01050
//       IF    ('&DMS' NE '')OPTIMIZE                                   SG$01060
//       IF    ('&FOR' NE '')OPTIMIZE                                   SG$01070
//       IF    ('&MCS' NE '')OPTIMIZE                                   SG$01080
//       IF    ('&CPM' NE '')OPTIMIZE                                   SG$01090
// GO    USENORM                                                        SG$01100
//                                                              NOP     SG$01110
//OPTIMIZE NOP                                                          SG$01120
//                                                              NOP     SG$01130
// NOP   LOAD LIBRARY SIZES OF GROUPS IN BLOCKS                         SG$01140
//                                                              NOP     SG$01150
//SLSYST JSET  8569                                                     SG$01160
//SLLNKR JSET  234                                                      SG$01170
//SLASMB JSET  518                                                      SG$01180
//SLRPG1 JSET  780                                                      SG$01190
//SLECOB JSET  923                                                      SG$01200
//SLSCOB JSET  793                                                      SG$01210
//SLFORT JSET  215                                                      SG$01220
//       NOP                            REMOVE ICAM LOAD MODULES        SG$01230
//SLIMS  JSET  1363                                                     SG$01240
//SLLP   JSET  824                                                      SG$01250
//SLOLM  JSET  2778                                                     SG$01260
//SLDMS  JSET  2345                                                     SG$01270
//SLFOR  JSET  1272                                                     SG$01280
//SLMCS  JSET  3442                                                     SG$01290
//SLCPM  JSET  1097                                                     SG$01300
//                                                              NOP     SG$01310
// NOP   OBJECT LIBRARY SIZES OF GROUPS IN BLOCKS                       SG$01320
//                                                              NOP     SG$01330
//SOSYST JSET  1275                                                     SG$01340
//SORPG1 JSET  113                                                      SG$01350
//SOCOB  JSET  139                                                      SG$01360
//SOFORT JSET  113                                                      SG$01370
//SOIMS  JSET  645                                                      SG$01380
//SOLIBSB      JSET    91                                               SG$01385
//SOFOR  JSET  460                                                      SG$01390
//SODMS  JSET  226                                                      SG$01400
//SOFORCOM JSET 122                                                     SG$01410
//                                                              NOP     SG$01420
// NOP   PROC  LIBRARY SIZES OF GROUPS IN BLOCKS                        SG$01430
//                                                              NOP     SG$01440
//SMSYST JSET  3900                                                     SG$01450
//SMFORT JSET  524                                                      SG$01460
//SMICAM JSET  1180                                                     SG$01470
//SMIMS  JSET  47                                                       SG$01480
//SMDMS  JSET  32                                                       SG$01490
//                                                              NOP     SG$01500
// NOP   LOAD LIBRARY($Y$LOD)                                           SG$01510
//                                                              NOP     SG$01520
//LOD    JSET  100                                                      SG$01530
//LOD    JSET  &LOD.+&SLSYST                                            SG$01540
//                                                              NOP     SG$01550
// IF    ('&LNKR' NE '')NEXT                                            SG$01560
//LOD    JSET  &LOD.+&SLLNKR                                            SG$01570
//NEXT   NOP                                                            SG$01580
//                                                              NOP     SG$01590
// IF    ('&ASMB' NE '')NEXT                                            SG$01600
//LOD    JSET  &LOD.+&SLASMB                                            SG$01610
//NEXT   NOP                                                            SG$01620
//                                                              NOP     SG$01630
// IF    ('&RP1G' NE '')NEXT                                            SG$01640
//LOD    JSET  &LOD.+&SLRPG1                                            SG$01650
//NEXT   NOP                                                            SG$01660
//                                                              NOP     SG$01670
// IF    ('&ECOB' NE '')NEXT                                            SG$01680
//LOD    JSET  &LOD.+&SLECOB                                            SG$01690
//NEXT   NOP                                                            SG$01700
//                                                              NOP     SG$01710
// IF    ('&SCOB' NE '')NEXT                                            SG$01720
//LOD    JSET  &LOD.+&SLSCOB                                            SG$01730
//NEXT   NOP                                                            SG$01740
//                                                              NOP     SG$01750
// IF    ('&FORT' NE '')NEXT                                            SG$01760
//LOD    JSET  &LOD.+&SLFORT                                            SG$01770
//NEXT   NOP                                                            SG$01780
//                                                              NOP     SG$01790
// IF    ('&IMS' NE '')NEXT                                             SG$01800
//LOD    JSET  &LOD.+&SLIMS                                             SG$01810
//NEXT   NOP                                                            SG$01820
//                                                              NOP     SG$01830
// IF    ('&LP' NE '')NEXT                                              SG$01840
//LOD    JSET  &LOD.+&SLLP                                              SG$01850
//NEXT   NOP                                                            SG$01860
//                                                              NOP     SG$01870
// IF    ('&OLM' NE '')NEXT                                             SG$01880
//LOD    JSET  &LOD.+&SLOLM                                             SG$01890
//NEXT   NOP                                                            SG$01900
//       IF    ('&DMS' NE '')NEXT                                       SG$01910
//LOD    JSET  &LOD.+&SLDMS                                             SG$01920
//NEXT   NOP                                                            SG$01930
//       IF    ('&MCS' NE '')NEXT                                       SG$01940
//LOD    JSET  &LOD.+&SLMCS                                             SG$01950
//NEXT   NOP                                                            SG$01960
//       IF    ('&FOR' NE '')NEXT                                       SG$01970
//LOD    JSET  &LOD.+&SLFOR                                             SG$01980
//NEXT   NOP                                                            SG$01990
//       IF    ('&CPM' NE '')NEXT                                       SG$02000
//LOD    JSET  &LOD.+&SLCPM                                             SG$02010
//NEXT   NOP                                                            SG$02020
//LOD1   JSET  &BLKS                                                    SG$02030
//LOD    JSET  &LOD.-&BLKS                                              SG$02040
//LOD2   JSET  &LOD./2                                                  SG$02050
//LOD3   JSET  &LOD./2                                                  SG$02060
//                                                              NOP     SG$02070
// NOP   OBJECT LIBRARY($Y$OBJ)                                         SG$02080
//                                                              NOP     SG$02090
//OBJ    JSET  1                                                        SG$02100
//                                                              NOP     SG$02110
// IF    ('&LNKR' NE '')NOOBJ                                           SG$02120
//OBJ    JSET  100                                                      SG$02130
//OBJ    JSET  &OBJ.+&SOSYST                                            SG$02140
//                                                              NOP     SG$02150
// IF    ('&RP1G' NE '')NEXT                                            SG$02160
//OBJ    JSET  &OBJ.+&SORPG1                                            SG$02170
//NEXT   NOP                                                            SG$02180
//                                                              NOP     SG$02190
// IF    ('&ECOB' EQ '')COBOBJ                                          SG$02200
// IF    ('&SCOB' NE '')NEXT                                            SG$02210
//COBOBJ NOP                                                            SG$02220
//OBJ    JSET  &OBJ.+&SOCOB                                             SG$02230
//NEXT   NOP                                                            SG$02240
//                                                              NOP     SG$02250
//       IF    ('&FORT&FOR' EQ '11')NEXT                                SG$02260
//OBJ    JSET  &OBJ.+&SOFORCOM                                          SG$02270
//       IF    ('&FORT' NE '')NEXT1                                     SG$02280
//OBJ    JSET  &OBJ.+&SOFORT                                            SG$02290
//NEXT1  IF    ('&FOR' NE '')NEXT                                       SG$02300
//OBJ    JSET  &OBJ.+&SOFOR                                             SG$02310
//NEXT   NOP                                                            SG$02320
//       IF    ('&DMS' NE '')NEXT                                       SG$02330
//OBJ    JSET  &OBJ.+&SODMS                                             SG$02340
//NEXT   NOP                                                            SG$02350
// IF    ('&IMS' NE '')NEXT                                             SG$02360
//OBJ    JSET  &OBJ.+&SOIMS                                             SG$02370
//OBJ    JSET  &OBJ.+&SOLIBSB                                           SG$02375
//NEXT   NOP                                                            SG$02380
//                                                              NOP     SG$02390
//NOOBJ  NOP                                                            SG$02400
//                                                              NOP     SG$02410
// NOP   PROC LIBRARY($Y$MAC)                                           SG$02420
//                                                              NOP     SG$02430
//MAC    JSET  1                                                        SG$02440
//                                                              NOP     SG$02450
// IF    ('&ASMB' NE '')NOMAC                                           SG$02460
//MAC    JSET  100                                                      SG$02470
//MAC    JSET  &MAC.+&SMSYST                                            SG$02480
//                                                              NOP     SG$02490
//       IF    ('&DMS' NE '')NEXT                                       SG$02510
//MAC    JSET  &MAC.+&SMDMS                                             SG$02520
//NEXT   NOP                                                            SG$02530
// IF    ('&FORT&FOR' EQ '11')NEXT                                      SG$02535
//MAC    JSET  &MAC.+&SMFORT                                            SG$02540
//NEXT   NOP                                                            SG$02550
//                                                              NOP     SG$02560
// IF    ('&ICAM' NE '')NEXT                                            SG$02570
//MAC    JSET  &MAC.+&SMICAM                                            SG$02580
//NEXT   NOP                                                            SG$02590
//                                                              NOP     SG$02600
// IF    ('&IMS' NE '')NEXT                                             SG$02610
//MAC    JSET  &MAC.+&SMIMS                                             SG$02620
//NEXT   NOP                                                            SG$02630
//                                                              NOP     SG$02640
//NOMAC  NOP                                                            SG$02650
//                                                              NOP     SG$02660
//USENORM NOP                                                           SG$02670
//                                                              NOP     SG$02680
// NOP   CONVERT BLOCK SIZES TO CYLINDER SIZES FOR THE SYSRES FILES     SG$02690
// NOP         AND KEEP RUNNING COUNT TO POINT OF VTOC(TOT)             SG$02700
// NOP         AND SET THE STARTING CYLINDER FOR EACH AREA (STXXXX)     SG$02710
//                                                              NOP     SG$02720
//TOT    JSET  &UNUSED                                                  SG$02730
//                                                              NOP     SG$02740
// IF    ('&DOELOG' EQ 'NO')NOELOG                                      SG$02750
// NOP                                  NO CYL ALLOCATION               SG$02760
//ELOGSZ JSET  &ELOG-1                                                  SG$02770
// NOP                                                                  SG$02780
//NOELOG NOP                                                            SG$02790
//                                                              NOP     SG$02800
// IF    ('&DOATRA' EQ 'NO')NOATRA                                      SG$02810
// SG$CVTHX    &TOT,STATRA                                              SG$02820
//ATRASZ JSET  &ATRA.//&TRNBLKS                                         SG$02830
//TOT    JSET  &TOT.+&ATRASZ                                            SG$02840
//NOATRA NOP                                                            SG$02850
//                                                              NOP     SG$02860
// IF    ('&DOGEN' EQ 'NO')NOGEN                                        SG$02870
// SG$CVTHX    &TOT,STGEN                                               SG$02880
//GENSZ  JSET  &GEN.//&BLKS                                             SG$02890
//TOT    JSET  &TOT.+&GENSZ                                             SG$02900
//NOGEN  NOP                                                            SG$02910
//                                                              NOP     SG$02920
// IF    ('&DODUMP' EQ 'NO')NODUMP                                      SG$02930
// SG$CVTHX    &TOT,STDUMP                                              SG$02940
//DUMPSZ JSET  &DUMP.//&BLKS                                            SG$02950
//TOT    JSET  &TOT.+&DUMPSZ                                            SG$02960
//NODUMP NOP                                                            SG$02970
//                                                              NOP     SG$02980
// SG$CVTHX    &TOT,STSRC                                               SG$02990
//SRCSZ  JSET  &SRC.//&BLKS                                             SG$03000
//TOT    JSET  &TOT.+&SRCSZ                                             SG$03010
//                                                              NOP     SG$03020
// SG$CVTHX    &TOT,STMAC                                               SG$03030
//MACSZ  JSET  &MAC.//&BLKS                                             SG$03040
//TOT    JSET  &TOT.+&MACSZ                                             SG$03050
//                                                              NOP     SG$03060
// IF    ('&ASMB' NE '')NOMAC                                           SG$03070
//TOT    JSET  &TOT.+&DMACSZ                                            SG$03080
//NOMAC  NOP                                                            SG$03090
//                                                              NOP     SG$03100
// SG$CVTHX    &TOT,STOBJ                                               SG$03110
//OBJSZ  JSET  &OBJ.//&BLKS                                             SG$03120
//TOT    JSET  &TOT.+&OBJSZ                                             SG$03130
//                                                              NOP     SG$03140
// IF    ('&LNKR' NE '')NOOBJ                                           SG$03150
//TOT    JSET  &TOT.+&DOBJSZ                                            SG$03160
//NOOBJ  NOP                                                            SG$03170
//                                                              NOP     SG$03180
// SG$CVTHX    &TOT,STJCS                                               SG$03190
//JCSSZ  JSET  &JCS.//&BLKS                                             SG$03200
//TOT    JSET  &TOT.+&JCSSZ                                             SG$03210
//                                                              NOP     SG$03220
// IF    ('&DOCAT' EQ 'NO')NOCAT                                        SG$03230
// SG$CVTHX    &TOT,STCAT                                               SG$03240
//TOT    JSET  &TOT.+&CATSZ                                             SG$03250
//NOCAT  NOP                                                            SG$03260
//                                                              NOP     SG$03270
//       SG$CVTHX  &TOT,STLOD3                                          SG$03280
//LOD3SZ JSET  &LOD3.//&BLKS                                            SG$03290
//TOT    JSET  &TOT+&LOD3SZ                                             SG$03300
//                                                              NOP     SG$03310
// SG$CVTHX    &TOT,VTOC                                                SG$03320
//TOT    JSET  &TOT.+&VTOCSZ                                            SG$03330
//                                                              NOP     SG$03340
// SG$CVTHX    &TOT,STTRA                                               SG$03350
//TRASZ  JSET  &TRA.//&TRNBLKS                                          SG$03360
//TOT    JSET  &TOT.+&TRASZ                                             SG$03370
//                                                              NOP     SG$03380
// SG$CVTHX    &TOT,STLOD1                                              SG$03390
//LOD1SZ JSET  &LOD1.//&BLKS                                            SG$03400
//TOT    JSET  &TOT.+&LOD1SZ                                            SG$03410
//                                                              NOP     SG$03420
//TOT    JSET  &TOT.+&RLBSZ                                             SG$03430
//                                                              NOP     SG$03440
//       SG$CVTHX  &TOT,STLOD2                                          SG$03450
//LOD2SZ JSET  &LOD2.//&BLKS                                            SG$03460
//TOT    JSET  &TOT+&LOD2SZ                                             SG$03470
//                                                              NOP     SG$03480
         END                                                            SG$03490
