      *   Micro Focus Net Express 5.0  5.001.0053
      *   Micro Focus BMS Screen Painter (ver COBC_1-1-81)
      *   MapSet Name   DLIDEMO
      *   Date Created  07/17/2006
      *   Time Created  09:28:20

      *  Input Data For Map DEMO90
         01 DEMO90I.
            03 FILLER                         PIC X(12).
            03 ENDING-TRANCODEL               PIC S9(4) COMP.
            03 ENDING-TRANCODEF               PIC X.
            03 ENDING-TRANCODEI               PIC X(79).
            03 END-LINE1L                     PIC S9(4) COMP.
            03 END-LINE1F                     PIC X.
            03 END-LINE1I                     PIC X(60).
            03 END-LINE2L                     PIC S9(4) COMP.
            03 END-LINE2F                     PIC X.
            03 END-LINE2I                     PIC X(60).
            03 END-LINE3L                     PIC S9(4) COMP.
            03 END-LINE3F                     PIC X.
            03 END-LINE3I                     PIC X(60).
            03 END-LINE4L                     PIC S9(4) COMP.
            03 END-LINE4F                     PIC X.
            03 END-LINE4I                     PIC X(60).
            03 END-LINE5L                     PIC S9(4) COMP.
            03 END-LINE5F                     PIC X.
            03 END-LINE5I                     PIC X(60).
            03 END-LINE6L                     PIC S9(4) COMP.
            03 END-LINE6F                     PIC X.
            03 END-LINE6I                     PIC X(60).

      *  Output Data For Map DEMO90
         01 DEMO90O REDEFINES DEMO90I.
            03 FILLER                         PIC X(12).
            03 FILLER                         PIC X(2).
            03 ENDING-TRANCODEA               PIC X.
            03 ENDING-TRANCODEO               PIC X(79).
            03 FILLER                         PIC X(2).
            03 END-LINE1A                     PIC X.
            03 END-LINE1O                     PIC X(60).
            03 FILLER                         PIC X(2).
            03 END-LINE2A                     PIC X.
            03 END-LINE2O                     PIC X(60).
            03 FILLER                         PIC X(2).
            03 END-LINE3A                     PIC X.
            03 END-LINE3O                     PIC X(60).
            03 FILLER                         PIC X(2).
            03 END-LINE4A                     PIC X.
            03 END-LINE4O                     PIC X(60).
            03 FILLER                         PIC X(2).
            03 END-LINE5A                     PIC X.
            03 END-LINE5O                     PIC X(60).
            03 FILLER                         PIC X(2).
            03 END-LINE6A                     PIC X.
            03 END-LINE6O                     PIC X(60).

      *  Input Data For Map DEMO91
         01 DEMO91I.
            03 FILLER                         PIC X(12).
            03 DEMO91-TRANSCODEL              PIC S9(4) COMP.
            03 DEMO91-TRANSCODEF              PIC X.
            03 DEMO91-TRANSCODEI              PIC X(79).
            03 DEMO91-PROGRAM-NOL             PIC S9(4) COMP.
            03 DEMO91-PROGRAM-NOF             PIC X.
            03 DEMO91-PROGRAM-NOI             PIC X(8).
            03 DEMO91-ERR-MSGL                PIC S9(4) COMP.
            03 DEMO91-ERR-MSGF                PIC X.
            03 DEMO91-ERR-MSGI                PIC X(35).
            03 DEMO91-FUNCTIONL               PIC S9(4) COMP.
            03 DEMO91-FUNCTIONF               PIC X.
            03 DEMO91-FUNCTIONI               PIC X(1).
            03 DEMO91-TABLE-IDL               PIC S9(4) COMP.
            03 DEMO91-TABLE-IDF               PIC X.
            03 DEMO91-TABLE-IDI               PIC X(32).
            03 DEMO91-ELESL                   PIC S9(4) COMP.
            03 DEMO91-ELESF                   PIC X.
            03 DEMO91-ELESI                   PIC X(20).
            03 DEMO91-PASSWORDL               PIC S9(4) COMP.
            03 DEMO91-PASSWORDF               PIC X.
            03 DEMO91-PASSWORDI               PIC X(8).

      *  Output Data For Map DEMO91
         01 DEMO91O REDEFINES DEMO91I.
            03 FILLER                         PIC X(12).
            03 FILLER                         PIC X(2).
            03 DEMO91-TRANSCODEA              PIC X.
            03 DEMO91-TRANSCODEO              PIC X(79).
            03 FILLER                         PIC X(2).
            03 DEMO91-PROGRAM-NOA             PIC X.
            03 DEMO91-PROGRAM-NOO             PIC X(8).
            03 FILLER                         PIC X(2).
            03 DEMO91-ERR-MSGA                PIC X.
            03 DEMO91-ERR-MSGO                PIC X(35).
            03 FILLER                         PIC X(2).
            03 DEMO91-FUNCTIONA               PIC X.
            03 DEMO91-FUNCTIONO               PIC X(1).
            03 FILLER                         PIC X(2).
            03 DEMO91-TABLE-IDA               PIC X.
            03 DEMO91-TABLE-IDO               PIC X(32).
            03 FILLER                         PIC X(2).
            03 DEMO91-ELESA                   PIC X.
            03 DEMO91-ELESO                   PIC X(20).
            03 FILLER                         PIC X(2).
            03 DEMO91-PASSWORDA               PIC X.
            03 DEMO91-PASSWORDO               PIC X(8).

      *  Input Data For Map DEMO92
         01 DEMO92I.
            03 FILLER                         PIC X(12).
            03 DEMO92-TRANSCODEL              PIC S9(4) COMP.
            03 DEMO92-TRANSCODEF              PIC X.
            03 DEMO92-TRANSCODEI              PIC X(79).
            03 DEMO92-PROGRAM-NOL             PIC S9(4) COMP.
            03 DEMO92-PROGRAM-NOF             PIC X.
            03 DEMO92-PROGRAM-NOI             PIC X(8).
            03 DEMO92-TYPEL                   PIC S9(4) COMP.
            03 DEMO92-TYPEF                   PIC X.
            03 DEMO92-TYPEI                   PIC X(7).
            03 DEMO92-TABLE-IDL               PIC S9(4) COMP.
            03 DEMO92-TABLE-IDF               PIC X.
            03 DEMO92-TABLE-IDI               PIC X(32).
            03 DEMO92-ERR-MSGL                PIC S9(4) COMP.
            03 DEMO92-ERR-MSGF                PIC X.
            03 DEMO92-ERR-MSGI                PIC X(35).
            03 DEMO92-LAST-KEY-GRPL           PIC S9(4) COMP.
            03 DEMO92-LAST-KEY-GRPF           PIC X.
            03 DEMO92-LAST-KEY-GRPI.
               05 DEMO92-LAST-KEYI               PIC X(20).
               05 DEMO92-PROCESS-INDI            PIC X(1).
               05 DEMO92-STATUSI                 PIC X(1).
               05 DEMO92-ISRT-ROOTI              PIC X(1).
               05 DEMO92-EXPANDI                 PIC X(13).
            03 DEMO92-DESCL                   PIC S9(4) COMP.
            03 DEMO92-DESCF                   PIC X.
            03 DEMO92-DESCI                   PIC X(50).
            03 DEMO92-ELE-KEY-CNTL            PIC S9(4) COMP.
            03 DEMO92-ELE-KEY-CNTF            PIC X.
            03 DEMO92-ELE-KEY-CNTI            PIC 9(2).
            03 DEMO92-ELE-CHRL                PIC S9(4) COMP.
            03 DEMO92-ELE-CHRF                PIC X.
            03 DEMO92-ELE-CHRI                PIC 9(2).
            03 DEMO92-ACT-DATEL               PIC S9(4) COMP.
            03 DEMO92-ACT-DATEF               PIC X.
            03 DEMO92-ACT-DATEI               PIC X(8).
            03 DEMO92-TBL-PROTL               PIC S9(4) COMP.
            03 DEMO92-TBL-PROTF               PIC X.
            03 DEMO92-TBL-PROTI               PIC X(1).
            03 DEMO92-TBL-PSWL                PIC S9(4) COMP.
            03 DEMO92-TBL-PSWF                PIC X.
            03 DEMO92-TBL-PSWI                PIC X(8).
            03 DEMO92-ELE-NUM-KEYL            PIC S9(4) COMP.
            03 DEMO92-ELE-NUM-KEYF            PIC X.
            03 DEMO92-ELE-NUM-KEYI            PIC X(1).
            03 DEMO92-ELE-NUM-VALL            PIC S9(4) COMP.
            03 DEMO92-ELE-NUM-VALF            PIC X.
            03 DEMO92-ELE-NUM-VALI            PIC X(1).
            03 CRT-LINEI                      OCCURS 14 TIMES.
               05 DEMO92-FUNCL                   PIC S9(4) COMP.
               05 DEMO92-FUNCF                   PIC X.
               05 DEMO92-FUNCI                   PIC X(1).
               05 DEMO92-ELE-KEYL                PIC S9(4) COMP.
               05 DEMO92-ELE-KEYF                PIC X.
               05 DEMO92-ELE-KEYI                PIC X(20).
               05 DEMO92-ELE-DATAL               PIC S9(4) COMP.
               05 DEMO92-ELE-DATAF               PIC X.
               05 DEMO92-ELE-DATAI               PIC X(50).
            03 DEMO92-RETURNL                 PIC S9(4) COMP.
            03 DEMO92-RETURNF                 PIC X.
            03 DEMO92-RETURNI                 PIC X(1).
            03 DEMO92-CONTL                   PIC S9(4) COMP.
            03 DEMO92-CONTF                   PIC X.
            03 DEMO92-CONTI                   PIC X(1).
            03 DEMO92-ABORTL                  PIC S9(4) COMP.
            03 DEMO92-ABORTF                  PIC X.
            03 DEMO92-ABORTI                  PIC X(1).
            03 DEMO92-NEXT-KEYL               PIC S9(4) COMP.
            03 DEMO92-NEXT-KEYF               PIC X.
            03 DEMO92-NEXT-KEYI               PIC X(20).

      *  Output Data For Map DEMO92
         01 DEMO92O REDEFINES DEMO92I.
            03 FILLER                         PIC X(12).
            03 FILLER                         PIC X(2).
            03 DEMO92-TRANSCODEA              PIC X.
            03 DEMO92-TRANSCODEO              PIC X(79).
            03 FILLER                         PIC X(2).
            03 DEMO92-PROGRAM-NOA             PIC X.
            03 DEMO92-PROGRAM-NOO             PIC X(8).
            03 FILLER                         PIC X(2).
            03 DEMO92-TYPEA                   PIC X.
            03 DEMO92-TYPEO                   PIC X(7).
            03 FILLER                         PIC X(2).
            03 DEMO92-TABLE-IDA               PIC X.
            03 DEMO92-TABLE-IDO               PIC X(32).
            03 FILLER                         PIC X(2).
            03 DEMO92-ERR-MSGA                PIC X.
            03 DEMO92-ERR-MSGO                PIC X(35).
            03 FILLER                         PIC X(2).
            03 DEMO92-LAST-KEY-GRPA           PIC X.
            03 DEMO92-LAST-KEY-GRPO.
               05 DEMO92-LAST-KEYO               PIC X(20).
               05 DEMO92-PROCESS-INDO            PIC X(1).
               05 DEMO92-STATUSO                 PIC X(1).
               05 DEMO92-ISRT-ROOTO              PIC X(1).
               05 DEMO92-EXPANDO                 PIC X(13).
            03 FILLER                         PIC X(2).
            03 DEMO92-DESCA                   PIC X.
            03 DEMO92-DESCO                   PIC X(50).
            03 FILLER                         PIC X(2).
            03 DEMO92-ELE-KEY-CNTA            PIC X.
            03 DEMO92-ELE-KEY-CNTO            PIC X(2).
            03 FILLER                         PIC X(2).
            03 DEMO92-ELE-CHRA                PIC X.
            03 DEMO92-ELE-CHRO                PIC X(2).
            03 FILLER                         PIC X(2).
            03 DEMO92-ACT-DATEA               PIC X.
            03 DEMO92-ACT-DATEO               PIC X(8).
            03 FILLER                         PIC X(2).
            03 DEMO92-TBL-PROTA               PIC X.
            03 DEMO92-TBL-PROTO               PIC X(1).
            03 FILLER                         PIC X(2).
            03 DEMO92-TBL-PSWA                PIC X.
            03 DEMO92-TBL-PSWO                PIC X(8).
            03 FILLER                         PIC X(2).
            03 DEMO92-ELE-NUM-KEYA            PIC X.
            03 DEMO92-ELE-NUM-KEYO            PIC X(1).
            03 FILLER                         PIC X(2).
            03 DEMO92-ELE-NUM-VALA            PIC X.
            03 DEMO92-ELE-NUM-VALO            PIC X(1).
            03 CRT-LINEO OCCURS 14.
               05 FILLER                         PIC X(2).
               05 DEMO92-FUNCA                   PIC X.
               05 DEMO92-FUNCO                   PIC X(1).
               05 FILLER                         PIC X(2).
               05 DEMO92-ELE-KEYA                PIC X.
               05 DEMO92-ELE-KEYO                PIC X(20).
               05 FILLER                         PIC X(2).
               05 DEMO92-ELE-DATAA               PIC X.
               05 DEMO92-ELE-DATAO               PIC X(50).
            03 FILLER                         PIC X(2).
            03 DEMO92-RETURNA                 PIC X.
            03 DEMO92-RETURNO                 PIC X(1).
            03 FILLER                         PIC X(2).
            03 DEMO92-CONTA                   PIC X.
            03 DEMO92-CONTO                   PIC X(1).
            03 FILLER                         PIC X(2).
            03 DEMO92-ABORTA                  PIC X.
            03 DEMO92-ABORTO                  PIC X(1).
            03 FILLER                         PIC X(2).
            03 DEMO92-NEXT-KEYA               PIC X.
            03 DEMO92-NEXT-KEYO               PIC X(20).

