00001 ***** 11/11/02 00002 * DTSIT006 00003 * DTSIT006 RATING TRANSACTION RECORD. LV004 00004 * DTSIT006 00005 * DTSIT006 00006 * 09/23/1998 REVIEWED AND MODIFIED FOR DC. EHH DTSIT006 00007 * DTSIT006 00008 ***** DTSIT006 00009 DTSIT006 00010 10 T006-LENGTH PIC S9(04) COMP. DTSIT006 00011 DTSIT006 00012 10 T006-COMMON-AREA. DTSIT006 00013 15 T006-REC-TYPE PIC X(03) VALUE '006'. DTSIT006 00014 15 T006-EMP-NO PIC S9(07) COMP-3. DTSIT006 00015 15 T006-ORIGIN PIC X(10). DTSIT006 00016 15 FILLER REDEFINES T006-ORIGIN. DTSIT006 00017 20 T006-OP-ID PIC X(08). DTSIT006 00018 20 T006-SCR-ID PIC X(02). DTSIT006 00019 15 T006-SYS-DATE PIC S9(09) COMP-3. DTSIT006 00020 15 T006-SYS-TIME PIC S9(07) COMP-3. DTSIT006 00021 DTSIT006 00022 10 T006-DATA-AREA. DTSIT006 00023 15 T006-TRN-CD PIC X(02). DTSIT006 00024 88 T006-UIRTE-EXIST-CHK VALUE '01'. DTSIT006 00025 88 T006-UIRTE-NOTICE VALUE '03'. DTSIT006 00026 88 T006-FINAL-RATE VALUE '04'. DTSIT006 00027 DTSIT006 00028 15 T006-RESP-OP-ID PIC X(08). DTSIT006 00029 DTSIT006 00030 15 T006-START-YRQ PIC S9(05) COMP-3. DTSIT006 00031 DTSIT006 00032 15 T006-END-YRQ PIC S9(05) COMP-3. DTSIT006 00033 DTSIT006 00034 15 FILLER PIC X(20). DTSIT006