01 COMMUNITY-MSTR-MCI-DATA-RECORD. 03 MCID-TRANSMITTED-DATA-RECORD. 05 MCID-PRIMARY-KEY. 10 MCID-REC-TYPE PIC X(03). 88 MCID-C01 VALUE 'C01'. 05 MCID-CHANGE-DATA-RECS. 10 MCID-SECONDARY-KEY. 15 MCID-STATE-ID-X PIC X(02). 15 MCID-COMM-NUM-X PIC X(04). 10 FILLER REDEFINES MCID-SECONDARY-KEY. 15 MCID-STATE-ID PIC 9(02). 15 MCID-COMM-NUM PIC 9(04). * ******************************************************** * * C01 TRANS. FORMAT - BASIC INFORMATION -- PART 1 * * ******************************************************** 10 MCID-C01-REC. 15 MCID-ALTERNATE-KEY. 20 MCID-ALT-KEY-STATE PIC X(02). 20 MCID-ALT-KEY-COMM PIC X(08). 15 MCID-COMMUN-NAME PIC X(50). 15 MCID-COMMUN-STATUS-X. 88 MCID-COMMUN-NON-PARTICIPATING VALUE ZERO. 88 MCID-COMMUN-ACTIVE VALUE '01' '02'. 88 MCID-COMMUN-PARTICIPATING VALUE '01'. 88 MCID-COMMUN-ON-PROBATION VALUE '02'. 88 MCID-COMMUN-SUSPENDED VALUE '03'. 88 MCID-COMMUN-WITHDRAWN VALUE '04'. 88 MCID-COMMUN-DEFUNCT VALUE '05'. 88 MCID-COMMUN-NOT-COMMUNITY VALUE '06'. 20 MCID-COMMUN-STATUS PIC 9(02). 15 MCID-POINTER-COMMUN-NBR-X. 20 MCID-POINTER-COMMUN-NBR PIC 9(06). 15 MCID-REGION-NBR PIC X(02). 15 MCID-ANNEXATION-DATE. 20 MCID-ANNEX-CENTURY-X. 25 MCID-ANNEX-CENTURY PIC 9(02). 20 MCID-ANNEX-YYMMDD. 25 MCID-ANNEX-YY-X. 30 MCID-ANNEX-YY PIC 9(02). 25 MCID-ANNEX-MM-X. 30 MCID-ANNEX-MM PIC 9(02). 25 MCID-ANNEX-DD-X. 30 MCID-ANNEX-DD PIC 9(02). 15 MCID-INLAND-COAST-CODE PIC X(01). 88 MCID-COAST VALUE 'C'. 88 MCID-INLAND VALUE 'I'. 88 MCID-INLAND-COAST-UNK VALUE SPACE. 15 MCID-CBRA-IND PIC X(01). 88 MCID-BARRIER-NO VALUE '0'. 88 MCID-BARRIER-YES VALUE '1'. 15 MCID-PROGRAM-TYPE-CODE-X. 88 MCID-PROGRAM-NONE VALUE '00'. 88 MCID-PROGRAM-EMERGENCY VALUE '01'. 88 MCID-PROGRAM-REGULAR VALUE '02'. 88 MCID-PROGRAM-REG-DIRECT-ENTRY VALUE '03'. 20 MCID-PROGRAM-TYPE-CODE PIC 9(02). 15 MCID-FLOOD-PROOF-FLAG PIC X(01). 88 MCID-FLOOD-PROOF-COMMERCIAL VALUE 'A'. 88 MCID-FLOOD-PROOF-COMM-RES VALUE 'B'. 15 MCID-LETTER-CONVERSION-IND-X. 88 MCID-NO-CONVERSION VALUE ZERO. 88 MCID-FHBM-TO-FIRM VALUE '1'. 88 MCID-NO-SFHA-NO-FIRM VALUE '2'. 88 MCID-SPEEDY-CONVERSION VALUE '3'. 20 MCID-LETTER-CONVERSION-IND PIC 9(01). 15 MCID-INITIAL-FHBM-DATE. 20 MCID-INITIAL-FHBM-CENTURY-X. 25 MCID-INITIAL-FHBM-CENTURY PIC 9(02). 20 MCID-INITIAL-FHBM-YYMMDD. 25 MCID-INITIAL-FHBM-YY-X. 30 MCID-INITIAL-FHBM-YY PIC 9(02). 25 MCID-INITIAL-FHBM-MM-X. 30 MCID-INITIAL-FHBM-MM PIC 9(02). 25 MCID-INITIAL-FHBM-DD-X. 30 MCID-INITIAL-FHBM-DD PIC 9(02). 15 MCID-FHBM-STATUS-X. 88 MCID-FHBM-NEVER-MAPPED VALUE '01'. 88 MCID-FHBM-INITIAL VALUE '02'. 88 MCID-FHBM-REVISED VALUE '03'. 88 MCID-FHBM-RESCINDED VALUE '04'. 88 MCID-FHBM-SUPERCEDED-FIRM VALUE '05'. 20 MCID-FHBM-STATUS PIC 9(02). 15 MCID-EMERGENCY-ELIG-DATE. 20 MCID-EMER-ELIG-CENTURY-X. 25 MCID-EMER-ELIG-CENTURY PIC 9(02). 20 MCID-EMER-ELIG-YYMMDD. 25 MCID-EMER-ELIG-YY-X. 30 MCID-EMER-ELIG-YY PIC 9(02). 25 MCID-EMER-ELIG-MM-X. 30 MCID-EMER-ELIG-MM PIC 9(02). 25 MCID-EMER-ELIG-DD-X. 30 MCID-EMER-ELIG-DD PIC 9(02). 15 MCID-FIRM-EFFECTIVE-DATE. 20 MCID-FIRM-EFFECT-CENTURY-X. 25 MCID-FIRM-EFFECT-CENTURY PIC 9(02). 20 MCID-FIRM-EFFECT-YYMMDD. 25 MCID-FIRM-EFFECT-YY-X. 30 MCID-FIRM-EFFECT-YY PIC 9(02). 25 MCID-FIRM-EFFECT-MM-X. 30 MCID-FIRM-EFFECT-MM PIC 9(02). 25 MCID-FIRM-EFFECT-DD-X. 30 MCID-FIRM-EFFECT-DD PIC 9(02). 15 MCID-CURRENT-FIRM-DATE. 20 MCID-CURRENT-FIRM-CENTURY-X. 25 MCID-CURRENT-FIRM-CENTURY PIC 9(02). 20 MCID-CURRENT-FIRM-YYMMDD. 25 MCID-CURRENT-FIRM-YY-X. 30 MCID-CURRENT-FIRM-YY PIC 9(02). 25 MCID-CURRENT-FIRM-MM-X. 30 MCID-CURRENT-FIRM-MM PIC 9(02). 25 MCID-CURRENT-FIRM-DD-X. 30 MCID-CURRENT-FIRM-DD PIC 9(02). 15 MCID-CURRENT-FIRM-STATUS-X. 88 MCID-FIRM-NEVER-MAPPED VALUE '01'. 88 MCID-FIRM-INITIAL VALUE '02'. 88 MCID-FIRM-REVISED VALUE '03'. 88 MCID-FIRM-RESCINDED VALUE '04'. 88 MCID-FIRM-ALL-C-NO-FIRM VALUE '05'. 88 MCID-FIRM-ALL-A-C-NO-ELEV VALUE '06'. 88 MCID-FIRM-ALL-A-C-LETTER VALUE '07'. 88 MCID-FIRM-ALL-D-NO-FIRM VALUE '08'. 20 MCID-CURRENT-FIRM-STATUS PIC 9(02). 15 MCID-REGULAR-ELIG-DATE. 20 MCID-REG-ELIG-CENTURY-X. 25 MCID-REG-ELIG-CENTURY PIC 9(02). 20 MCID-REG-ELIG-YYMMDD. 25 MCID-REG-ELIG-YY-X. 30 MCID-REG-ELIG-YY PIC 9(02). 25 MCID-REG-ELIG-MM-X. 30 MCID-REG-ELIG-MM PIC 9(02). 25 MCID-REG-ELIG-DD-X. 30 MCID-REG-ELIG-DD PIC 9(02). 15 MCID-SUSPEND-DATE. 20 MCID-SUSP-CENTURY-X. 25 MCID-SUSP-CENTURY PIC 9(02). 20 MCID-SUSP-YYMMDD. 25 MCID-SUSP-YY-X. 30 MCID-SUSP-YY PIC 9(02). 25 MCID-SUSP-MM-X. 30 MCID-SUSP-MM PIC 9(02). 25 MCID-SUSP-DD-X. 30 MCID-SUSP-DD PIC 9(02). 15 MCID-SUSPENSION-REASON-X. 88 MCID-SUSP-UNKNOWN VALUE ZERO. 88 MCID-NOT-ADOPTED-REG VALUE '1'. 88 MCID-FAIL-TO-ENFORCE VALUE '2'. 20 MCID-SUSPENSION-REASON PIC 9(01). 15 MCID-REINSTATE-DATE. 20 MCID-REINSTATE-CENTURY-X. 25 MCID-REINSTATE-CENTURY PIC 9(02). 20 MCID-REINSTATE-YYMMDD. 25 MCID-REINSTATE-YY-X. 30 MCID-REINSTATE-YY PIC 9(02). 25 MCID-REINSTATE-MM-X. 30 MCID-REINSTATE-MM PIC 9(02). 25 MCID-REINSTATE-DD-X. 30 MCID-REINSTATE-DD PIC 9(02). 15 MCID-WITHDRAWAL-DATE. 20 MCID-WITHDRAWAL-CENTURY-X. 25 MCID-WITHDRAWAL-CENTURY PIC 9(02). 20 MCID-WITHDRAWAL-YYMMDD. 25 MCID-WITHDRAWAL-YY-X. 30 MCID-WITHDRAWAL-YY PIC 9(02). 25 MCID-WITHDRAWAL-MM-X. 30 MCID-WITHDRAWAL-MM PIC 9(02). 25 MCID-WITHDRAWAL-DD-X. 30 MCID-WITHDRAWAL-DD PIC 9(02). 15 MCID-WITHDRAWAL-REIN-DATE. 20 MCID-WITHDRAW-REIN-CENTURY-X. 25 MCID-WITHDRAW-REIN-CENTURY PIC 9(02). 20 MCID-WITHDRAW-REIN-YYMMDD. 25 MCID-WITHDRAW-REIN-YY-X. 30 MCID-WITHDRAW-REIN-YY PIC 9(02). 25 MCID-WITHDRAW-REIN-MM-X. 30 MCID-WITHDRAW-REIN-MM PIC 9(02). 25 MCID-WITHDRAW-REIN-DD-X. 30 MCID-WITHDRAW-REIN-DD PIC 9(02). 15 MCID-LATEST-PANEL. 20 MCID-LATEST-PANEL-SUFFIX PIC X(01). 20 MCID-LATEST-PANEL-NBR PIC X(04). 15 MCID-COMMUN-LAST-UPDATE-DATE. 20 MCID-COMMUN-LAST-UPDATE-CENT PIC 9(02). 20 MCID-COMMUN-LAST-UPDATE-YYMMDD. 25 MCID-COMMUN-LAST-UPDATE-YY-X. 30 MCID-COMMUN-LAST-UPDATE-YY PIC 9(02). 25 MCID-COMMUN-LAST-UPDATE-MM-X. 30 MCID-COMMUN-LAST-UPDATE-MM PIC 9(02). 25 MCID-COMMUN-LAST-UPDATE-DD-X. 30 MCID-COMMUN-LAST-UPDATE-DD PIC 9(02). 15 MCID-COMMUN-LAST-UPDATE-TIME PIC X(08). 15 FILLER PIC X(64).