*COMDECK SBGPRDCLS
#                                                                      #
#  SUBSCHEMA GLOBAL PRIVACY DECLARATIONS                               #
#                                                                      #
          ITEM SBNXPRIVPTR   U(0,15,12);  # OFFSET POINTER TO THE NEXT #
                                          # PRIVACY ENTRY              #
          ITEM SBPRVALPTR    U(0,27,9);   # OFFSET POINTER TO THE LOCK #
                                          # VALUE LIST                 #
                                          #                            #
                                          # THE LOCK ENTRIES APPEAR IN #
                                          # THE HEADER, (SYMPL) LOCATIO#
                                          # NS 36 AND 48--ADDITIONAL   #
                                          # LOCK ENTRIES WILL OCCUPY   #
                                          # SUCCEEDING WORDS BEGINNING #
                                          # AT (SYMPL) LOCATION 0. THE #
                                          # ENTRIES ARE 12/BIT FIELDS  #
                                          # STRUCTURED AS FOLLOWS--    #
                                          # BITS 0-2   TYPE            #
                                          #            1 = LITERAL     #
                                          #            2 = PROCEDURE   #
                                          #            3 = LOCK NAME   #
                                          #            6 = END OF LIST #
                                          #            7 = END OF LIST #
                                          #                NEW CLAUSE  #
                                          #                FOLLOWS     #
                                          # BITS 3-5   NAME LENGTH-WDS #
                                          # BITS 6-11  NAME LENGTH-CHS #
                                          #                            #
          ITEM SBPRLOKTYP1   U(0,0,3);    # FIRST LOCK TYPE            #
          ITEM SBPRLOKLWD1   U(0,3,3);    # FIRST LOCK LENGTH--WORDS   #
          ITEM SBPRLOKLCH1   U(0,6,6);    # FIRST LOCK LENGTH--CHARS   #
          ITEM SBPRLOKTYP2   U(0,12,3);   # SECOND LOCK TYPE           #
          ITEM SBPRLOKLWD2   U(0,15,3);   # SECOND LOCK LENGTH--WORDS  #
          ITEM SBPRLOKLCH2   U(0,18,6);   # SECOND LOCK LENGTH--CHARS  #
          ITEM SBPRLOKTYP3   U(0,24,3);   # THIRD LOCK TYPE            #
          ITEM SBPRLOKLWD3   U(0,27,3);   # THIRD LOCK LENGTH--WORDS   #
          ITEM SBPRLOKLCH3   U(0,30,6);   # THIRD LOCK LENGTH-CHARS    #
          ITEM SBPRLOKTYP4   U(0,36,3);   # FOURTH LOCK TYPE           #
          ITEM SBPRLOKLWD4   U(0,39,3);   # FOURTH LOCK LENGTH--WORDS  #
          ITEM SBPRLOKLCH4   U(0,42,6);   # FOURTH LOCK LENGTH--CHARS  #
          ITEM SBPRLOKTYP5   U(0,48,3);   # FIFTH LOCK TYPE            #
          ITEM SBPRLOKLWD5   U(0,51,3);   # FIFTH LOCK LENGTH--WORDS   #
          ITEM SBPRLOKLCH5   U(0,54,6);   # FIFTH LOCK LENGTH--CHARS   #
          ITEM SBLOCKWD     U(0,0,60);    # SCRATCH WORD FOR LOCKS     #
          ITEM SBLOCKNAME   C(0,0,10);    # LOCK VALUE, LEFT-JUSTIFIED #
                                          # WITH BLANK FILL            #
