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

⟦1e3a158a5⟧ s3xseg

    Length: 2540 (0x9ec)
    Types: s3xseg
    Names: »S$CG1GI«

Derivation

└─⟦827b5bd03⟧ Bits:30009184 5702-sc1.V16.ccp
    └─⟦f17e99db6⟧ 
        └─⟦this⟧ »S$CG1GI« 

TextSegment

************************************************************************** 00000                
*              CARDLESS CCP GENERATION INSTRUCTIONS                      * 00010                
************************************************************************** 00020                
*                                                                        * 00030                
* THE CARDLESS CCP GENERATION PROCEDURE MAKES THE FOLLOWING ASSUMPTIONS: * 00040                
*                                                                        * 00050                
*  . THAT DSM RESIDES ON F1                                              * 00060                
*                                                                        * 00070                
*  . THAT CCP DISTRIBUTION PACK IS ON R1                                 * 00080                
*                                                                        * 00090                
*  . THAT THE LAST 20 TRACKS ON THE CCP DISTRIBUTION PACK ON R1 ARE      * 00100                
*    FREE FOR THE $SOURCE FILE USED BY THE MACRO PROCESSOR               * 00110                
*                                                                        * 00120                
*  . THAT THE $E MACRO STATEMENTS WILL BE READ FROM THE SOURCE           * 00130                
*    LIBRARY MEMBER, $CG1GM, ON THE CCP DISTRIBUTION PACK                * 00140                
*                                                                        * 00150                
* IF ANY OF THE ABOVE ASSUMPTIONS ARE NOT TRUE, USE THE MODIFY FUNCTION  * 00160                
* OF $MAINT TO CHANGE THE SUPPLIED GENERATION PROCEDURES TO REFLECT THE  * 00170                
* REQUIREMENTS OF YOUR SYSTEM.                                           * 00180                
*                                                                        * 00190                
* SUPPLIED GENERATION PROCEDURES:                                        * 00200                
*                                                                        * 00210                
*   $CG1G1   *** CARDLESS GENERATION CONTROL                             * 00220                
*   $CG1G2   *** PREPARE CCP DISTRIBUTION PACK                           * 00230                
*   $CG1G3   *** PROCESS USER SPECIFICATIONS                             * 00240                
*   $CG1G4   *** PRINT RESULTS OF GENERATION SPECIFICATIONS              * 00250                
*   $CG1G5   *** CREATE SOURCE AND PROCEDURE MEMBERS                     * 00260                
*                                                                        * 00270                
* YOU MAY MAKE FOUR KINDS OF MODIFICATIONS TO THE SUPPLIED PROCEDURES:   * 00280                
*                                                                        * 00290                
*  1. IN THOSE STATEMENTS MARKED ++ IN POSITION 74-75 YOU MAY CHANGE     * 00300                
*     THE DSM PACK LOCATION FROM F1 TO R1.                               * 00310                
*                                                                        * 00320                
*  2. IN THOSE STATEMENTS MARKED ## IN POSITION 72-73 YOU MAY CHANGE     * 00330                
*     THE CCP DISTRIBUTION PACK LOCATION FROM R1 TO F1, R2 OR F2.        * 00340                
*                                                                        * 00350                
*  3. IN THOSE STATEMENTS MARKED $$ IN POSITION 74-75 YOU MAY CHANGE     * 00360                
*     THE $SOURCE FILE LOCATION FROM R1 TO F1, R2 OR F2.                 * 00370                
*                                                                        * 00380                
*  4. THE '// COMPILE' STATEMENT MAY BE REMOVED FROM PROCEDURE $CG1G3    * 00390                
*     TO SPECIFY THAT THE MACRO PROCESSOR WILL READ THE $E MACRO         * 00400                
*     STATEMENTS FROM THE SYSTEM INPUT DEVICE.                           * 00410                
*     -- STATEMENT 03070 --                                              * 00420                
*                                                                        * 00430                
*  NOTE -- IF A SOURCE MEMBER IS USED IT MUST BE PREPARED PRIOR TO       * 00440                
*          CALLING THE PROCEDURE $CG1G1.                                 * 00450                
*                                                                        * 00460                
* WHEN YOU HAVE MADE THESE CHANGES;                                      * 00470                
*   CALL PROCEDURE $CG1G1 BY ENTERING THE FOLLOWING OCL FROM THE         * 00480                
*   SYSTEM INPUT DEVICE.                                                 * 00490                
*                                                                        * 00500                
*   // CALL $CG1G1,UNIT  -- CCP DISTRIBUTION PACK --                     * 00510                
*   // RUN                                                               * 00520                
*                                                                        * 00530                
****** END OF INSTRUCTIONS ******************** END OF INSTRUCTIONS ****** 00540