*COMDECK DATSAV1
  
      ******************************************************************
      * 
      * HOLDING AREAS USED BY THE "SAVE-XXXX-INFO" ROUTINES FOR EVERY 
      * ENTITY TO BE SAVED. 
  
       01  HOLD-SCH.
           03  SCH-CAT-WORK       PICTURE X(162). 
           03  SCH-CON-LINE       PICTURE X(98).
           03  SCH-NAME           PICTURE X(32).
           03  SCH-NEXT-REC       PICTURE 9(4). 
           03  SCH-CAT            PICTURE X(3). 
           03  SCH-LINE-NO        PICTURE X(4). 
           03  SCH-LINETYPE       PICTURE X.
           03  SCH-DRCODE         PICTURE X.
           03  SCH-COL-IN         PICTURE 9(4). 
           03  SCH-DTL-LEN        PICTURE 9(3). 
           03  SCH-SKIP-COM       PICTURE X.
