*COMDECK SCACLDCLS
          ITEM SCAREAONNAME U(0,0,42);    # PROCEDURE NAME, 1 - 7 CHAR-#
                                          # ACTERS,LEFT JUSTIFIED,     #
                                          # WITH ZERO FILL.            #
          ITEM SCAREANEXTON B(0,48,1);    # TRUE = ANOTHER CALL ENTRY  #
                                          #        IN THE NEXT WORD    #
          ITEM SCARPROCOPT U(0,49,11);    # AREA PROC-CALLS OPTIONS    #
          ITEM SCAREAONBFAF U(0,49,3);    # LOGICAL ORS P1 VALUE OF KEY#
                                          # WORD TO SET PROPER FLAGS   #
          ITEM SCAREAONOPT U(0,52,8);     # LOGICAL ORS P1 VALUE OF KEY#
                                          # WORD TO SET PROPER FLAGS   #
          ITEM SCARCALLERR B(0,49,1);     # 1 = ON-ERROR SPECIFIED     #
          ITEM SCARCALLBEF B(0,50,1);     # 1 = BEFORE SPECIFIED       #
          ITEM SCARCALLAFT B(0,51,1);     # 1 = AFTER SPECIFIED        #
          ITEM SCARCALLOPN B(0,52,1);     # 1 = OPEN SPECIFIED         #
          ITEM SCARCALLCLS B(0,53,1);     # 1 = CLOSE SPECIFIED        #
          ITEM SCARONUPRTOP U(0,54,6);    # UPDATE/RETRIEVAL OPTIONS   #
          ITEM SCARCALLRNEX B(0,54,1);    # 1 = NONEXCL RETR SPECIFIED #
          ITEM SCARCALLREXC B(0,55,1);    # 1 = EXCL RETR SPECIFIED    #
          ITEM SCARCALLRPRT B(0,56,1);    # 1 = PROT RETR SPECIFIED    #
          ITEM SCARCALLUNEX B(0,57,1);    # 1 = NONEXCL UPDATE SPEC.   #
          ITEM SCARCALLUEXC B(0,58,1);    # 1 = EXCL UPDATE SPECIFIED  #
          ITEM SCARCALLUPRT B(0,59,1);    # 1 = PROT UPDATE SPECIFIED  #
