***************************************************************** * LENGTH: 230 * ***************************************************************** 01 MBE-CURR-MO-DETAIL. 05 DET-AGENCY PIC X(03). 05 DET-ORGANIZATION PIC X(04). 05 DET-REPT-ORG-2 PIC X(04). 05 DET-OBJECT PIC X(04). 05 DET-GROUP PIC X(02). 88 MBE-DPMM VALUE '1D'. 88 MBE-AGENCY VALUE '1A'. 88 NON-DPMM VALUE '3D'. 88 NON-AGENCY VALUE '3A'. 05 DET-MBE-SUBC-IND PIC X(01). 05 DET-WBE-SUBC-IND PIC X(01). 05 DET-AGENCY-NAME PIC X(30). 05 DET-ORG-NAME PIC X(30). 05 DET-OBJECT-NAME PIC X(30). 05 DET-ACCEPTANCE-DATE PIC X(08). 05 DET-VENDOR-NUMBER PIC X(10). 05 DET-VENDOR-ADDR-IND PIC X(01). 05 DET-VENDOR-NAME PIC X(30). 05 DET-PRICE-AGR-NUM PIC X(11). 05 DET-FISC-YR PIC X(04). 05 DET-EXP-TR-CODE PIC X(02). 05 DET-EXP-TR-NUM-AGY PIC X(03). 05 DET-EXP-TR-NUM-NUM PIC X(11). 05 DET-ENC-TR-CODE PIC X(02). 05 DET-ENC-TR-NUM-AGY PIC X(03). 05 DET-ENC-TR-NUM-NUM PIC X(11). 05 DET-MBE-AMT-YTD PIC S9(13)V99 COMP-3. 05 DET-WBE-AMT-YTD PIC S9(13)V99 COMP-3. 05 DET-EXPENDED-AMT PIC S9(13)V99 COMP-3. 05 MBE-WBE-IND PIC X(01).