DataMuseum.dk

Presents historical artifacts from the history of:

IBM System/3

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

See our Wiki for more about IBM System/3

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦072e9ddaa⟧ s3xseg

    Length: 3048 (0xbe8)
    Types: s3xseg
    Names: »S$SGPCH«

Derivation

└─⟦d025fa538⟧ Bits:30009183 5702-sc1.V16.2
    └─⟦cfce0a73a⟧ 
        └─⟦this⟧ »S$SGPCH« 
└─⟦34f897e8c⟧ Bits:30009186 5702-sc1.V16.scp
    └─⟦e1bdf435f⟧ 
        └─⟦this⟧ »S$SGPCH« 

TextSegment

// NOHALT                                                                                       
// CALL $SGINT,R1                 INITIALIZE F1                                                 
// RUN                                                                                          
*     BE SURE THE SYSTEM CONFIGURATION STATEMENTS HAVE BEEN MODIFIED BEFORE                     
*     CONTINUING.                                                                               
*                                                                                               
***   SET RIGHTMOST ADDRESS/DATA SWITCH TO 0,                                                   
*     PRESS CONSOLE START --HALT/RESET IF YOU HAVE DPF SYSTEM-- TO CONTINUE.                    
// PAUSE                                                                                        
// CALL $SGEN,R1                   PROCESS THE SYSTEM CONFIGURATION STATEMENTS                  
// RUN                                                                                          
       $DCOR CORE-12K             --16K OR 24K OR 32K OR 48K OR 64K--                           
       $DDPF DPF-NO               --YES--                                                       
       $DISK DISKS-'R1,F1'        --'R1,F1,R2' OR 'R1,F1,R2,F2'--                               
       $DDSK D5445-NO             --D1 OR 'D1,D2'--                                             
       $DD48 D5448-NO             --YES--                                                       
       $DTUN TAPES-NO             --T1 OR 'T1,T2' OR 'T1,T2,T3' OR 'T1,T2,T3,T4'                
       $DTDN DUALDN-NO            --T1 OR T2 OR T3 OR T4 OR  ..... 'T1,T2,T3,T4'                
       $DTRK TRACK7-NO            --T1 OR T2 OR T3 OR T4 OR  ..... 'T1,T2,T3,T4'                
       $DATE DATE-MDY             --DMY--                                                       
       $DPRN PRINT-5203           --1403--                                                      
       $DWID WIDTH-96             --120 OR 132, 132 IF PRINT-1403 --                            
       $DUAL DUAL-NO              --YES--                                                       
       $DLIN LINE-66              --ANY TWO DIGIT NUMBER EXCEPT 00 --                           
       $DCRD CARD-MFCU            --MFCU OR 1442 OR 'MFCU,1442' OR NO--                         
       $DDKT DSKET-NO             --3741--                                                      
       $DOUT DEV-MFCU2            --NO OR MFCU1 OR 1442 OR 3741 --                              
       $DKBD KEYBD-NO             --5471 OR 5475--                                              
       $DAUX AUX-NO               --MFCU2 OR CONSOLE OR 1442 OR 3741 --                         
       $DCON CON-NO               --MFCU2 OR CONSOLE OR 1442 OR 3741 --                         
       $DINQ INQURY-NO            --YES   VALID ONLY IF KEYBD-5471--                            
       $DBSC LINE-NO              --L1 OR 'L1,L2' OR ICA OR DA OR 'L1,..'                       
       $DMLP MLMP-NO              --YES, ONLY IF BSCA WAS SPECIFIED--                           
       $DRJE RJE-NO               --YES, ONLY IF BSCA WAS SPECIFIED--                           
       $DMCR MICR-NO              --1255 OR 1419--                                              
       $DCPR CKRS-NO              --YES--                                                       
       $DLKE OVLNK-NO             --YES--                                                       
       $DSAM SIAM-NO              --YES--                                                       
       $DSPV ADD-0                --256 OR 512 OR 768 OR 1024--                                 
//     END                                                                                      
*                                                                                               
***   THE SYSTEM CONFIGURATION STATEMENTS HAVE BEEN PROCESSED.                                  
*                                                                                               
*                                                                                               
// CALL $SGEN1,R1       PROCESS THE SYSTEM CONFIGURATION STATEMENT OUTPUT FILE.                 
// RUN                                                                                          
*                                                                                               
***  THE SYSTEM CONFIGURATION STATEMENT OUTPUT FILE HAS BEEN PROCESSED.                         
*                                                                                               
*                                                                                               
// CALL $SGLNK,R1                 BUILD THE NEW SUPERVISOR FOR THIS INSTALLATION                
// RUN                                                                                          
**                                                                                              
// LOAD $MAINT,R1                                                                               
*                                                                                               
*                                                                                               
***   THE ALLOCATION FOR OBJECT LIBRARY IS 170 TRACKS, FOR SOURCE LIBRARY                       
***   5 TRACKS,AND FOR OBJECT DIRECTORY 4 TRACKS.  YOU SHOULD DETERMINE                         
***   THE ADEQUACY OF THESE ALLOCATIONS AND, IF NECESSARY, ALTER THE ALLOCATE                   
***   CONTROL STATEMENT WHICH FOLLOWS.                                                          
*                                                                                               
***   TO CONTINUE, SET RIGHTMOST ADDRESS/DATA SWITCH TO 0                                       
***   PRESS CONSOLE START --HALT/RESET IF YOU HAVE DPF SYSTEM--.                                
// PAUSE                                                                                        
// RUN                                                                                          
// ALLOCATE TO-F1,OBJECT-170,SOURCE-5,SYSTEM-YES,DIRSIZE-4                                      
// END                                                                                          
// CALL $SGCOM,R1                 BUILD REQUIRED SCP SYSTEM ON F1                               
// RUN                                                                                          
// CALL $SGOPT,R1                 BUILD OPTIONAL SCP SYSTEM FUNCTIONS ONTO F1                   
// RUN                                                                                          
*                                                                                               
***   THE SYSTEM CONTROL PROGRAMS HAVE BEEN GENERATED                                           
*                                                                                               
***   NORMAL END OF SCP GENERATION                                                              
*                                                                                               
***   ADDITIONAL SCP MAY NOW BE GENERATED.                                                      
***   TO GENERATE THE MACRO PROCESSOR CALL THE PROCEDURE $SGMAC FROM R1.                        
*                                                                                               
***   TO GENERATE THE MULTI LINE TERMINAL ADAPTOR PROGRAM CALL THE PROCEDURE                    
***   $SGMLT FROM R1.                                                                           
*                                                                                               
***   TO GENERATE THE SUPPORT FOR THE 3881 OPTICAL MARK READER CALL THE                         
***   PROCEDURE $SGOMR FROM R1.                                                                 
*                                                                                               
// PAUSE