*COMDECK  EXTLINK 
00001  01  NAM-IDX-LINK.                                                04/28/78
00002      03  EXT-NAM-FIELDS.                                          EXTLINK 
00003          05  NAME-REQTYPE        PICTURE XX.                         LV002
00004          05  NAME-REQNO          PICTURE 99.                      EXTLINK 
00005          05  NAME-RECTYPE        PICTURE 9.                       EXTLINK 
00006          05  NAME-RECSEQ         PICTURE 999.                     EXTLINK 
00007          05  NAME-ENTTYPE        PICTURE  99.                     EXTLINK 
00008          05  NAME-NAMCOMP        PICTURE X(32).                   EXTLINK 
00009          05  NAME-CATNAME        PICTURE X(32).                   EXTLINK 
00010          05  NAME-CAT            PICTURE  999.                    EXTLINK 
00011          05  NAME-LINE           PICTURE 9(4).                    EXTLINK 
00012          05  NAME-NAMFULL        PICTURE X(32).                   EXTLINK 
00013          05  NAME-SELNO          PICTURE 99.                      EXTLINK 
00014      03  EXT-IDX-FIELDS.                                          EXTLINK 
00015          05  INDEX-REQTYPE       PICTURE XX.                      EXTLINK 
00016          05  INDEX-REQNO         PICTURE 99.                      EXTLINK 
00017          05  INDEX-RECTYPE       PICTURE 9.                       EXTLINK 
00018          05  INDEX-RECSEQ        PICTURE 999.                     EXTLINK 
00019          05  INDEX-ENTTYPE       PICTURE 99.                      EXTLINK 
00020          05  INDEX-VALUE         PICTURE X(32).                   EXTLINK 
00021          05  INDEX-CATNAME       PICTURE X(32).                   EXTLINK 
00022          05  INDEX-CAT           PICTURE 999.                     EXTLINK 
00023          05  INDEX-LINE          PICTURE 9(4).                    EXTLINK 
00024          05  INDEX-SELNO         PICTURE 99.                      EXTLINK 
00025      03  EXT-REL-FIELDS.                                          EXTLINK 
00026          05  REL-REQTYPE             PICTURE XX.                  EXTLINK 
00027          05  REL-REQNO               PICTURE 99.                  EXTLINK 
00028          05  REL-RECTYPE             PICTURE 9.                   EXTLINK 
00029          05  REL-RECSEQ              PICTURE 999.                 EXTLINK 
00030          05  REL-ENTTYPE             PICTURE 99.                  EXTLINK 
00031          05  REL-NAME                PICTURE X(32).               EXTLINK 
00032          05  REL-SORTID              PICTURE X(10).               EXTLINK 
00033          05  REL-RECCODE         PICTURE X.                          CL**2
00034          05  REL-CAT                 PICTURE 999.                 EXTLINK 
00035          05  REL-LINE                PICTURE 9(4).                EXTLINK 
00036          05  REL-CATNAME             PICTURE X(32).               EXTLINK 
00037          05  REL-SELNO               PICTURE 99.                  EXTLINK 
00038          05  REL-REFTYPE             PICTURE 99.                  EXTLINK 
00039          05  REL-REFNAME             PICTURE X(32).               EXTLINK 
00040          05  REL-USAGE               PICTURE X.                   EXTLINK 
00041          05  REL-ALIAS               PICTURE X.                   EXTLINK 
