00001 ***** 08/11/98 00002 * DTSISPR 00003 * DTSISPR PRINT SEND/RECEIVE AREA. LV004 00004 * DTSISPR 00005 * REVIEWED AND MODIFIED FOR DC. 08/11/1998 EHH CL**4 00006 * CL**4 00007 ***** DTSISPR 00008 CL**3 00009 10 FILLER PIC X(12). DTSISPR 00010 CL**3 00011 10 MAP-PRINT-LINE-AREA. DTSISPR 00012 15 MAP-PRINT-LINE-L PIC S9(04) COMP. DTSISPR 00013 15 MAP-PRINT-LINE-A PIC X(01). DTSISPR 00014 15 MAP-PRINT-LINE PIC X(125). DTSISPR