DataMuseum.dk

Presents historical artifacts from the history of:

IBM System/36

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about IBM System/36

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦64d2c3619⟧

    Length: 22016 (0x5600)
    Notes: MEMBER_P, Member_Text
    Names: »CNENGL  «

Derivation

└─⟦c8ae05145⟧ Bits:30009820 AS/ENTRY - S/36 SYST SUPP PROG IDENT. S/36 PTFDK3900 FC 1991/9074/9084 Refer to Memo 36714 Product Number 5727SS6 Rel 05 5 Created 19950301 Level 01 Seq 001 of 011
    └─⟦ac51fb3f2⟧ 
        └─⟦this⟧ ».CNENGL  « 

Text Member

// LOCAL AREA-SYSTEM                                                            
// IF ?L'71,1'?/Y LOCAL AREA-SYSTEM,OFFSET-83,DATA-'1'                          
CONDENSE #LIBRARY                                                               
// LOCAL AREA-SYSTEM,OFFSET-62,DATA-'1'                                         
// IF ?L'236,1'?/1 GOTO S5364                                                   
// ALLOCATE UNIT-I1,AUTO-YES,CONTINUE-YES                                       
// IF ?L'60,1'?/1 GOTO SSP1                                                     
// IF ?L'83,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNSSP2            
// IF ?L'83,1'?/1 GOTO SSP2                                                     
// TAG RETSSP                                                                   
// DEALLOC UNIT-I1                                                              
// ALLOCATE UNIT-I1,AUTO-YES,CONTINUE-YES                                       
// IF ?L'63,1'?/1 GOTO PP1                                                      
// IF ?L'239,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR2           
// IF ?L'239,1'?/1 GOTO PP2                                                     
// TAG RETPP1                                                                   
// DEALLOC UNIT-I1                                                              
// ALLOCATE UNIT-I1,AUTO-YES,CONTINUE-YES                                       
// IF ?L'240,1'?/1 GOTO PP3                                                     
// IF ?L'231,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR4           
// IF ?L'231,1'?/1 GOTO PP4                                                     
// TAG RETPP3                                                                   
// DEALLOC UNIT-I1                                                              
// ALLOCATE UNIT-I1,AUTO-YES,CONTINUE-YES                                       
// IF ?L'229,1'?/1 GOTO PP5                                                     
// IF ?L'227,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR6           
// IF ?L'227,1'?/1 GOTO PP6                                                     
// TAG RETPP4                                                                   
// DEALLOC UNIT-I1                                                              
// ALLOCATE UNIT-I1,AUTO-YES,CONTINUE-YES                                       
// IF ?L'64,1'?/1 GOTO FEAT1                                                    
// IF ?L'232,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNFTR2           
// IF ?L'232,1'?/1 GOTO FEAT2                                                   
// TAG RETFEAT                                                                  
// DEALLOC UNIT-I1                                                              
// GOTO ENDENGL                                                                 
// TAG SSP1                                                                     
// IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNSSP1                           
// IF ?L'83,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNSSP2            
// IF ?L'11,1'?/A INSTNCOP HELPMRI,HELPMRI,5727-SS1,?L'273,1'?,11,1,02          
// IF ?L'59,1'?/A INSTPP STUP,DOCPILOD,5727-SS1,?L'415,1'?,59,1,07              
// IF ?L'58,1'?/A INSTNCOP STUBOBJ,STUBILOD,5727-SS1,?L'412,1'?,58,1,07         
// IF ?L'72,1'?/A INSTNCOP TPLOAD,TPILOD,5727-SS1,?L'319,1'?,72,1,07            
// IF ?L'70,1'?/A INSTNCOP TTLOAD,TTILOD,5727-SS1,?L'316,1'?,70,1,07            
// IF ?L'69,1'?/A INSTNCOP TMSLOAD,TMSILOD,5727-SS1,?L'313,1'?,69,1,08          
// IF ?L'47,1'?/A +                                                             
   INSTNCOP IDDULOAD,IDDUILOD,5727-SS1,?L'388,1'?,47,1,09                       
// IF ?L'47,1'?/B INSTNCOP IDDUMRI,IDDUMRI,5727-SS1,?L'387,1'?,47,1,09          
// DEALLOC UNIT-I1                                                              
// ALLOCATE UNIT-I1,AUTO-YES,CONTINUE-YES                                       
// IF ?L'59,1'?/B INSTNCOP STUPMRI,DOCPMRI,5727-SS1,?L'414,1'?,59,1,04          
// IF ?L'58,1'?/B INSTNCOP STUBMRI,STUBMRI,5727-SS1,?L'411,1'?,58,1,04          
// IF ?L'70,1'?/B INSTNCOP TTMRI,TTMRI,5727-SS1,?L'315,1'?,70,1,04              
// IF ?L'69,1'?/B INSTNCOP TMSMRI,TMSMRI,5727-SS1,?L'312,1'?,69,1,04            
// IF ?L'20,1'?/A INSTNCOP IDDOMRI,IDDOMRI,5727-SS1,?L'430,2'?,20,1,10          
// TAG SSP2                                                                     
// IFF ?L'83,1'?/1 GOTO RETSSP                                                  
// DEALLOC UNIT-I1                                                              
// ALLOCATE UNIT-I1,AUTO-YES,CONTINUE-YES                                       
// IF ?L'71,1'?/Y INSTNCOP #ONLPD,OLPDILOD,5727-SS1,?L'310,2'?,68,2,01          
// IF ?L'43,1'?/A INSTNCOP PD3.CCTL,BCPDILOD,5727-SS1,?L'358,2'?,43,2,01        
// GOTO RETSSP                                                                  
// TAG PP1                                                                      
// IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR1                           
// IF ?L'239,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR2           
// IF ?L'22,1'?/A INSTPP DFU,DFUILOD,5727-UT1,?L'283,2'?,22,1,01                
// IF ?L'23,1'?/A INSTPP WSU,WSUILOD,5727-UT1,?L'286,2'?,23,1,01                
// IF ?L'24,1'?/A INSTPP SEU,SEUILOD,5727-UT1,?L'289,2'?,24,1,01                
// IF ?L'25,1'?/A INSTPP SDA,SDAILOD,5727-UT1,?L'292,2'?,25,1,01                
// IF ?L'24,1'?/B INSTNCOP SEUMRI,SEUMRI,5727-UT1,?L'288,1'?,24,1,02            
// IF ?L'52,1'?/A INSTNCOP SEUFMRI,SEUFMRI,5727-UT1,?L'369,1'?,52,1,02          
// IF ?L'23,1'?/B INSTNCOP WSUMRI,WSUMRI,5727-UT1,?L'285,1'?,23,1,02            
// IF ?L'25,1'?/B INSTNCOP SDAMRI,SDAMRI,5727-UT1,?L'291,1'?,25,1,02            
// IF ?L'22,1'?/B INSTNCOP DFUMRI,DFUMRI,5727-UT1,?L'282,1'?,22,1,02            
// IF ?L'26,1'?/A INSTPP RPG,RPGILOD,5727-RG1,?L'295,2'?,26,1,03                
// IF ?L'26,1'?/B INSTNCOP RPGMRI,RPGMRI,5727-RG1,?L'294,1'?,26,1,03            
// IF ?L'29,1'?/A INSTPP COBOL,COBILOD,5727-CB1,?L'304,2'?,29,1,04              
// IF ?L'29,1'?/B INSTNCOP COBMRI,COBMRI,5727-CB1,?L'303,1'?,29,1,04            
// IF ?L'30,1'?/A INSTPP BASIC,BASILOD,5727-BA1,?L'307,2'?,30,1,05              
// IF ?L'30,1'?/B INSTNCOP BASMRI,BASMRI,5727-BA1,?L'306,1'?,30,1,05            
// IF ?L'51,1'?/A INSTNCOP BASHMRI,BASHMRI,5727-BA1,?L'372,1'?,51,1,05          
// IF ?L'28,1'?/A INSTPP FORTRAN,FORTILOD,5727-FO1,?L'301,2'?,28,1,06           
// IF ?L'28,1'?/B INSTNCOP FORTMRI,FORTMRI,5727-FO1,?L'300,1'?,28,1,06          
// IF ?L'27,1'?/A INSTPP ASM,ASMILOD,5727-AS1,?L'298,2'?,27,1,07                
// IF ?L'27,1'?/B INSTNCOP ASMMRI,ASMMRI,5727-AS1,?L'297,1'?,27,1,07            
// TAG PP2                                                                      
// IFF ?L'239,1'?/1 GOTO RETPP1                                                 
// IF ?L'18,1'?/A INSTPP TXT,TEXTILOD,5727-WP1,?L'379,2'?,18,2,01               
// IF ?L'18,1'?/B INSTNCOP TXTMRI,TEXTMRI,5727-WP1,?L'378,1'?,18,2,02           
// IFF DATAF1-#PRFFLDR +                                                        
   IF ?L'18,1'?/C INSTNCOP #PRFFLDR,WPOPMRI,5727-WP1,?L'421,2'?,18,2,03         
// IF ?L'12,1'?/A INSTNCOP WPDOCS,WPOMRI,5727-WP1,?L'421,2'?,12,2,03            
// IF ?L'53,1'?/A +                                                             
   INSTNCOP ENGMRI,ENGMRI,5727-WP2/FEAT-6038,?L'393,1'?,53,2,05                 
// IF ?L'73,1'?/A INSTPP BGU,BGUILOD,5727-BG1,?L'436,2'?,73,2,07                
// IF ?L'73,1'?/B INSTNCOP BGUMRI,BGUMRI,5727-BG1,?L'435,1'?,73,2,08            
// IF ?L'74,1'?/A INSTNCOP BGUHLP,BGUHMRI,5727-BG1,?L'438,1'?,74,2,08           
// IF ?L'106,1'?/A +                                                            
   INSTNCOP PORMRI,PORMRI,5727-WP2/FEAT-6393,?L'393,1'?,106,2,09                
// GOTO RETPP1                                                                  
// TAG PP3                                                                      
// IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR3                           
// IF ?L'231,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR4           
// IF ?L'17,1'?/A INSTPP OFC,OFCILOD,5727-WP3,?L'376,2'?,17,1,01                
// IF ?L'17,1'?/B INSTNCOP OFCMRI,OFCMRI,5727-WP3,?L'375,1'?,17,1,03            
// IF ?L'98,1'?/A INSTPP PROF,PROFILOD,5727-WP3,?L'478,2'?,98,1,04              
// IF ?L'13,1'?/A INSTNCOP OFCOMRI,OFCOMRI,5727-WP3,?L'424,2'?,13,1,05          
// IF ?L'76,1'?/A INSTNCOP DLSLIB,DLSILOD,5727-WP3,?L'466,2'?,76,1,07           
// IF ?L'76,1'?/B INSTNCOP DLSMRI,DLSMRI,5727-WP3,?L'465,1'?,76,1,07            
// IF ?L'90,1'?/A INSTNCOP #DLSFLDR,DLSOMRI,5727-WP3,?L'468,1'?,90,1,08         
// TAG PP4                                                                      
// IFF ?L'231,1'?/1 GOTO RETPP3                                                 
// IF ?L'75,1'?/A INSTPP DSU,DSUILOD,5727-DS1,?L'442,2'?,75,2,01                
// IF ?L'75,1'?/B INSTNCOP DSUMRI,DSUMRI,5727-DS1,?L'441,1'?,75,2,01            
// IF ?L'77,1'?/A INSTNCOP DSUOMRI,DSUOMRI,5727-DS1,?L'447,1'?,77,2,03          
// IF ?L'19,1'?/A INSTPP QRY,QRYILOD,5727-QU1,?L'382,2'?,19,2,04                
// IF ?L'19,1'?/B INSTNCOP QRYMRI,QRYMRI,5727-QU1,?L'381,1'?,19,2,04            
// IF ?L'14,1'?/A INSTNCOP QRYOMRI,QRYOMRI,5727-QU1,?L'427,2'?,14,2,05          
// GOTO RETPP3                                                                  
// TAG PP5                                                                      
// IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR5                           
// IF ?L'227,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNPPR6           
// IF ?L'87,1'?/A +                                                             
   INSTNCOP DUTMRI,DUTMRI,5727-WP2/FEAT-6128,?L'393,1'?,87,1,01                 
// IF ?L'88,1'?/A +                                                             
  INSTNCOP ICEMRI,ICEMRI,5727-WP2/FEAT-6127,?L'393,1'?,88,1,02                  
// IF ?L'54,1'?/A +                                                             
   INSTNCOP FRNMRI,FRNMRI,5727-WP2/FEAT-6039,?L'393,1'?,54,1,03                 
// IF ?L'49,1'?/A +                                                             
   INSTNCOP FRCMRI,FRCMRI,5727-WP2/FEAT-6040,?L'393,1'?,49,1,04                 
// IF ?L'55,1'?/A +                                                             
   INSTNCOP SPNMRI,SPNMRI,5727-WP2/FEAT-6041,?L'393,1'?,55,1,05                 
// IF ?L'56,1'?/A +                                                             
   INSTNCOP ITLMRI,ITLMRI,5727-WP2/FEAT-6042,?L'393,1'?,56,1,06                 
// IF ?L'57,1'?/A +                                                             
   INSTNCOP DANMRI,DANMRI,5727-WP2/FEAT-6043,?L'393,1'?,57,1,07                 
// IF ?L'78,1'?/A +                                                             
   INSTNCOP GERMRI,GERMRI,5727-WP2/FEAT-6053,?L'393,1'?,78,1,08                 
// IF ?L'85,1'?/A +                                                             
   INSTNCOP NORMRI,NORMRI,5727-WP2/FEAT-6125,?L'393,1'?,85,1,09                 
// IF ?L'86,1'?/A +                                                             
   INSTNCOP SWEMRI,SWEMRI,5727-WP2/FEAT-6126,?L'393,1'?,86,1,10                 
// TAG PP6                                                                      
// IFF ?L'227,1'?/1 GOTO RETPP4                                                 
// IF ?L'34,1'?/A INSTPP IWS,IWILOD,5727-WS1,?L'418,2'?,34,2,01                 
// IF ?L'96,1'?/A +                                                             
   INSTPP SHRF,SHRFILOD,5727-WS1,?L'499,2'?,96,2,02                             
// IF ?L'94,1'?/A +                                                             
   INSTPP PCO,PCOILOD,5727-WS1,?L'502,2'?,94,2,02                               
// IF ?L'102,1'?/A +                                                            
   INSTPP LRTR,LRTRILOD,5727-WS1,?L'481,2'?,102,2,02                            
// IF ?L'103,1'?/A +                                                            
   INSTPP IWPT,IWPTILOD,5727-WS1,?L'487,2'?,103,2,02                            
// IF ?L'34,1'?/B INSTNCOP IWMRI,IWMRI,5727-WS1,?L'417,1'?,34,2,02              
// IF ?L'96,1'?/B +                                                             
   INSTNCOP SHRFMRI,SHRFMRI,5727-WS1,?L'498,1'?,96,2,02                         
// IF ?L'94,1'?/B +                                                             
   INSTNCOP PCOMRI,PCOMRI,5727-WS1,?L'501,1'?,94,2,02                           
// IF ?L'97,1'?/A +                                                             
   INSTNCOP SHRFOMRI,SHRFOMRI,5727-WS1,?L'507,1'?,97,2,03                       
// IF ?L'91,1'?/A +                                                             
   INSTNCOP IWILODX,IWILODX,5727-WS1/FEAT-6143,?L'492,1'?,91,2,04               
// IF ?L'104,1'?/A +                                                            
   INSTPP WSF,WSFILOD,5727-WS1/FEAT-6248,?L'484,2'?,104,2,05                    
// IF ?L'104,1'?/B +                                                            
   INSTNCOP WSFMRI,WSFMRI,5727-WS1/FEAT-6248,?L'483,1'?,104,2,05                
// GOTO RETPP4                                                                  
// TAG FEAT1                                                                    
// IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNFTR1                           
// IF ?L'232,1'?/1 IF ?L'61,1'?/1 PROMPT MEMBER-##FCFGP,FORMAT-CNFTR2           
// IF ?L'21,1'?/A +                                                             
   INSTNCOP XSSPLOAD,XSSPILOD,5727-SS1/FEAT-6101,?L'280,2'?,21,1,01             
// IF ?L'21,1'?/B +                                                             
   INSTNCOP XSSPMRI,XSSPMRI,5727-SS1/FEAT-6101,?L'279,1'?,21,1,01               
// IF ?L'92,1'?/A +                                                             
   INSTNCOP MNCSMRI,MNCSMRI,5727-SS1/FEAT-6101,?L'504,1'?,92,1,01               
// IF ?L'31,1'?/A +                                                             
   INSTNCOP COMMBASE,BCOMILOD,5727-SS1/FEAT-6001,?L'322,2'?,31,1,02             
// IF ?L'31,1'?/B +                                                             
   INSTNCOP BCOMMRI,BCOMMRI,5727-SS1/FEAT-6001,?L'321,1'?,31,1,02               
// IF ?L'81,1'?/A +                                                             
   INSTNCOP ASYNCLIB,ASYNILOD,5727-SS1/FEAT-6001,?L'457,2'?,81,1,02             
// IF ?L'81,1'?/B +                                                             
   INSTNCOP ASYNCMRI,ASYNMRI,5727-SS1/FEAT-6001,?L'456,1'?,81,1,02              
// IF ?L'44,1'?/A +                                                             
   INSTNCOP X25LOAD,X25ILOD,5727-SS1/FEAT-6001,?L'352,2'?,44,1,02               
// IF ?L'44,1'?/B +                                                             
   INSTNCOP X25MRI,X25MRI,5727-SS1/FEAT-6001,?L'351,1'?,44,1,02                 
// IF ?L'32,1'?/A +                                                             
   INSTNCOP COMMICF,CICFILOD,5727-SS1/FEAT-6001,?L'325,2'?,32,1,03              
// IF ?L'32,1'?/B +                                                             
   INSTNCOP CICFMRI,CICFMRI,5727-SS1/FEAT-6001,?L'324,1'?,32,1,03               
// IF ?L'35,1'?/A +                                                             
   INSTPP EMB3270,EMBILOD,5727-SS1/FEAT-6003,?L'334,2'?,35,1,04                 
// IF ?L'35,1'?/B +                                                             
   INSTNCOP EMBMRI,EMBMRI,5727-SS1/FEAT-6003,?L'333,1'?,35,1,04                 
// IF ?L'36,1'?/A +                                                             
   INSTPP ES3270,EMSILOD,5727-SS1/FEAT-6003,?L'337,2'?,36,1,04                  
// IF ?L'36,1'?/B +                                                             
   INSTNCOP EMSMRI,EMSMRI,5727-SS1/FEAT-6003,?L'336,1'?,36,1,04                 
// IF ?L'79,1'?/A +                                                             
   INSTNCOP ETMODS,ETILOD,5727-EP1,?L'460,2'?,79,1,05                           
// IF ?L'79,1'?/B +                                                             
   INSTNCOP ETMRI,ETMRI,5727-EP1,?L'459,1'?,79,1,05                             
// IF ?L'33,1'?/A +                                                             
   INSTNCOP RJELOAD,RJEILOD,5727-SS1/FEAT-6004,?L'328,2'?,33,1,06               
// IF ?L'33,1'?/B +                                                             
   INSTNCOP RJEMRI,RJEMRI,5727-SS1/FEAT-6004,?L'327,1'?,33,1,06                 
// IF ?L'40,1'?/A +                                                             
   INSTNCOP DESLOAD,DESILOD,5727-SS1/FEAT-6005,?L'349,2'?,40,1,07               
// IF ?L'66,1'?/A +                                                             
   INSTNCOP DDFFLOAD,DDFFILOD,5727-SS1/FEAT-6006,?L'331,2'?,66,1,08             
// IF ?L'45,1'?/A +                                                             
   INSTNCOP DSXLOAD,DSXILOD,5727-SS1/FEAT-6029,?L'361,2'?,45,1,09               
// IF ?L'45,1'?/B +                                                             
   INSTNCOP DSXMRI,DSXMRI,5727-SS1/FEAT-6029,?L'360,1'?,45,1,09                 
// IF ?L'46,1'?/A +                                                             
   INSTNCOP ALRTLOAD,ALRTILOD,5727-SS1/FEAT-6029,?L'385,2'?,46,1,09             
// IF ?L'46,1'?/B +                                                             
   INSTNCOP ALRTMRI,ALRTMRI,5727-SS1/FEAT-6029,?L'384,1'?,46,1,09               
// IF ?L'80,1'?/A +                                                             
   INSTNCOP DHCFLOAD,DHCFILOD,5727-SS1/FEAT-6029,?L'463,2'?,80,1,09             
// IF ?L'80,1'?/B +                                                             
   INSTNCOP DHCFMRI,DHCFMRI,5727-SS1/FEAT-6029,?L'462,1'?,80,1,09               
// TAG FEAT2                                                                    
// IFF ?L'232,1'?/1 GOTO RETFEAT                                                
// IF ?L'82,1'?/A +                                                             
   INSTNCOP DPTLOAD,DPTILOD,5727-SS1/FEAT-6079,?L'454,2'?,82,2,01               
// IF ?L'82,1'?/B +                                                             
   INSTNCOP DPTMRI,DPTMRI,5727-SS1/FEAT-6079,?L'453,1'?,82,2,01                 
// IF ?L'48,1'?/A +                                                             
   INSTNCOP DDMLOAD,DDMILOD,5727-SS1/FEAT-6037,?L'391,2'?,48,2,02               
// IF ?L'48,1'?/B +                                                             
   INSTNCOP DDMMRI,DDMMRI,5727-SS1/FEAT-6037,?L'390,1'?,48,2,02                 
// IF ?L'41,1'?/A +                                                             
   INSTNCOP TAPE,TAPILOD,5727-SS1/FEAT-6102,?L'277,2'?,41,2,03                  
// IF ?L'42,1'?/A +                                                             
 INSTNCOP PD2.TCTL,TPPDILOD,5727-SS1/FEAT-6102,?L'355,1'?,42,2,03               
// IF ?L'37,1'?/A +                                                             
   INSTNCOP ICFBASE,ICFBILOD,5727-SS1/FEAT-6266,?L'340,2'?,37,2,04              
// IF ?L'38,1'?/A +                                                             
   INSTNCOP ICFUPLN,UPLNILOD,5727-SS1/FEAT-6264,?L'343,2'?,38,2,05              
// IF ?L'39,1'?/A +                                                             
   INSTNCOP ICFFIN,FINILOD,5727-SS1/FEAT-6265,?L'346,2'?,39,2,06                
// IF ?L'89,1'?/A +                                                             
   INSTNCOP LENLOAD,LENILOD,5727-SS1/FEAT-6096,?L'472,2'?,89,2,07               
// IF ?L'89,1'?/B +                                                             
   INSTNCOP LENMRI,LENMRI,5727-SS1/FEAT-6096,?L'471,1'?,89,2,07                 
// IF ?L'84,1'?/A +                                                             
   INSTPP LAN,LANILOD,5727-LC1,?L'475,2'?,84,2,08                               
// IF ?L'84,1'?/C +                                                             
   INSTNCOP PD4.LCTL,LNPDILOD,5727-LC1,?L'490,1'?,84,2,08                       
// IF ?L'95,1'?/A +                                                             
   INSTPP SWD,SWDILOD,5727-SS1/FEAT-6275,?L'511,2'?,95,2,09                     
// IF ?L'95,1'?/B +                                                             
   INSTNCOP SWDMRI,SWDMRI,5727-SS1/FEAT-6275,?L'510,1'?,95,2,10                 
// IFF ?L'228,1'?/1 GOTO RETFEAT                                                
// IFF ?L'93,1'?/A GOTO RETFEAT                                                 
// IF DATAF1-#PSPTITL IF DATAF1-PD1.SCRN IF DATAF1-PD1.SCR2 +                   
 IF DATAF1-PD1.CTRL IF DATAF1-#ONLPD GOTO LOADDIS                               
// INSTNCOP #ONLPD,OLPDILOD,5727-SS1,?L'310,2'?,68,2,01                         
// TAG LOADDIS                                                                  
// IF ?L'93,1'?/A +                                                             
   INSTPP DIS,DISILOD,5727-SS1/FEAT-6267,?L'495,1'?,93,2,09                     
// IF ?L'93,1'?/B +                                                             
   INSTNCOP PD5.DCTL,DNPDILOD,5727-SS1/FEAT-6267,?L'495,2'?,93,2,09             
// GOTO RETFEAT                                                                 
// TAG ENDENGL                                                                  
// RETURN                                                                       
// TAG S5364                                                                    
// ALLOCATE UNIT-I1,AUTO-YES,CONTINUE-YES                                       
// IF ?L'60,1'?/1 GOTO DSSP1                                                    
// IF ?L'83,1'?/1 GOTO DSSP2                                                    
// TAG DRETSSP                                                                  
// IF ?L'63,1'?/1 GOTO DPP1                                                     
// IF ?L'239,1'?/1 GOTO DPP2                                                    
// TAG DRETPP1                                                                  
// IF ?L'240,1'?/1 GOTO DPP3                                                    
// IF ?L'231,1'?/1 GOTO DPP4                                                    
// TAG DRETPP3                                                                  
// IF ?L'229,1'?/1 GOTO DPP5                                                    
// IF ?L'227,1'?/1 GOTO DPP6                                                    
// TAG DRETPP4                                                                  
// IF ?L'64,1'?/1 GOTO DFEAT1                                                   
// IF ?L'232,1'?/1 GOTO DFEAT2                                                  
// TAG DRETFEAT                                                                 
// GOTO END5364                                                                 
// RETURN                                                                       
// TAG DSSP1                                                                    
// IF ?L'11,1'?/A INSTNCOP HELPMRI,HELPMRI,5727-SS6,?L'273,1'?,11,1,01          
// IF ?L'59,1'?/A INSTPP STUP,DOCPILOD,5727-SS6,?L'415,1'?,59,1,01              
// IF ?L'58,1'?/A INSTNCOP STUBOBJ,STUBILOD,5727-SS6,?L'412,1'?,58,1,01         
// IF ?L'72,1'?/A INSTNCOP TPLOAD,TPILOD,5727-SS6,?L'319,1'?,72,1,01            
// IF ?L'70,1'?/A INSTNCOP TTLOAD,TTILOD,5727-SS6,?L'316,1'?,70,1,01            
// IF ?L'69,1'?/A INSTNCOP TMSLOAD,TMSILOD,5727-SS6,?L'313,1'?,69,1,01          
// IF ?L'47,1'?/A +                                                             
   INSTNCOP IDDULOAD,IDDUILOD,5727-SS6,?L'388,1'?,47,1,01                       
// IF ?L'47,1'?/B INSTNCOP IDDUMRI,IDDUMRI,5727-SS6,?L'387,1'?,47,1,01          
// IF ?L'59,1'?/B INSTNCOP STUPMRI,DOCPMRI,5727-SS6,?L'414,1'?,59,1,01          
// IF ?L'58,1'?/B INSTNCOP STUBMRI,STUBMRI,5727-SS6,?L'411,1'?,58,1,01          
// IF ?L'70,1'?/B INSTNCOP TTMRI,TTMRI,5727-SS6,?L'315,1'?,70,1,01              
// IF ?L'69,1'?/B INSTNCOP TMSMRI,TMSMRI,5727-SS6,?L'312,1'?,69,1,01            
// IF ?L'20,1'?/A INSTNCOP IDDOMRI,IDDOMRI,5727-SS6,?L'430,2'?,20,1,01          
// TAG DSSP2                                                                    
// IFF ?L'83,1'?/1 GOTO DRETSSP                                                 
// IF ?L'71,1'?/Y INSTNCOP #ONLPD,OLPDILOD,5727-SS6,?L'310,2'?,68,2,01          
// IF ?L'43,1'?/A INSTNCOP PD3.CCTL,BCPDILOD,5727-SS6,?L'358,2'?,43,2,01        
// GOTO DRETSSP                                                                 
// TAG DPP1                                                                     
// IF ?L'22,1'?/A INSTPP DFU,DFUILOD,5727-UT6,?L'283,2'?,22,1,01                
// IF ?L'23,1'?/A INSTPP WSU,WSUILOD,5727-UT6,?L'286,2'?,23,1,01                
// IF ?L'24,1'?/A INSTPP SEU,SEUILOD,5727-UT6,?L'289,2'?,24,1,01                
// IF ?L'25,1'?/A INSTPP SDA,SDAILOD,5727-UT6,?L'292,2'?,25,1,01                
// IF ?L'24,1'?/B INSTNCOP SEUMRI,SEUMRI,5727-UT6,?L'288,1'?,24,1,01            
// IF ?L'52,1'?/A INSTNCOP SEUFMRI,SEUFMRI,5727-UT6,?L'369,1'?,52,1,01          
// IF ?L'23,1'?/B INSTNCOP WSUMRI,WSUMRI,5727-UT6,?L'285,1'?,23,1,01            
// IF ?L'25,1'?/B INSTNCOP SDAMRI,SDAMRI,5727-UT6,?L'291,1'?,25,1,01            
// IF ?L'22,1'?/B INSTNCOP DFUMRI,DFUMRI,5727-UT6,?L'282,1'?,22,1,01            
// IF ?L'26,1'?/A INSTPP RPG,RPGILOD,5727-RG6,?L'295,2'?,26,1,01                
// IF ?L'26,1'?/B INSTNCOP RPGMRI,RPGMRI,5727-RG6,?L'294,1'?,26,1,01            
// IF ?L'29,1'?/A INSTPP COBOL,COBILOD,5727-CB6,?L'304,2'?,29,1,01              
// IF ?L'29,1'?/B INSTNCOP COBMRI,COBMRI,5727-CB6,?L'303,1'?,29,1,01            
// IF ?L'30,1'?/A INSTPP BASIC,BASILOD,5727-BA6,?L'307,2'?,30,1,01              
// IF ?L'30,1'?/B INSTNCOP BASMRI,BASMRI,5727-BA6,?L'306,1'?,30,1,01            
// IF ?L'51,1'?/A INSTNCOP BASHMRI,BASHMRI,5727-BA6,?L'372,1'?,51,1,01          
// IF ?L'28,1'?/A INSTPP FORTRAN,FORTILOD,5727-FO6,?L'301,2'?,28,1,01           
// IF ?L'28,1'?/B INSTNCOP FORTMRI,FORTMRI,5727-FO6,?L'300,1'?,28,1,01          
// IF ?L'27,1'?/A INSTPP ASM,ASMILOD,5727-AS6,?L'298,2'?,27,1,01                
// IF ?L'27,1'?/B INSTNCOP ASMMRI,ASMMRI,5727-AS6,?L'297,1'?,27,1,01            
// TAG DPP2                                                                     
// IFF ?L'239,1'?/1 GOTO DRETPP1                                                
// IF ?L'18,1'?/A INSTPP TXT,TEXTILOD,5727-WP6,?L'379,2'?,18,2,01               
// IF ?L'18,1'?/B INSTNCOP TXTMRI,TEXTMRI,5727-WP6,?L'378,1'?,18,2,01           
// IF ?L'18,1'?/C INSTNCOP #PRFFLDR,WPOPMRI,5727-WP6,?L'421,2'?,18,2,01         
// IF ?L'12,1'?/A INSTNCOP WPDOCS,WPOMRI,5727-WP6,?L'421,2'?,12,2,01            
// IF ?L'53,1'?/A +                                                             
   INSTNCOP ENGMRI,ENGMRI,5727-WP7/FEAT-6067,?L'393,1'?,53,2,01                 
// IF ?L'73,1'?/A INSTPP BGU,BGUILOD,5727-BG6,?L'436,2'?,73,2,01                
// IF ?L'73,1'?/B INSTNCOP BGUMRI,BGUMRI,5727-BG6,?L'435,1'?,73,2,01            
// IF ?L'74,1'?/A INSTNCOP BGUHLP,BGUHMRI,5727-BG6,?L'438,1'?,74,2,01           
// IF ?L'106,1'?/A +                                                            
   INSTNCOP PORMRI,PORMRI,5727-WP7/FEAT-6391,?L'393,1'?,106,2,1                 
// GOTO DRETPP1                                                                 
// TAG DPP3                                                                     
// IF ?L'17,1'?/A INSTPP OFC,OFCILOD,5727-WP8,?L'376,2'?,17,1,01                
// IF ?L'17,1'?/B INSTNCOP OFCMRI,OFCMRI,5727-WP8,?L'375,1'?,17,1,01            
// IF ?L'98,1'?/A INSTPP PROF,PROFILOD,5727-WP8,?L'478,2'?,98,1,01              
// IF ?L'13,1'?/A INSTNCOP OFCOMRI,OFCOMRI,5727-WP8,?L'424,2'?,13,1,01          
// IF ?L'76,1'?/A INSTNCOP DLSLIB,DLSILOD,5727-WP8,?L'466,2'?,76,1,01           
// IF ?L'76,1'?/B INSTNCOP DLSMRI,DLSMRI,5727-WP8,?L'465,1'?,76,1,01            
// IF ?L'90,1'?/A INSTNCOP #DLSFLDR,DLSOMRI,5727-WP8,?L'468,1'?,90,1,01         
// TAG DPP4                                                                     
// IFF ?L'231,1'?/1 GOTO DRETPP3                                                
// IF ?L'75,1'?/A INSTPP DSU,DSUILOD,5727-DS6,?L'442,2'?,75,2,01                
// IF ?L'75,1'?/B INSTNCOP DSUMRI,DSUMRI,5727-DS6,?L'441,1'?,75,2,01            
// IF ?L'77,1'?/A INSTNCOP DSUOMRI,DSUOMRI,5727-DS6,?L'447,1'?,77,2,01          
// IF ?L'19,1'?/A INSTPP QRY,QRYILOD,5727-QU6,?L'382,2'?,19,2,01                
// IF ?L'19,1'?/B INSTNCOP QRYMRI,QRYMRI,5727-QU6,?L'381,1'?,19,2,01            
// IF ?L'14,1'?/A INSTNCOP QRYOMRI,QRYOMRI,5727-QU6,?L'427,2'?,14,2,01          
// GOTO DRETPP3                                                                 
// TAG DPP5                                                                     
// IF ?L'87,1'?/A +                                                             
   INSTNCOP DUTMRI,DUTMRI,5727-WP7/FEAT-6257,?L'393,1'?,87,1,01                 
// IF ?L'88,1'?/A +                                                             
  INSTNCOP ICEMRI,ICEMRI,5727-WP7/FEAT-6258,?L'393,1'?,88,1,01                  
// IF ?L'54,1'?/A +                                                             
   INSTNCOP FRNMRI,FRNMRI,5727-WP7/FEAT-6068,?L'393,1'?,54,1,01                 
// IF ?L'49,1'?/A +                                                             
   INSTNCOP FRCMRI,FRCMRI,5727-WP7/FEAT-6069,?L'393,1'?,49,1,01                 
// IF ?L'55,1'?/A +                                                             
   INSTNCOP SPNMRI,SPNMRI,5727-WP7/FEAT-6070,?L'393,1'?,55,1,01                 
// IF ?L'56,1'?/A +                                                             
   INSTNCOP ITLMRI,ITLMRI,5727-WP7/FEAT-6071,?L'393,1'?,56,1,01                 
// IF ?L'57,1'?/A +                                                             
   INSTNCOP DANMRI,DANMRI,5727-WP7/FEAT-6072,?L'393,1'?,57,1,01                 
// IF ?L'78,1'?/A +                                                             
   INSTNCOP GERMRI,GERMRI,5727-WP7/FEAT-6073,?L'393,1'?,78,1,01                 
// IF ?L'85,1'?/A +                                                             
   INSTNCOP NORMRI,NORMRI,5727-WP7/FEAT-6259,?L'393,1'?,85,1,01                 
// IF ?L'86,1'?/A +                                                             
   INSTNCOP SWEMRI,SWEMRI,5727-WP7/FEAT-6260,?L'393,1'?,86,1,01                 
// TAG DPP6                                                                     
// IFF ?L'227,1'?/1 GOTO DRETPP4                                                
// IF ?L'34,1'?/A +                                                             
   INSTPP IWS,IWILOD,5727-WS6/FEAT-9074,?L'418,2'?,34,2,01                      
// IF ?L'96,1'?/A +                                                             
   INSTPP SHRF,SHRFILOD,5727-WS6/FEAT-9074,?L'499,2'?,96,2,01                   
// IF ?L'94,1'?/A +                                                             
   INSTPP PCO,PCOILOD,5727-WS6/FEAT-9074,?L'502,2'?,94,2,01                     
// IF ?L'102,1'?/A +                                                            
   INSTPP LRTR,LRTRILOD,5727-WS6/FEAT-9074,?L'481,2'?,102,2,01                  
// IF ?L'103,1'?/A +                                                            
   INSTPP IWPT,IWPTILOD,5727-WS6/FEAT-9074,?L'487,2'?,103,2,01                  
// IF ?L'34,1'?/B +                                                             
   INSTNCOP IWMRI,IWMRI,5727-WS6/FEAT-9074,?L'417,1'?,34,2,01                   
// IF ?L'96,1'?/B +                                                             
   INSTNCOP SHRFMRI,SHRFMRI,5727-WS6/FEAT-9074,?L'498,1'?,96,2,01               
// IF ?L'94,1'?/B +                                                             
   INSTNCOP PCOMRI,PCOMRI,5727-WS6/FEAT-9074,?L'501,1'?,94,2,01                 
// IF ?L'97,1'?/A +                                                             
   INSTNCOP SHRFOMRI,SHRFOMRI,5727-WS6/FEAT-9074,?L'507,1'?,97,2,01             
// IF ?L'91,1'?/A +                                                             
   INSTNCOP IWILODX,IWILODX,5727-WS6/FEAT-6142,?L'492,1'?,91,2,01               
// IF ?L'104,1'?/A +                                                            
   INSTPP WSF,WSFILOD,5727-WS6/FEAT-6181,?L'484,2'?,104,2,01                    
// IF ?L'104,1'?/B +                                                            
   INSTNCOP WSFMRI,WSFMRI,5727-WS6/FEAT-6181,?L'483,1'?,104,2,01                
// GOTO DRETPP4                                                                 
// TAG DFEAT1                                                                   
// IF ?L'31,1'?/A +                                                             
   INSTNCOP COMMBASE,BCOMILOD,5727-SS6/FEAT-6047,?L'322,2'?,31,1,01             
// IF ?L'31,1'?/B +                                                             
   INSTNCOP BCOMMRI,BCOMMRI,5727-SS6/FEAT-6047,?L'321,1'?,31,1,01               
// IF ?L'81,1'?/A +                                                             
   INSTNCOP ASYNCLIB,ASYNILOD,5727-SS6/FEAT-6047,?L'457,2'?,81,1,01             
// IF ?L'81,1'?/B +                                                             
   INSTNCOP ASYNCMRI,ASYNMRI,5727-SS6/FEAT-6047,?L'456,1'?,81,1,01              
// IF ?L'44,1'?/A +                                                             
   INSTNCOP X25LOAD,X25ILOD,5727-SS6/FEAT-6047,?L'352,2'?,44,1,01               
// IF ?L'44,1'?/B +                                                             
   INSTNCOP X25MRI,X25MRI,5727-SS6/FEAT-6047,?L'351,1'?,44,1,01                 
// IF ?L'32,1'?/A +                                                             
   INSTNCOP COMMICF,CICFILOD,5727-SS6/FEAT-6047,?L'325,2'?,32,1,01              
// IF ?L'32,1'?/B +                                                             
   INSTNCOP CICFMRI,CICFMRI,5727-SS6/FEAT-6047,?L'324,1'?,32,1,01               
// IF ?L'35,1'?/A +                                                             
   INSTPP EMB3270,EMBILOD,5727-SS6/FEAT-6049,?L'334,2'?,35,1,01                 
// IF ?L'35,1'?/B +                                                             
   INSTNCOP EMBMRI,EMBMRI,5727-SS6/FEAT-6049,?L'333,1'?,35,1,01                 
// IF ?L'36,1'?/A +                                                             
   INSTPP ES3270,EMSILOD,5727-SS6/FEAT-6049,?L'337,2'?,36,1,01                  
// IF ?L'36,1'?/B +                                                             
   INSTNCOP EMSMRI,EMSMRI,5727-SS6/FEAT-6049,?L'336,1'?,36,1,01                 
// IF ?L'79,1'?/A +                                                             
   INSTNCOP ETMODS,ETILOD,5727-EP6,?L'460,2'?,79,1,01                           
// IF ?L'79,1'?/B +                                                             
   INSTNCOP ETMRI,ETMRI,5727-EP6,?L'459,1'?,79,1,01                             
// IF ?L'33,1'?/A +                                                             
   INSTNCOP RJELOAD,RJEILOD,5727-SS6/FEAT-6050,?L'328,2'?,33,1,01               
// IF ?L'33,1'?/B +                                                             
   INSTNCOP RJEMRI,RJEMRI,5727-SS6/FEAT-6050,?L'327,1'?,33,1,01                 
// IF ?L'45,1'?/A +                                                             
   INSTNCOP DSXLOAD,DSXILOD,5727-SS6/FEAT-6051,?L'361,2'?,45,1,01               
// IF ?L'45,1'?/B +                                                             
   INSTNCOP DSXMRI,DSXMRI,5727-SS6/FEAT-6051,?L'360,1'?,45,1,01                 
// IF ?L'46,1'?/A +                                                             
   INSTNCOP ALRTLOAD,ALRTILOD,5727-SS6/FEAT-6051,?L'385,2'?,46,1,01             
// IF ?L'46,1'?/B +                                                             
   INSTNCOP ALRTMRI,ALRTMRI,5727-SS6/FEAT-6051,?L'384,1'?,46,1,01               
// IF ?L'80,1'?/A +                                                             
   INSTNCOP DHCFLOAD,DHCFILOD,5727-SS6/FEAT-6051,?L'463,2'?,80,1,01             
// IF ?L'80,1'?/B +                                                             
   INSTNCOP DHCFMRI,DHCFMRI,5727-SS6/FEAT-6051,?L'462,1'?,80,1,01               
// TAG DFEAT2                                                                   
// IFF ?L'232,1'?/1 GOTO DRETFEAT                                               
// IF ?L'82,1'?/A +                                                             
   INSTNCOP DPTLOAD,DPTILOD,5727-SS6/FEAT-6090,?L'454,2'?,82,2,01               
// IF ?L'82,1'?/B +                                                             
   INSTNCOP DPTMRI,DPTMRI,5727-SS6/FEAT-6090,?L'453,1'?,82,2,01                 
// IF ?L'48,1'?/A +                                                             
   INSTNCOP DDMLOAD,DDMILOD,5727-SS6/FEAT-6052,?L'391,2'?,48,2,01               
// IF ?L'48,1'?/B +                                                             
   INSTNCOP DDMMRI,DDMMRI,5727-SS6/FEAT-6052,?L'390,1'?,48,2,01                 
// IF ?L'41,1'?/A +                                                             
   INSTNCOP TAPE,TAPILOD,5727-SS6/FEAT-6144,?L'277,2'?,41,2,01                  
// IF ?L'42,1'?/A +                                                             
 INSTNCOP PD2.TCTL,TPPDILOD,5727-SS6/FEAT-6144,?L'355,1'?,42,2,01               
// IF ?L'37,1'?/A +                                                             
   INSTNCOP ICFBASE,ICFBILOD,5727-SS6/FEAT-6268,?L'340,2'?,37,1,01              
// IF ?L'38,1'?/A +                                                             
   INSTNCOP ICFUPLN,UPLNILOD,5727-SS6/FEAT-6270,?L'343,2'?,38,1,01              
// IF ?L'39,1'?/A +                                                             
   INSTNCOP ICFFIN,FINILOD,5727-SS6/FEAT-6272,?L'346,2'?,39,1,01                
// IF ?L'89,1'?/A +                                                             
   INSTNCOP LENLOAD,LENILOD,5727-SS6/FEAT-6256,?L'472,2'?,89,2,01               
// IF ?L'89,1'?/B +                                                             
   INSTNCOP LENMRI,LENMRI,5727-SS6/FEAT-6256,?L'471,1'?,89,2,01                 
// IF ?L'84,1'?/A +                                                             
   INSTPP LAN,LANILOD,5727-LC6,?L'475,2'?,84,2,01                               
// IF ?L'84,1'?/C +                                                             
   INSTNCOP PD4.LCTL,LNPDILOD,5727-LC6,?L'490,1'?,84,2,01                       
// IF ?L'95,1'?/A +                                                             
   INSTPP SWD,SWDILOD,5727-SS6/FEAT-6274,?L'511,2'?,95,2,01                     
// IF ?L'95,1'?/B +                                                             
   INSTNCOP SWDMRI,SWDMRI,5727-SS6/FEAT-6274,?L'510,1'?,95,2,01                 
// TAG END5364                                                                  
// DEALLOC UNIT-I1                                                              
// RETURN                                                                       

Full view