00001 *****                                                             03/01/12
00002 *                                                                 DTSIL826
00003 *    DTSIL826     ACCOUNTING HISTORY FILE OUTPUT LINKAGE.            LV001
00004 *                                                                 DTSIL826
00005 *    DTSIL826 IS USED IN CONJUNCTION WITH DTSIAATH                DTSIL826
00006 *    TO FORM THE COMMUNICATIONS AREA FOR DTSCU826.                DTSIL826
00007 *                                                                 DTSIL826
00008 *                                                                 DTSIL826
00009 *    12/14/2009  INITIAL DEVELOPMENT            GD                DTSIL826
00010 *                                                                 DTSIL826
00011 *****                                                             DTSIL826
00012                                                                   DTSIL826
00013          10  L826-CMND-CD                PIC  X(03).              DTSIL826
00014              88  L826-WRITE-88                   VALUE 'WR '.     DTSIL826
00015                                                                   DTSIL826
00016          10  FILLER                      PIC  X(60).              DTSIL826
00017                                                                   DTSIL826
00018          10  L826-MSG-AREA.                                       DTSIL826
00019              15  L826-MSG-ID             PIC  X(04).              DTSIL826
00020              15  L826-MSG-TXT            PIC  X(60).              DTSIL826
00021                                                                   DTSIL826
00022          10  L826-RESULT-IND             PIC  X(01).              DTSIL826
00023              88  L826-OK-88                      VALUE '0'.       DTSIL826
00024              88  L826-FILE-CLOSED-88             VALUE '9'.       DTSIL826