*COMDECK  CVTBL 
00001 *                                                                 04/04/78
00002 *     TABLE CONTAINING REQUESTS FOR CONVERSION                    CVTBL 
00003 *     THIS TABLE IS PASSED IN LINKAGE TO PROCESSING MODULES          LV002
00004 *                                                                 CVTBL 
00005  01  CVTBL.                                                       CVTBL 
00006      03  PROGRAM-TABLE.                                           CVTBL 
00007          05  CVT-PROG-TABLE      OCCURS 100 TIMES.                CVTBL 
00008              07  CVT-PROG-NAME       PICTURE X(8).                CVTBL 
00009              07  CVT-NEWNAME         PICTURE X(32).               CVTBL 
00010              07  CVT-NOTES-OPT       PICTURE X.                   CVTBL 
00011              07  CVT-PROGRAM     PICTURE X.                          CL**2
00012              07  CVT-MOD-FND     PICTURE X.                          CL**2
00013      03  SELECT-TABLE.                                            CVTBL 
00014          05  CVT-SELECT-TABLE        OCCURS 200 TIMES.            CVTBL 
00015              07  SELECT-ID           PICTURE XXX.                 CVTBL 
00016              07  CVT-DATANAME        PICTURE X(32).               CVTBL 
00017              07  CVT-LEVEL           PICTURE XX.                  CVTBL 
00018              07  CVT-PREFIX      PICTURE X(9).                       CL**2
00019              07  CVT-CREATE-OPTS.                                 CVTBL 
00020                  09  CVT-FILE        PICTURE X.                   CVTBL 
00021                  09  CVT-RECORD      PICTURE X.                   CVTBL 
00022                  09  CVT-GROUP       PICTURE X.                   CVTBL 
00023                  09  CVT-ELEMENT     PICTURE X.                      CL**2
00024                  09  CVT-DATABASE    PICTURE X.                   CVTBL 
00025                  09  CVT-PSB         PICTURE X.                   CVTBL 
00026              07  CVT-SEL-FND         PICTURE X.                      CL**2
00027      03  RENAME-TABLE.                                            CVTBL 
00028          05  CVT-RENAME-TABLE        OCCURS 200 TIMES.            CVTBL 
00029              07  RENAME-ID           PICTURE XXX.                 CVTBL 
00030              07  CVT-RENAME          PICTURE X(32).               CVTBL 
00031              07  CVT-CATNAME         PICTURE X(32).               CVTBL 
00032              07  CVT-ALIAS           PICTURE X.                   CVTBL 
00033              07  CVT-BEGIN       PICTURE X(4).                       CL**2
00034      03  LANG-CODE               PICTURE X.                          CL**2
00035      03  PROG-SUB                PICTURE 999.                        CL**2
00036      03  SEL-SUB                 PICTURE 999.                        CL**2
00037      03  RN-SUB                  PICTURE 999.                        CL**2
00038      03  PROG-SUB-HI             PICTURE 999.                        CL**2
00039      03  SEL-SUB-HI              PICTURE 999.                        CL**2
00040      03  RN-SUB-HI               PICTURE 999.                        CL**2
00041      03  CVTBL-MOD-REQUEST       PICTURE X.                          CL**2
           03  INCLUDE-NOTES           PICTURE X. 
00042      03  SAVE-CTL-NAME              PICTURE X(27).                   CL**2
00043      03  SAVE-CTL-LINES              PICTURE S99.                    CL**2
00044      03  SAVE-CTL-DATE-UPD          PICTURE X(8).                    CL**2
00045      03  SAVE-CTL-REV-NUM           PICTURE S9(5) .                CVTBL
           03  STRUCT-COUNT            PICTURE 9(7).
00046                                                                    CVTBL
