*COMDECK SCIHDDCLS
          ITEM SCITMDATATYP U(0,0,3);     # 1 = ELEMENTARY ITEM        #
                                          # 2 = REPEATING GROUP        #
                                          # 3 = REPEATING GROUP WITHIN #
                                          #     REPEATING GROUP        #
                                          # 4 = VECTOR                 #
                                          # 5 = VECTOR WITHIN REPEATING#
                                          #     GROUP                  #
                                          # 6 = REPEATING GROUP OF     #
                                          #     VARIABLE DEMENSION     #
                                          # 7 = VECTOR OF VAR. DIMEN.  #
          ITEM SCITMNAMLENW U(0,3,3);     # LENGTH OF ITEM NAME IN WRDS#
          ITEM SCITMNAMLENC U(0,6,6);     # LENGTH OF ITEM NAME IN CHRS#
          ITEM SCITEMLEVEL  U(0,12,9);    # LEVEL NUMBER 1-99          #
          ITEM SCITMENTRYLG U(0,21,18);   # NUMBER OF WORDS IN THE     #
                                          # SUBJECT SCHEMA ITEM ENTRY  #
          ITEM SCITEMDBPFLG B(0,39,1);    # TRUE = DATA BASE PROCEDURE #
                                          # OR CHECK CLAUSE IS CALLED  #
                                          # AT THIS ITEM OR SOME       #
                                          # SUBSID+A-Y ITEM            #
          ITEM SCITMDARFLAG B(0,40,1);    # SUBJECT ITEM OR SUBSIDIARY #
                                          # ITEM CONTRIBUTES TO AN     #
                                          # ACTUAL RESULT CLAUSE       #
          ITEM SCITMCARFLAG B(0,41,1);    # SUBJECT ITEM OR SUBSIDIARY #
                                          # ITEM CONTA+NS AN ACTUAL    #
                                          # RESULT CLAUSE              #
          ITEM SCITMORDNUM  U(0,42,18);   # ITEM ORDINAL NUMBER        #
          ITEM SCITEMPBWP U(1,0,18);      # RELATIVE WORD POSITION IN A#
                                          # RECORD                     #
          ITEM SCITEMBBP U(1,18,6);       # RELATIVE BIT POSITION IN A #
                                          # RECORD                     #
          ITEM SCITEMCLASS U(1,24,6);     # 0 - ALPHANUMERIC           #
                                          # 1 - ALPHABETIC             #
                                          # 3 - DISPLAY NUMERIC        #
                                          # 4 - DISPLAY FIXED PT       #
                                          # 10 - FIXED PT(UNBIASED)    #
                                          # 12 - UNNORMALIZED FLOAT PT #
                                          # 13 - NORMALIZED FLOAT PT   #
                                          # 14 - DOUBLE PRECISION      #
                                          # 15 - COMPLEX FLOATING PT.  #
                                          # 16 - LOGICAL (BINARY 0/1)  #
                                          # 17 - FTN LOGICAL (FULL WD) #
                                          # 18 - FTN BOOLEAN (FULL WD) #
                                          # ( DECIMAL VALUES )         #
          ITEM SCITEMSIZE U(1,30,18);     # LENGTH OF ITEM IN CHARS    #
          ITEM SCITMPICLITP U(1,48,12);   # OFFSET POINTER TO THE      #
                                          # PICTURE LITERAL            #
          ITEM SCITMPICINFO U(2,0,18);    # ITEM PICTURE INFO          #
          ITEM SCITMSGNINFO U(2,0,8);     # ITEM SIGN INFO             #
          ITEM SCITMSIGNINF U(2,7,1);     # SIGN INFORMATION FOR USE   #
                                          # BY COBOL SUB-SCHEMA.       #
          ITEM SCITEMSLOC U(2,0,6);       # LOCATION OF SIGN RELATIVE  #
                                          # TO THE RIGHT MOST POISTION #
          ITEM SCITEMSIGN B(2,6,1);       # TRUE = SEPARATE SIGN       #
                                          # FALSE = OVER PUNCH SIGN    #
          ITEM SCITEMSIGNFG B(2,7,1);     # TRUE = SIGN SPECIFIED      #
          ITEM SCITMPTINFO U(2,9,8);      # ITEM POINT INFO            #
          ITEM SCITEMPTLOC U(2,9,6);      # LOCATION OF DECIMAL POINT  #
                                          # RELATIVE TO THE RIGHT MOST #
                                          # POSITION                   #
          ITEM SCITEMACTLPT B(2,15,1);    # FALSE = ASSUMED DECIMAL PT #
                                          # TRUE = ACTUAL DECIMAL PT   #
          ITEM SCITEMPTLEFT B(2,16,1);    # TRUE = LOCATION OF ASSUMED #
                                          #        POINT IS FROM THE   #
                                          #        LEFT                #
          ITEM SCITMOCCINFO U(2,18,42);   # ITEM OCCURS INFO           #
          ITEM SCITMDIMOCC B(2,18,1);     # FALSE = INTEGER VALUE      #
                                          # TRUE = DATA-BASE-IDENTIFIER#
                                          #         ORDINAL NUMBER     #
          ITEM SCITMINTVAL U(2,21,21);    # CONTAINS EITHER A INTEGER  #
                                          # VALUE FOR FIXED OCCURS OR  #
                                          # MAXIMUM VALUE FOR DEPENDING#
                                          # ON OCCURS (CHECK RANGE VAL)#
          ITEM SCITMDEPORDL U(2,42,18);   # ORDINAL NUMBER OF DEPENDING#
                                          # ON ITEM                    #
          ITEM SCITEMPRIORP U(3,0,18);    # OFFSET POINTER TO THE PRIOR#
                                          # ITEM ENTRY                 #
          ITEM SCITMDOMORD U(3,18,18);    # ORDINAL NUMBER OF DOMINANT #
                                          # ITEM.                      #
          ITEM SCITMPICLEN U(3,36,3);     # LENGTH IN WORDS OF THE     #
                                          # PICTURE LITERAL STRING     #
          ITEM SCITMRESSCRF B(3,39,1);    # FALSE = ACTUAL/VIRTUAL     #
                                          # RESULT POINTER IS POINTING #
                                          # TO A RESULT ENTRY.         #
          ITEM SCITEMTYPE B(3,40,1);      # TRUE = TYPE CLAUSE SPECIFID#
          ITEM SCITEMNXTPTR U(3,42,18);   # OFFSET POINTER TO THE NEXT #
                                          # ITEM ENTRY                 #
          ITEM SCITMATVTP U(4,0,12);      # OFFSET POINTER TO THE      #
                                          # ACTUAL VIRTUAL RESULT.     #
          ITEM SCITEMPRIVP U(4,12,12);    # OFFSET POINTER TO THE      #
                                          # PRIVACY ENTRY.             #
          ITEM SCITEMCHECKS U(4,24,12);   # OFFSET POINTER TO THE      #
                                          # CKECKS ENTRY.              #
          ITEM SCITMENCDPTR U(4,36,12);   # OFFSET POINTER TO THE      #
                                          # ENCODE/DECODE POINTER      #
          ITEM SCITEMONPTR U(4,48,12);    # OFFSET POINTER TO THE CALL #
                                          # ENTRY                      #
          ITEM SCITMINT1 C(5,0,2);        # CONTAINS THE DISPLAY CODE  #
                                          # VALUE OF INTEGER-1 WHICH   #
                                          # WAS SPECIFIED IN THE TYPE  #
                                          # CLAUSE                     #
          ITEM SCITMINT2 C(5,12,2);       # CONTAINS THE DISPLAY CODE  #
                                          # VALUE OF INTEGER-2 WHICH   #
                                          # WAS SPECIFIED IN THE TYPE  #
                                          # CLAUSE.                    #
          ITEM SCITMINT3 C(5,0,5);        # CONTAINS THE DISPLAY CODE  #
                                          # VALUE OF INTEGER-3 WHICH   #
                                          # WAS SPECIFIED IN THE TYPE  #
                                          # CLAUSE.                    #
          ITEM SCITRLDOMPTR U(5,42,18);   # CONTAINS THE POINTER TO    #
                                          # THE DOMINANT ITEM(RESER-   #
                                          # VED FOR RELATION ENTRY PRO-#
                                          # CESSING).                  #
          ITEM SCITMCKEXPTR U(6,0,15);    # OFFSET POINTER FROM THE    #
                                          # FIRST WORD OF THE SUBJECT  #
                                          # ITEM SUB-ENTRY TO THE FIRST#
                                          # CHECK LITERAL ENTRY.       #
          ITEM SCITMNAMEPTR U(6,15,6);    # OFFSET POINTER TO THE      #
                                          # ITEM NAME.                 #
          ITEM SCITEMRECA U(6,42,18);     # ADDRESS OF RECORD WHICH    #
                                          # CONTAINS THIS ITEM         #
          ITEM SCITEMNAME U(0,0,60);      # 1-30 CHARACTERS, LEFT      #
                                          # JUSTIFIED WITH ZERO FILL   #
          ITEM SCITMNAM30 C(0,0,30);      # 30 CHARACTER ITEM NAME     #
