*COMDECK   CCLIMS 
* 
*         THE COMMON DECK CCLIMS CONTAINS THE LATEST CCLIMS 
*         TO PRINT THE IMS USE THE S OPTION OF UPDATE.
*                UPDATE,Q,S=LIST. 
*                REWIND,LIST. 
*                COPY,LIST,OUTPUT.
*         THE UPDATE DIRECTIVE *C CCLIMS MUST BE PROVIDED IN THE
*         UPDATE INPUT.  THEN PRINT THE LIST FILE.
* 
* 
*IF -DECK,CCLIMS
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
    1.0  INTRODUCTION 
+        INTRODUCTION 
: 
         THE  CYBER  CONTROL  LANGUAGE  (CCL)  FEATURE  IS  PROVIDED  VIA 
+        T    C      C        L          CCL
         PROGRAMS WHICH EXECUTE IN THE USER AREA.  CCL VERBS EXECUTE  THE 
+                                                  CCL
         CCL  PROGRAM  VIA  VARIOUS ENTRY POINTS  THAT  SELECT  DIFFERENT 
+        CCL
         FUNCTIONS.  THE CCL VERBS ALLOW A USER TO EXERCISE CONTROL  OVER 
+                    T   CCL
         THE EXECUTION SEQUENCE OF JOB CONTROL STATEMENTS. THE VERBS IFE, 
+                                                          T         IFE
         ELSE, SKIP, AND WHILE PROVIDE CONDITIONAL EXECUTION  OF  CONTROL 
+        ELSE  SKIP      WHILE
         STATEMENTS.   BEGIN  AND REVERT INITIATE AND TERMINATE ALTERNATE 
+                      BEGIN      REVERT
         SOURCES OF CONTROL STATEMENTS. 
: 
         CCL WAS ORIGINALLY DEFINED  BY  THE  DAP  S1261  "UNIVERSITY  OF 
+        CCL                                  DAP  S       U
         WASHINGTON CONTROL LANGUAGE (UWCL) MODIFIED AS THE CYBER CONTROL 
+        W          C       L         UWCL  M               C     C 
         LANGUAGE".  SYSTEM INTERFACES REQUIRED BY CCL ARE DEFINED BY THE 
+        L           S                             CCL
         DAP  ARH1013  "COMMON INTERFACES FOR CCL" AND BY A FOLLOW UP DAP 
+        DAP  ARH       C      I              CCL                     DAP 
         ARH1326 "CCL INTERFACE 2".   THE  CCL  REORGANIZATION  AND  SIZE 
+        ARH      CCL INTERFACE       T    CCL  R                    S
         REDUCTION GID ARH2646 DESCRIBES THE GENERAL DESIGN OF CCL  AFTER 
+        R         GID ARH                                     CCL
         REORGANIZATION AND MODULARIZATION. 
: 
: 
    1.2  DESIGN OBJECTIVES
+        DESIGN OBJECTIVES
: 
              *  PROVIDE A USEFUL JOB CONTROL FEATURE 
              *  MINIMIZE SYSTEM/CCL DEPENDENCIES 
+                                CCL
              *  EASE OF MAINTENANCE AND ENHANCEMENT
: 
: 
    1.3  DESIGN RESTRICTIONS AND CONSIDERATIONS 
+        DESIGN RESTRICTIONS AND CONSIDERATIONS 
: 
              *  CCL COMMON PRODUCT OF SCOPE 2, NOS, NOS/BE 
+                CCL                   SCOPE    NOS  NOS BE 
              *  MAKE USE OF KCL CODE AND TECHNIQUE AS POSSIBLE 
+                            KCL
              *  ISOLATE SYSTEM DEPENDENCIES
: 
: 
    2.0  DESIGN OVERVIEW
+        DESIGN OVERVIEW
: 
         THE REORGANIZED FORMAT OF CCL CONSISTS OF THREE DISTINCT MODULES 
+        T                         CCL
         THAT PROCESS THE CCL VERBS:  CCLBRWE  -  PROCESSES  BEGIN/REVERT 
+                         CCL         CCLBRWE                BEGIN REVERT 
         AND WHILE/ENDW, CCLIFES   -   PROCESSES IFE/ELSE/ENDIF AND SKIP, 
+            WHILE ENDW  CCLIFES                 IFE ELSE ENDIF     SKIP
         CCLDS - PROCESSES DISPLAY AND SET.  EACH MODULE  IS  A  SEPARATE 
+        CCLDS             DISPLAY     SET   E
         RECORD ON THE CCL PROGRAM LIBRARY WITH CALLS TO THE  SUBROUTINES 
+                      CCL P       L
         REQUIRED FOR VERB TASK PROCESSING.   THE  BASIC LOGIC   OF   THE 
+                                             T 
         ORIGINAL PROGRAMS:    CCLSUB, STRCCL  AND  IOCCL  IS  UNCHANGED; 
+                              CCLSUB  STRCCL       IOCCL 
         HOWEVER,  THE  PROGRAMS  HAVE  BEEN  ISOLATED  INTO   INDIVIDUAL 
         SUBROUTINES TO REDUCE EACH MODULE TO CONTAIN ONLY  THE  REQUIRED 
         PROCESSES.  WHENEVER ANY OF  THE PROGRAMS IS REFERENCED  IN  THE 
+                    W
         FOLLOWING SECTIONS, IT IS MEANT TO REFER TO  THE  SUBROUTINE  OF 
         THE GROUP THAT DOES THE NECESSARY PROCESSING.
: 
    2.1  CCL EXECUTES  IN  THE  USER  FIELD  LENGTH.  THE MODULES OF  CCL 
+        CCL                                          T               CCL 
         COMMUNICATE VIA COMMON BLOCKS.  FOR EXAMPLE BUFFERS AND CRACKING 
+                                        F
         INFORMATION SUCH AS POSITION, SEPARATOR, LITERAL, ETC.  WILL  BE 
         WITHIN  A  COMMON BLOCK AND ACCESSED BY THE THE MAIN CCL PROGRAM 
+                                                             CCL 
         AND THE SUBROUTINES. 
: 
: 
: 
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
    2.2  EACH VERB OF THE MODULE IS AN ENTRY POINT  IN  THE  MAIN MODULE. 
+        E
         THE LOADER LOADS CCL FOR ANY SUCH VERB BECAUSE  EACH  ONE  IS AN 
+                         CCL 
         ENTRY POINT OF CCL.  EXECUTION OF CCL IS AT  THE  SAME  LOCATION 
+                       CCL   E            CCL
         FOR  ANY  ENTRY POINT.  THE MODULE  EXECUTES INITIALIZATION CODE 
+                                T
         AND  THEN  EXAMINES  THE  CONTROL  STATEMENT  TO  DETERMINE  THE 
         FUNCTION TO BE PERFORMED.
: 
    2.3  THE  CONTROL  LOGIC OF EACH MODULE  IS  IN  A  DISTINCT PROGRAM. 
+        T
         THREE BASIC SUBPROGRAM GROUPS EXIST THAT GROUP  THE  SUBROUTINES 
+        T
         OF CCL ACCORDING TO THE  FUNCTION   OF   THE   SUBROUTINE.   ONE 
+           CCL                                                       O 
         SUBPROGRAM PROVIDES THE STRING ROUTINES NEEDED TO UNPACK  A LINE 
         (CARD), CRACK A  LINE  BY  ASSEMBLING  STRINGS  AND  IDENTIFYING 
         SEPARATORS,  EVALUATE  LITERALS,  EVALUATE  NUMERICS  AND   PACK 
         CHARACTERS INTO A LINE.  THE  STRING  PROCESSING  USES  THE  KCL 
+                                 T                                   KCL 
         TECHNIQUE OF SCATTERING THE CHARACTERS OF A LINE INTO  A  BUFFER 
         WITH ONLY ONE CHARACTER PER WORD.  THE PROCESS OF  CRACKING  THE 
+                                           T 
         LINE IS DONE FROM THE SCATTER BUFFER.
: 
    2.4  THE SUBPROGRAM GROUP (IOCCL) PROVIDES  ALL  THE  I/O  FUNCTIONS. 
+        T                     IOCCL                      I O 
         THE  INTERFACE  BETWEEN SUBPROGRAMS  AND  THE  MAIN  CCL  MODULE 
+                                                             CCL 
         CODE IS INDEPENDENT OF THE  HOST  SYSTEM.   A  THIRD  SUBPROGRAM 
+                                                    A
         (CCLSUB)  CONTAINS ALL OTHER SUBROUTINES.  THE MOST IMPORTANT OF 
+         CCLSUB                                    T 
         THESE SUBROUTINES IS THE EXPRESSION EVALUATION CODE.  THIS  CODE 
+                                                              T
         IS IN FACT THE KCL EXPRESSION EVALUATION CODE WITH MINOR CHANGES 
+                       KCL 
         TO PROCESS  LITERALS,  IMPROVE  READABILITY,  AND  PROVIDE  MORE 
         MEANINGFUL ERROR MESSAGES. 
: 
    2.5  CCL  IS  RELEASED  ON ITS OWN PL.  ANY COMMON DECKS REQUIRED ARE 
+        CCL                           PL   A 
         ALSO ON THAT PL.  TO INSTALL  CCL  THE  PROGRAMS  ARE  ASSEMBLED 
+                     PL   T           CCL
         LOADED, AND 3 ABSOLUTE MODULES CREATED WITH EACH VERB IDENTIFIED 
         AS AN ENTRY POINT.  THE ABSOLUTE MODULES ARE THEN ADDED  TO  THE 
+                            T
         SYSTEM.  (I.E.  NUCLEUS LIBRARY ON SCOPE 2). 
+                        NUCLEUS            SCOPE 
: 
    2.6  CCL  CRACKS  THE  CONTROL  STATEMENTS RATHER THAN USE PARAMETERS 
+        CCL
         PROVIDED BY THE SYSTEM AT RA+2.  THIS IS  REQUIRED  BECAUSE  THE 
+                                  RA     T 
         EXPRESSIONS  MAY  CONTAIN  TERMINATORS (PERIOD OR RIGHT PAREN.), 
         ALSO IT IS NOT POSSIBLE TO DETERMINE THE EXISTENCE  OF  A  SHORT 
         LITERAL  VIA  RA+2.   FOR  EXAMPLE '$AB$' AND 'AB' ARE IDENTICAL 
+                      RA      F
         PARAMETERS.  ANY  CCL  STATEMENT  MAY  CONTINUE  ONTO  FOLLOWING 
+                     A    CCL
         CARDS.   ON  SCOPE 2  THE LOADER CRACKS ALL CARDS OF A STATEMENT 
+                     SCOPE 
         UNTIL IT FINDS A TERMINATOR.  IN ORDER TO CRACK ALL THE CARDS OF 
+                                      I
         A  STATEMENT CCL USES CONTRLC TO BACKSPACE THE CONTROL STATEMENT 
+                     CCL      CONTRLC
         FILE TO THE FIRST CARD OF THE STATEMENT  AND  THEN  REREADS  THE 
         CARDS OF THE STATEMENT.
: 
    2.7  TO  PROVIDE NESTED PROCEDURE CALLS CCL  CREATES THREE WORK FILES 
+        T                                  CCL 
         (ZZZZZC0, ZZZZZC1, ZZZZZC2).  THE INTERNAL FORMAT  OF  THE  WORK 
+         ZZZZZC   ZZZZZC   ZZZZZC     T
         FILES IS THE SAME AS THE FORMAT OF THE CONTROL STATEMENT FILE OF 
         THE HOST SYSTEM.  THE FIRST FILE IS USED ON  NOS  TO  STORE  THE 
+                          T                          NOS 
         ORIGINAL  JOB  CONTROL FILE.  ZZZZZC0 IS NOT USED ON SCOPE 2 AND 
+                                      ZZZZZC                 SCOPE 
         NOS/BE AS THE JOB FILE AND INPUT FILE ARE USED.  THE OTHER FILES 
+        NOS BE        JOB          INPUT                 T 
         ARE  USED  TO STORE ALTERNATE SECTIONS OF CONTROL STATEMENTS AND 
         CCL DATA.  TWO FILES (ZZZZZC1, ZZZZZC2) ARE  USED  SO  THAT  THE 
+        CCL        T          ZZZZZC   ZZZZZC
         TIME BETWEEN THE ACCESSING OF THE CONTROL STATEMENT FILE AND THE 
         DECLARATION OF A NEW CONTROL STATEMENT FILE IS AT A MINIMUM.  AT 
+                                                                      A
: 
: 
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
         FIRST  LEVEL  PROCEDURE CALL (I.E.  THE PROCEDURE CALL STATEMENT 
         IS WITHIN THE ORIGINAL CONTROL STATEMENT FILE)  CCL  WRITES  THE 
+                                                        CCL
         NEW  CONTROL  STATEMENTS ON ZZZZZC1 AND THEN ACCESSES THE C.S.F. 
+                                    ZZZZZC                        C S F
         AND DECLARES ZZZZZC1 TO BE THE NEW C.S.F.  FOR  A  SECOND  LEVEL 
+                     ZZZZZC                C S F   F 
         PROCEDURE  CALL  THE STATEMENTS ARE WRITTEN ON ZZZZZC2 FOLLOWING 
+                                                       ZZZZZC
         THE PREVIOUS SECTION OF  CCL  DATA.   THEN  THE  CURRENT  C.S.F. 
+                                 CCL          T                   C S F
         (ZZZZZC1)  IS  ACCESSED, ZZZZZC2 DECLARED AS THE NEW C.S.F.  AND 
+         ZZZZZC                  ZZZZZC                      C S F 
         THEN THE CCL DATA SECTION IS WRITTEN ON ZZZZZC1.  THUS  THE  NTH 
+                 CCL                            ZZZZZC    T          N 
         PROCEDURE  LEVEL  WRITES  THE  NTH  SECTION  ON  EACH FILE.  THE 
+                                       N                             T 
         CONTENT OF EACH FILE ALTERNATES BETWEEN STATEMENTS AND CCL DATA. 
+                                                               CCL 
: 
    2.8  TO  TRACK  THE  LEVEL  OF  PROCEDURE  NESTING CCL INCREMENTS AND 
+        T                                             CCL
         DECREMENTS A COUNT WHICH IS STORED  BY  THE  HOST  SYSTEM.   THE 
+                                                                     T 
         COUNT  IS  TRANSFERRED BY THE MACROS GETJCI AND SETJCI.  A COUNT 
+                                             GETJCI     SETJCI   A 
         OF ZERO INDICATES THE ORIGINAL CONTROL STATEMENTS OF THE JOB,  1 
         IS A FIRST LEVEL PROCEDURE, ETC..  THE CCL DATA IS IN BITS 35-24 
+                                           T   CCL 
         OF WORD ZERO OF THE DATA TRANSFERRED BY GETJCI AND SETJCI.   THE 
+                                                GETJCI     SETJCI    T 
         FIELD  IS  INITIATIALIZED  TO  ZERO  DURING JOB INITIATION.  THE 
+                                                                     T 
         LOWER TEN BITS (33-24) OF THE FIELD  IS  THE  CURRENT  PROCEDURE 
         NESTING  LEVEL.   THE  UPPER  BIT  (35) IS THE DAYFILE FLAG THAT 
+                          T
         CONTROLS  THE  LISTING  OF  CONTROL  CARDS  THAT   ARE   SKIPPED 
         (1=PRINT).  THE REMAINING BIT (34) IS UNUSED.
+                    T
: 
    2.9  CCL DETERMINES THE RELATIVE SECTION OF THE WORK FILES THAT IS TO 
+        CCL
         BE  WRITTEN/READ  BY THE PROCEDURE NESTING LEVEL.  CCL POSITIONS 
+                                                           CCL 
         THE WORK FILE TO THAT SECTION SO THAT CCL DOES NOT DEPEND ON THE 
+                                              CCL
         POSITION OF THE FILE BETWEEN CALLS.
: 
   2.10  SPECIAL  COMMANDS  WITHIN  THE  PROCEDURE BODY MAY DIRECT CCL TO 
+        S                                                         CCL
         CREATE A DATA FILE, WRITE END-OF-SECTION  OR  END-OF-FILE  ON  A 
+                                  E   O  S            E   O  F 
         DATA  FILE, OR TO INDICATE A LINE OF THE PROCEDURE BODY CONTAINS 
         ONLY COMMENTS AND IS TO BE DELETED.  ALL OF THE COMMANDS HAVE  A 
+                                             A 
         PERIOD  IN COLUMN ONE.  THE COMMANDS .DATA, .EOR AND .EOF AFFECT 
+                                T             DATA   EOR      EOF
         THE CREATION OF A DATA FILE AND THE .*  COMMAND  CAUSES  CCL  TO 
+                                                                 CCL 
         IGNORE  THE  REST  OF  THE  LINE AND THUS ALLOWS COMMENTS IN THE 
         PROCEDURE  BODY.   THE  .DATA  COMMAND  CAUSES  THE   STATEMENTS 
+                           T     DATA
         FOLLOWING THE COMMAND TO BE WRITTEN TO A DATA FILE.  IF THE DATA 
+                                                             I 
         FILE NAME IS NOT SPECIFIED, CCL GENERATES A  NAME  FROM  A  BASE 
+                                    CCL
         NAME  (ZZCCLAA)  AND SEQUENCES THE LAST TWO CHARACTERS ACCORDING 
+               ZZCCL 
         TO THE NESTING LEVEL OF PROCEDURE CALLS.   THE  SEQUENCING  USES 
+                                                   T 
         ONLY  ALPHA-NUMERIC  CHARACTERS  AND  ENSURES  UNIQUE NAMES TO A 
         LEVEL OF 1023. 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
   3.0   SYSTEM INTERFACES
+        SYSTEM INTERFACES
  
         SIX  NEW  MACROS WERE IMPLEMENTED PRIMARILY FOR USE BY CCL.  THE 
+        S                                                      CCL   T 
         MACROS GETJCI SETJCI FILINFO LOADD ARE DEFINED  IN  THE  SCOPE 2 
+               GETJCI SETJCI FILINFO LOADD                       SCOPE 
         REFERENCE  MANUAL.   TO  AVOID  ENCOURAGING  USAGE  BY USERS THE 
+                             T 
         MACROS ACCSF AND  ENCSF  ARE  NOT  DESCRIBED  IN  THE  REFERENCE 
+               ACCSF      ENCSF
         MANUAL.
: 
          ACCSF - ACCESS CONTROL STATEMENT FILE 
+         ACCSF   ACC    C       S         F
: 
                  ACCSF  MAKES  THE CONTROL STATEMENT FILE AVAILABLE TO A 
+                 ACCSF 
                  USER PROGRAM  AND  ALSO  RETURNS  POSITION  INFORMATION 
                  WHICH  ENABLES SUBSEQUENT CONTINUATION FROM THE CURRENT 
                  POSITION OF THE CONTROL STATEMENT  FILE.   FOR  SCOPE 2 
+                                                            F    SCOPE 
                  ACCSF  SIMPLY  RETURNS  THE NAME OF THE CURRENT CONTROL 
+                 ACCSF 
                  STATEMENT FILE (USUALLY THE  JOB  FILE).   THE  CURRENT 
+                                                            T
                  POSITION INFORMATION IS THEN OBTAINED BY EXECUTION OF A 
                  GETPOS MACRO FOR THE NAMED FILE.
+                 GETPOS
: 
                  ACCSF    FIT,POS
+                 ACCSF    FIT POS
: 
                  FIT  -  ADDRESS OF FIT  INTO  WHICH  THE  NAME  OF  THE 
+                 FIT                FIT
                          CURRENT CONTROL STATEMENT FILE WILL BE WRITTEN
: 
                  POS  -  IGNORED BY SCOPE 2
+                 POS                SCOPE
: 
: 
          ENCSF - ENTER CONTROL STATEMENT FILE
+         ENCSF   EN    C       S         F 
: 
                  DECLARES A FILE TO BE THE NEW CONTROL  STATEMENT  FILE
+                 D 
                  THE FILE MUST BE UNLABELLED, SEQUENTIAL AND RECORD TYPE 
+                 T 
                  W.  THE FILE POSITION IS THE POSITION FOR THE  READ  OF 
+                 W   T 
                  THE NEXT CONTROL CARD.
: 
                  ENCSF    FIT,POS
+                 ENCSF    FIT POS
: 
                  FIT  -  FIT ADDRESS OF FILE 
+                 FIT     FIT 
: 
                  POS  -  IGNORED BY SCOPE 2
+                 POS     I          SCOPE
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
    4.0  COMPONENT DESIGN 
+        COMPONENT DESIGN 
: 
    4.1  EACH MODULE (CCLBRWE, CCLIFES, CCLDS) CONSISTS OF A MAIN PROGRAM 
+        E            CCLBRWE  CCLIFES  CCLDS 
         WHICH PROVIDES THE CONTROL LOGIC NECESSARY TO PROCESS EACH VERB. 
         ALL ENTRY POINTS OF THE MODULE INITIATE EXECUTION  AT  THE  SAME 
+        A
         LOCATION WITHIN THE MODULE.  THE  MODULE  PROCESSOR  INITIALIZES 
+                                     T 
         ITSELF,  READS  SOME  SYSTEM  DATA  AND   THEN   INITIATES   THE 
         APPROPRIATE  CODE  TO  PROCESS THE VERB.  IF THE VERB IS UNKNOWN 
+                                                  I
         THE BEGIN CODE IS EXECUTED ASSUMING A PROCEDURE IS BEING  CALLED 
+            BEGIN
         BY NAME. 
: 
    4.1.1  BEGIN-  A PROCEDURE CALL STATEMENT INITIATES CCL PROCESSING TO 
+          BEGIN   A                                    CCL 
           FIND A PROCEDURE AND DIRECT THE SYSTEM TO EXECUTE THE  CONTROL 
           STATEMENTS OF THE PROCEDURE.  THERE ARE TWO TYPES OF CALLS.  A 
+                                        T                              A 
           BEGIN STATEMENT IS USED FOR  PROCEDURES  LOCATED  ON  A  FILE. 
+          BEGIN
           PROCEDURES  WHICH  RESIDE  ON A LIBRARY MAY BE CALLED BY NAME. 
+          P
           THE LOADER WILL EXECUTE CCL (BEGIN)  WHEN  IT  DETERMINES  THE 
+          T                       CCL  BEGIN 
           MODULE CALLED IS IN FACT A PROCEDURE.
: 
           THE  CONTROL  STATEMENT  IS CRACKED TO DETERMINE THE PROCEDURE 
+          T
           NAME AND THE OPTIONS SELECTED REGARDING THE RESIDENCE  OF  THE 
           PROCEDURE.   IF  A  PROCEDURE  FILE  NAME IS SPECIFIED (EITHER 
+                       I 
           EXPLICITLY OR IMPLICITLY) AND A LOCAL FILE OF THAT NAME EXISTS 
           THE  PROCEDURE  IS  ASSUMED  TO BE ON THAT FILE.  IF THE LOCAL 
+                                                            I
           FILE DOES NOT EXIST THEN THE LIBRARY SET MAY BE SEARCHED (CALL 
           BY NAME) OR AN AUTOMATIC ATTACH (GET ON NOS) MAY BE ATTEMPTED. 
+                                   ATTACH  GET    NOS
           AN INSTALLATION PARAMETER DEFINES THE CHARACTER STRING  TO  BE 
+          A
           USED  AS  THE  ID  PARAMETER OF THE ATTACH FUNCTION.  WHEN THE 
+                         ID                                     W
           PROCEDURE IS FOUND THE PROCEDURE HEADER IS READ AND PROCESSED. 
           EACH  FORMAL  PARAMETER  ON  THE  HEADER CREATES AN ENTRY IN A 
+          E
           TABLE (PPT).  THE FIRST  DEFAULT  SPECIFICATION  OF  A  FORMAL 
+                 PPT    T
           PARAMETER IS STORED IN THE TABLE FPS AND ITS OFFSET WITHIN FPS 
+                                           FPS                       FPS 
           IS STORED IN THE PPT ENTRY.  THE NUMBER OF CHARACTERS IS  ALSO 
+                           PPT         T 
           STORED.   THE  INFORMATION IS DUPLICATED IN BOTH THE FIRST AND 
+                    T
           SECOND DEFAULT FIELDS SO THAT EVEN IF  NO  SECOND  DEFAULT  IS 
           SPECIFIED,  THE  PROCEDURE  CALL  STATEMENT MAY STILL SELECT A 
           SECOND DEFAULT.
: 
           THEN THE PARAMETERS OF THE PROCEDURE  CALL  STATEMENT  (BEGIN) 
+          T                                                       BEGIN
           ARE   PROCESSED.   AS  EACH  FORMAL  PARAMETER  OF  THE  BEGIN 
+                             A                                     BEGIN 
           STATEMENT IS ENCOUNTERED THE  PPT  IS  SEARCHED  TO  FIND  THE 
+                                        PPT
           APPROPRIATE  ENTRY.   THEN IF A SECOND DEFAULT IS SELECTED THE 
+                                T
           VALUES FROM THE FIELDS PPDC2 AND  PPDO2  ARE  MOVED  INTO  THE 
+                                 PPDC       PPDO 
           FIELDS  PPDC1  AND  PPDO1.   IF  A  NEW  VALUE  FOR THE FORMAL 
+                  PPDC        PPDO     I 
           PARAMETER IS SPECIFIED THEN THE CHARACTER STRING IS STORED  IN 
+ 
           FPS  AT  THE  OFFSET  INDICATED  BY  PPDO1  AND  THE NUMBER OF 
+          FPS                                  PPDO
           CHARACTERS IS STORED IN PPDC1.  WHEN COMPLETE THE FIELDS PPDC1 
+                                  PPDC    W                        PPDC
           AND PPDO1 OF EACH PPT ENTRY IDENTIFIES THE CHARACTER STRING IN 
+              PPDO          PPT
           FPS THAT IS TO BE SUBSTITUTED FOR EACH OCCURENCE OF THE FORMAL 
+          FPS
           PARAMETER WITHIN THE PROCEDURE BODY. 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
                          ENTRY OF PPT
+                         E        PPT
: 
              +-----------------------------------------------------+ 
              I                                                     I 
              I  PPFPN -NAME OF FORMAL PARAMETER                    I 
              +-+-+-------+-------+------+---+-------+--------------+ 
              IBILI       I       I      I   I       I              I 
              ISIII       I PPDC2 I PPDO2I   I PPDC1 I PPDO1        I 
              IPITI       I       I      I   I       I              I 
              +-+-+-------+-------+------+---+-------+--------------+ 
: 
: 
                 PPBSP (59)    1=BEGIN SPECIFICATION PROCESSED
+                PPBSP           BEGIN
                 PPLIT (58)    1=FORMAL PARAMETER WAS LITERAL 
+                PPLIT
                 PPDC2 (53,45) SECOND DEFAULT, CHARACTERS 
+                PPDC 
                 PPDO2 (44,30) SECOND DEFAULT, OFFSET IN FPS
+                PPDO                                    FPS
                 PPDC1 (23,15) FIRST DEFAULT, CHARACTERS
+                PPDC 
                 PPDO1 (14,00) FIRST DEFAULT, OFFSET IN FPS 
+                PPDO                                   FPS 
: 
             THE  NAMES  OF  THE  WORK  FILES  TO  BE USED ARE DETERMINED 
+            T
             (ZZZZZII) AND STATEMENTS ARE READ FROM THE  PROCEDURE  BODY, 
+             ZZZZZ 
             SPECIFIED  STRINGS ARE SUBSTITUTED FOR FORMAL PARAMETERS AND 
             THE STATEMENTS WRITTEN TO THE WORK  FILE  TO  CREATE  A  NEW 
             SECTION  OF  CONTROL  STATEMENTS.   IF  A DATA FILE IS TO BE 
+                                                I
             CREATED, ITS NAME IS DETERMINED FROM EITHER THE  COMMAND  OR 
             IS  CREATED BY A SUBROUTINE.  THEN A RETURN IS PERFORMED FOR 
+                                          T
             THAT FILE.  THUS NO FILE CREATED BY  THE  DATA  COMMAND  MAY 
+                        T
             WRITE ON AN EXISTING FILE. 
: 
             THE  PROCESS  OF  SUBSTITUTING THE FORMAL PARAMETERS IS DONE 
+            T
             WITH TWO SCATTER BUFFERS.  A LINE IS READ FROM THE PROCEDURE 
+                                       A 
             BODY  AND  SCATTERED  INTO SCATBF1.  THEN REPEATED CALLS ARE 
+                                       SCATBF    T 
             MADE TO STRANS TO  OBTAIN  EACH  STRING  AND  ITS  FOLLOWING 
+                    STRANS 
             SEPARATOR.   THE  STRING  IS  COMPARED TO THE LIST OF FORMAL 
+                         T 
             PARAMETERS AND IF EQUAL TO A  FORMAL  PARAMETER  THE  STRING 
             SPECIFIED  BY  THE  PPT  ENTRY IS SUBSTITUTED FOR THE FORMAL 
+                                PPT
             PARAMETER.  THEN THE APPROPRIATE STRING  IS  TRANSFERRED  TO 
+                        T
             SCATBF2. 
+            SCATBF 
: 
             THE  PROCESS IS COMPLICATED BY THE EQUIVALENCE CHARACTER AND 
+            T
             RIGHT ARROW PROCESSING.  ALSO A SUBSTITUTED  STRING  MAY  BE 
+                                     A 
             LARGER  THAN  THE  FORMAL  PARAMETER  NAME.  IF THE NEW LINE 
+                                                         I 
             EXPANDS ENOUGH TO FORCE MULTIPLE LINES, EACH LINE  MUST  END 
             WITH A SEPARATOR.
: 
             WHEN  THE  LAST  STATEMENT  HAS BEEN READ FROM THE PROCEDURE 
+            W
             BODY, THE CURRENT CONTROL STATEMENT FILE IS ACCESSED (ACCSF) 
+                                                                  ACCSF
             AND  THE  WORK  FILE UPON WHICH THE PROCEDURE WAS WRITTEN IS 
             DECLARED THE NEW C.S.F.  (ENCSF) WITH  CURRENT  POSITION  AT 
+                                      ENCSF
             THE BEGINNING OF THE SECTION OF STATEMENTS JUST WRITTEN. 
: 
             CCL  THEN BUILDS A TABLE OF THE CCL DATA REQUIRED TO EXECUTE 
+            CCL                             CCL
             A REVERT  AND  RETURN  TO  THE  PREVIOUS  CONTROL  STATEMENT 
+              REVERT 
             SEQUENCE.   THIS INCLUDES THE  POSITION INFORMATION OBTAINED 
+                        T
             FROM THE ACCSF MACRO.  THIS TABLE OF DATA IS THEN WRITTEN TO 
+                     ACCSF         T 
             THE APPROPRIATE WORK FILE. 
: 
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
    4.1.2  REVERT-  THE WORK FILE NAMES AND USAGE ARE DETERMINED FROM THE 
+          REVERT   T 
           CURRENT LEVEL OF PROCEDURE NESTING.  THE  CCL  DATA  IS  READ
+                                               T    CCL
           THEN  ACCSF  AND  ENCSF  ARE  EXECUTED TO DECLARE THE PREVIOUS 
+                ACCSF       ENCSF
           PROCEDURE LEVEL OR THE ORIGINAL JOB TO BE THE  SOURCE  OF  THE 
           CONTROL  STATEMENTS.   IF THE EFG SOFTWARE REGISTER IS ZERO IT 
+                                 I      EFG
           IS RESET TO EQUAL THE EF REGISTER.  THEN THE REGISTERS R1, R2, 
+                                EF            T                  R   R 
           R3  AND EF ARE RESTORED FROM THE CCL DATA WHICH WAS SAVED FROM 
+          R       EF                       CCL 
           THE CORRESPONDING BEGIN.  THE FLAG WHICH CONTROLS THE  DAYFILE 
+                            BEGIN   T
           LISTING OF SKIPPED CONTROL CARDS IS ALSO RESTORED.  FINALLY IF 
+                                                              F
           THE REVERT STATEMENT  SPECIFIED,  CCL   EXITS  VIA  THE  ABORT 
+              REVERT                        CCL                    ABORT 
           MACRO.  OTHERWISE IT PERFORMS A NORMAL EXIT VIA ENDRUN.
+                                                          ENDRUN 
: 
: 
    4.1.3  CONDITIONAL VERBS (IFE,ELSE,SKIP,ENDIF,WHILE)
+          CONDITIONAL VERBS  IFE ELSE SKIP ENDIF WHILE 
           IFE,  AND  WHILE CALL THE EXPRESSION EVALUATION SUBROUTINE AND 
+          IFE        WHILE 
           THEN THE LABEL SUBROUTINE TO EXAMINE THE LABEL.   ALPHANUMERIC 
+                                                            A
           LABELS  IDENTIFY  THE  TERMINATING STATEMENT.  AFTER THE LABEL 
+                                                         A 
           HAS BEEN EXAMINED THEN THE VALUE OF THE  EXPRESSION  INDICATES 
           WHETHER THE LABEL IS TO BE USED FOR SKIPPING (EXPRESSION VALUE 
           EQUAL ZERO) OR IF  CCL  WILL  SIMPLY  EXIT  (EXPRESSION  VALUE 
+                             CCL 
           NONZERO, I.E.TRUE).
: 
: 
    4.1.4  ENDW-  IS  A  UNIQUE CONDITIONAL VERB BECAUSE  IT  REWINDS THE 
+          ENDW 
           CONTROL  STATEMENTS  AND  USES  CONTRLC  TO  SEARCH  FOR   THE 
+                                          CONTRLC
           APPROPRIATE  WHILE.   WHEN  FOUND  THE WHILE IS EXECUTED AGAIN 
+                       WHILE    W                WHILE 
           EXCEPT THAT IF FALSE THE SKIPPED CARDS BETWEEN THE  WHILE  AND 
+                                                              WHILE
           THE ENDW ARE NOT PRINTED ON THE DAYFILE BECAUSE THE CARDS HAVE 
+              ENDW 
           ALREADY BEEN EXECUTED. 
: 
    4.1.5  SET/DISPLAY-   THE  EXPRESSION  IS  EVALUATED  AND  THE  VALUE 
+          SET DISPLAY    T 
           DISPLAYED ON THE DAYFILE OR THE SPECIFIED FIELD IS SET.  THESE 
           VERBS HAVE THE SAME NAME AS KCL VERBS.  CCL WILL  PROCESS  THE 
+                                      KCL         CCL
           VERBS SO THAT THE RESULTS ARE COMPATIBLE WITH KCL. 
+                                                        KCL
: 
    4.2  CCLSUB-SUBROUTINE GROUP-CCLEVX 
+        CCLSUB                  CCLEVX 
: 
         THE  MOST IMPORTANT AND COMPLEX SUBROUTINE OF CCLSUB IS THE CODE 
+        T                                             CCLSUB 
         TO EVALUATE EXPRESSIONS (CCLEVX).  WHEN CCLEVX IS  EXECUTED  CCL 
+                                 CCLEVX    W    CCLEVX               CCL 
         HAS UNPACKED A CARD INTO A SCATTER BUFFER AND ADVANCED UP TO THE 
         SEPARATOR  PRECEDING  THE  EXPRESSION.   CCLEVX  PROCESSES   THE 
+                                                 CCLEVX
         EXPRESSION BY ADVANCING THROUGH THE CARD.  EACH CHARACTER STRING 
+                                                   E 
         IS AN OPERAND  AND  EACH  SEPARATOR  IS  AN  OPERATOR.   IF  THE 
+                                                                 I 
         EXPRESSION  IS  NOT  COMPLETE  THE  NEXT  CONTROL  CARD  IS READ 
+ 
         (CONTRLC/CONTROL) AND EXPRESSION PROCESSING CONTINUES.  WHEN THE 
+         CONTRLC CONTROL                                        W
         EVALUATION  IS COMPLETE THE VALUE OF THE EXPRESSION IS STORED IN 
+ 
         EXPVAL AND A SUCCESS/FAILURE FLAG RETURNED TO THE CALLER.
+        EXPVAL 
: 
    4.2.1  EACH LEGAL OPERATOR IS REPRESENTED BY AN ENTRY IN AN  INTERNAL 
+          E
           TABLE  (EVXOT).  EACH ENTRY CONTAINS INFORMATION TO DEFINE THE 
+                  EVXOT    E 
           OPERATORS WHICH MAY IMMEDIATELY BE ADJACENT  TO  AN  OPERATOR. 
+ 
           FOR  EXAMPLE AN ASTERISK MAY FOLLOW A RIGHT PARAENTHESIS AND A 
+          F
           PLUS MAY FOLLOW AN ASTERISK BUT AN ASTERISK MAY NOT  FOLLOW  A 
           PLUS.   '(1+2)*+3'  IS LEGAL BUT '(1+2)+*3 IS NOT LEGAL.  EACH 
+                                                                    E
           ENTRY OF EVXOT ALSO  CONTAINS  PRECEDENCE  INFORMATION AND THE 
+                   EVXOT 
           LOCATION OF THE CODE WHICH PERFORMS THE OPERATION. 
: 
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
                          ENTRY OF EVXOT
+                                  EVXOT
: 
              +--+--+--+-----------+----------------+---------------+ 
              I  I  I  I           I                I               I 
              IE IN IP I           I    ADDR        I   PR          I 
              +--+--+--+-----------+----------------+---------------+ 
: 
               E  (59)     1= ENTER IN STACK REGARDLESS OF PRECEDENCE 
               N  (58)     NEW CONTROL FLAG 
               P  (57)     PREVIOUS CONTROL FLAG
               ADDR(35,18) ADDRESS OF CODE TO PROCESS OPERATOR
               PR (17,00)  PRECEDENCE VALUE 
: 
: 
    4.2.2  THE  EXPRESSION  IS  EVALUATED  LEFT  TO RIGHT.  OPERATORS AND 
+          T                                                O 
           OPERANDS ARE STACKED UNTIL AN OPERATOR  IS  ENCOUNTERED  WHOSE 
           PRECEDENCE  IS  LOWER  OR EQUAL TO THE PRECEDENCE  OF  THE TOP 
           OPERATOR IN THE OPERATOR STACK.  THE STACK IS THEN POPPED  AND 
+                                           T 
           AN  OPERATION  PERFORMED.   THE  PRECEDENCE CHECKS BETWEEN THE 
+                                      T
           CURRENT OPERATOR AND THE TOP OPERATOR IN  THE  STACK  CONTINUE 
           UNTIL  THE  CURRENT OPERATOR HAS A HIGHER PRECEDENCE, THEN THE 
           CURRENT OPERATOR IS STORED IN THE OPERATOR STACK.   THE  RIGHT 
+                                                              T
           PARENTHESIS IS A SPECIAL CASE.  ITS PRECEDENCE IS SUCH THAT IT 
+                                          I
           WILL POP ANY OPERATOR OUT OF THE STACK.  HOWEVER WHEN  A  LEFT 
+                                                   H 
           PARENTHESIS  IS  POPPED  FROM  THE  STACK THE EXECUTION OF ITS 
           OPERATOR  CODE  EXITS  IN  A  MANNER  SUCH  THAT   THE   RIGHT 
           PARENTHESIS  IS LOST AND THUS THE LEFT/RIGHT PARENTHESISES ARE 
           BALANCED.
: 
    4.2.3  EACH OPERAND IS IMMEDIATELY EVALUATED AND ITS VALUE IS  STORED 
+          E
           IN  THE  OPERAND STACK.  EACH OPERATION POPS THE OPERAND STACK 
+                                   E 
           FOR EITHER ONE OR TWO OPERANDS  AND  THEN  THE  VALUE  OF  THE 
           RESULT  OF  THE OPERATION IS ADDED TO THE OPERAND STACK.  WHEN 
+                                                                    W
           THE EVALUATION OF AN EXPRESSION IS COMPLETE THE OPERAND  STACK 
           CONTAINS ONLY  ONE ENTRY WHICH IS THE VALUE OF THE EXPRESSION. 
: 
: 
    4.3  CCLSUB-SUBROUTINE GROUP-ADDITIONAL ROUTINES
+        CCLSUB 
: 
         CCLASV IS A SUBROUTINE IN CCLSUB WHICH ASSEMBLES  THE  VERB  AND 
+        CCLASV                    CCLSUB 
         IDENTIFIES  THE  FOLLOWING  SEPARATOR  FROM A CONTROL STATEMENT. 
+ 
         THE THREE SYSTEMS DIFFER SLIGHTLY IN THEIR PROCESSING OF  VERBS. 
+        T
         CCLASV  WILL  INTERPRET  THE  VERB ACCORDING TO THE RULES OF THE 
+        CCLASV 
         HOST SYSTEM.  NOS MAY HAVE LEADING PARAMETERS WHICH ARE IGNORED. 
+                      NOS
         CCL  REQUIRES THE SEPARATOR FOLLOWING THE VERB TO BE A STATEMENT 
+        CCL
         TERMINATOR, COMMA, OR LEFT PARENTHESIS.  IF A  BLANK IS  BETWEEN 
+                                                 I 
         THE  VERB  AND  THE  SEPARATOR  IT IS IGNORED EVEN ON THE NOS/BE 
+                                                                  NOS BE 
         SYSTEM.
: 
         OTHER SUBROUTINES IN CCLSUB PROVIDE  SERVICES  SUCH  AS  READING 
+        O                    CCLSUB
         CONTINUATION   CARDS,  CORRELATE  SYMBOLIC  NAMES  WITH  VARIOUS 
         VALUES, PROCESS LABELS OF CONDITIONAL STATEMENTS, SEARCH FORWARD 
         IN  CONTROL STATEMENTS (VIA CONTRLC/CONTROL) FOR A SPECIFIC VERB 
+                                    CONTRLC CONTROL
         AND SET A SYMBOLIC NAME TO A VALUE.
: 
: 
: 
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
    4.4  STRCCL- STRING PROCESSING SUBROUTINE GROUP 
+        STRCCL- STRING PROCESSING SUBROUTINE GROUP 
: 
         ALL FUNCTIONS PERFORMED BY CCL REQUIRE CONTROL CARD CRACKING.  A 
+        A                          CCL                                 A 
         CONTROL CARD IS SIMPLY  A  CHARACTER  STRING  AND  THE  CRACKING 
         PROCESS  IDENTIFIES  CERTAIN  CHARACTERS WHICH ARE DEFINED TO BE 
         SEPARATORS  AND  ALSO  FORMS  STRINGS  WHICH  CONSIST   OF   THE 
         CHARACTERS BETWEEN SEPARATORS. 
: 
         THE  LOGIC  WITHIN  CCL  DEPENDS  UPON  THE  CRACKING PROCESS TO 
+        T                   CCL
         IDENTIFY LEADING, FOLLOWING  AND/OR  ADJACENT  SEPARATORS  WHICH 
         EFFECT  THE  DECISIONS  OF  CCL.   THEREFORE IT IS IMPERATIVE TO 
+                                    CCL    T 
         UNDERSTAND THE STRING ROUTINES OF CCL IN ORDER  TO  CLARIFY  THE 
+                                          CCL
         LOGIC OF CCL FUNCTIONS.
+                 CCL 
: 
         THE SUBROUTINES NECESSARY TO PROCESS A STRING ARE GROUPED IN THE 
+        T
         PROGRAM  STRCCL.   ANY  CONTROL  CARD  OR  OTHER  STRING  TO  BE 
+                 STRCCL    A 
         PROCESSED  IS  FIRST  SCATTERED  INTO  A  SCATTER  BUFFER.  EACH 
+                                                                    E
         CHARACTER OF THE STRING IS STORED IN THE LOWER  SIX  BITS  OF  A 
         WORD  IN  THE  BUFFER.   A SCATTER BUFFER HAS 90 WORDS AND A ONE 
+                                 A 
         WORD HEADER.  THE  HEADER  CONTAINS  TWO  18  BIT  FIELDS  WHICH 
+                      T
         IDENTIFY  THE  TOTAL  NUMBER OF CHARACTERS IN THE BUFFER (SBTOT) 
+                                                                  SBTOT) 
         AND THE RELATIVE OFFSET OF THE CURRENT SEPARATOR (SBCUR).
+                                                          SBCUR
: 
         THE SUBROUTINE STRUPS UNPACKS  A  STRING  AND  ADDS  IT  TO  THE 
+        T              STRUPS
         CONTENTS OF THE SCATTER BUFFER.
: 
         THE  CONTENTS  OF  A SCATTER BUFFER ARE THEN BROKEN INTO STRINGS 
+        T
         AND SEPARATORS  BY  MAKING  REPEATED  CALLS  TO  THE  SUBROUTINE 
         STRANS.   EACH  CALL  WILL  ADVANCE  THE  CURRENT SCATTER BUFFER 
+        STRANS    E
         HEADER TO THE NEXT SEPARATOR.  THE CHARACTERS  BETWEEN  THE  TWO 
+                                       T 
         SEPARATORS  ARE  FORMED  INTO  A  STRING  WHICH  IS STORED, LEFT 
         JUSTIFIED, IN ANSSTR.  THE ANS DATA TABLE IS IN THE COMMON  DECK 
+                      ANSSTR   T   ANS 
         COMALL.   OTHER  INFORMATION  IN THE TABLE IS ALSO SET DURING  A 
+        COMALL    O
         CALL  TO  STRANS.   THE  NUMBER  OF  CHARACTERS  IN  THE  STRING 
+                  STRANS    T
         (ANSCHR),   THE   PREVIOUS  SEPARATOR  (ANSPSP),  THE  FOLLOWING 
+         ANSCHR                                 ANSPSP 
         (CURRENT) SEPARATOR (ANSSEP),  FLAGS  TO  INDICATE  WHETHER  THE 
+                             ANSSEP
         STRING  IS  A  NUMERIC  (ANSNUM)  OR A LITERAL (ANSLIT).  IF THE 
+                                 ANSNUM                 ANSLIT    I
         STRING IS A LITERAL THE EVALUATED FORM OF  THE  STRING  AND  THE 
         NUMBER  OF CHARACTERS IN THE EVALUATED FORM (ANSEVL AND ANSEVLC) 
+                                                     ANSEVL     ANSEVLC
         ARE ALSO STORED. 
: 
         THE SUBROUTINE STRPKS PACKS ALL OF THE CHARACTERS IN  A  SCATTER 
+        T              STRPKS
         BUFFER INTO ONE STRING.  CCL PERFORMS CONCATENATION BY UNPACKING 
+                                 CCL 
         MULTIPLE STRINGS INTO A SCATTER BUFFER AND THEN  CALLING  STRPKS 
+                                                                  STRPKS 
         TO PACK THE CHARACTERS INTO ONE STRING.
: 
         CCL  USES  THREE  SCATTER  BUFFERS.   SCATBF1  IS LOCATED IN THE 
+        CCL                                   SCATBF 
         COMMON DECK COMALL AND IS USED TO PROCESS ANY CONTROL CARDS  AND 
+                    COMALL 
         ALSO  IS  USED  TO  PROCESS  EACH  CARD  FROM  A PROCEDURE BODY. 
         SCATBF2 IS IN THE COMMON DECK COMBRWE AND IS USED TO PROCESS THE 
+        SCATBF                        COMBRWE
         PROCEDURE  HEADER  AND  IS  USED  TO  ASSEMBLE  EACH  LINE  OF A 
         PROCEDURE BODY AFTER EACH STRING IN THE  LINE  IS  EXAMINED  FOR 
         POSSIBLE  SUBSTITUTION.   SCATX IS IN DECK COMALL AND IS USED TO 
+                                  SCATX            COMALL
         ASSEMBLE MESSAGES AND CONCATENATED STRINGS.
: 
         THE ASSEMBLY OF CHARACTER STRINGS BY STRANS IS DONE  IN  ONE  OF 
+        T                                    STRANS
         TWO  MODES.   MODE  ZERO IGNORES BLANKS AND RECOGNIZES LITERALS. 
+                      M
: 
: 
: 
1 
         CYBER CONTROL LANGUAGE 
         IMS                                                   78/09/06 
: 
         MODE ONE TREATS ALL NON-ALPHANUMERIC  CHARACTERS  AS  SEPARATORS 
+        M
         INCLUDING  BLANK AND DOLLAR SIGN.  MODE ONE IS USED TO CRACK THE 
+                                           M 
         CARDS OF A PROCEDURE BODY.  CONTROL STATEMENTS AND THE PROCEDURE 
+                                    C
         HEADER ARE CRACKED USING MODE ZERO OF STRANS.
+                                              STRANS 
: 
         A  MESSAGE  ASSEMBLY  SUBROUTINE  (STRMSG)   IS ALSO PROVIDED IN 
+        A                                  STRMSG
         STRCCL.   INPUT  TO  STRMSG  IDENTIFIES  UP  TO  THREE   MESSAGE 
+        STRCCL    I          STRMSG
         COMPONENTS.   THE  LENGTH  OF EACH COMPONENT IS DETERMINED (ZERO 
+                      T
         BYTE,  TRAILING  ZEROS  DISCARDED).   THEN  THE  COMPONENTS  ARE 
+                                              T
         CONCATENATED AND ISSUED AS A DAYFILE MESSAGE.
: 
: 
    4.5  IOCCL-SUBROUTINE GROUP 
+        IOCCL
: 
         IOCCL PROVIDES ALL THE  I/O  FUNCTIONS  NEEDED.   THE  INTERFACE 
+        IOCCL                                             T
         BETWEEN VERBS AND IOCCL IS KEPT TO A MINIMUM.  THE I/O FUNCTIONS 
+                          IOCCL                        T   I O 
         REQUIRED BY CCL ARE OPEN, CLOSE, REWIND, READ, WRITE, AND  SKIP. 
+                    CCL     OPEN  CLOSE  REWIND  READ  WRITE       SKIP
         WHEN  EXECUTED  ON  SCOPE 2  EACH  SUBROUTINE  IN IOCCL EXECUTES 
+        W                   SCOPE                         IOCCL
         RECORD MANAGER MACROS.  WHEN EXECUTED  ON  NOS  OR  NOS/BE  EACH 
+                                W                  NOS      NOS BE 
         SUBROUTINE  WITHIN IOCCL PROVIDES AN INTERFACE BETWEEN VERBS AND 
+                           IOCCL 
         THE COMMON DECKS WHICH WILL CONTROL THE I/O.  (COMCRDC, COMCWTW) 
+                                                I O    COMCRDC  COMCWTW
: 
: 
    5.0  INSTALLATION PARAMETERS- 
+        INSTALLATION PARAMETERS
: 
         ALL  SIGNIFICANT  DEFINITIONS  ARE  SPECIFIED IN THE COMMON DECK 
+        A
         CCL.  THIS PROVIDES A CENTRAL SOURCE FOR DEFINITIONS AND IT ALSO 
+        CCL   T
         ALLOWS  INSTALLATIONS  TO  EASILY  MODIFY  THE  MOST SIGNIFICANT 
         PARAMETERS.  THE 'IP.'  SYMBOLS ARE AT THE BEGINNING OF THE DECK 
+                     T    IP 
         AND  INCLUDE  ALL VALUES WHICH AN INSTALLATION SHOULD REVIEW AND 
         POSSIBLY MODIFY BEFORE INSTALLATION.  SYMBOLS  WHOSE  DEFINITION 
+                                              S
         DEPENDS  UPON  THE  HOST  OPERATING  SYSTEM ARE DEFINED WITH THE 
         LEADING  CHARACTERS  'SD.'.   OTHER  VARIABLES  WHICH  ARE   NOT 
+                              SD      O
         EXPECTED  TO BE MODIFIED DURING INSTALLATION ARE ALSO GROUPED IN 
         THE DECK CCL TO EASE FUTURE MODIFICATIONS. 
+                 CCL 
: 
         THE INSTALLATION PARAMETERS  (AND NOMINAL VALUES)
+        T
            DEFAULT PROCEDURE FILE (PROCFIL)
            DEFAULT ID FOR ATTACH(PUBLIC) 
+                   ID
            OPERANDS AND OPERATORS IN EXPRESSION(100) 
            MAXIMUM CHARACTER LENGTH OF PROCEDURE PARAMETERS(40)
            MAXIMUM NUMBER OF FORMAL PARAMETERS(50) 
            MAXIMUM NUMBER OF CHARACTERS IN A FORMAL PARAMETER(40)
            MAXIMUM CHARACTERS IN A LABEL(10) 
            SINGLE CHARACTER OPERATOR OPTION(0) 
            PROCEDURE FROM TAPE OPTION(1) 
            PROCEDURE NESTING LEVEL(50) 
            MAXIMUM SEPCIFICATION CHARACTER STRING(40)
            RELEASE VERSION OF CCL(240) 
         OTHER VARIABLES IN THE DECK CCL INCLUDE. 
+                                    CCL
            NAMES OF Z FILES (ZZZZZC0,ZZZZZC1,ZZZZZC2)
            BASE NAME FOR DATA FILES(ZZCCLAA) 
: 
: 
    6.0  MESSAGES 
+        MESSAGES 
: 
         ALL MESSAGES  FROM  CCL ARE PREFIXED WITH 'CCLIII-'.  III IS THE 
+        A                   CCL                    CCL 
         MESSAGE NUMBER.  ERRORS  ARE  GENERALLY  NOTED  WITH  SUFFICIENT 
         INFORMATION TO ENABLE IMMEDIATE CORRECTION.
: 
: 
: 
: 
1 
*ENDIF
