DUTAS re-platformed to Raincode - Initial Source Code

This commit is contained in:
Neeraj Kumar
2025-07-21 07:44:09 -04:00
commit ca3572c5df
2773 changed files with 798221 additions and 0 deletions

25
Copybook/DTSIC072.cpy Normal file
View File

@ -0,0 +1,25 @@
00001 ***** 10/11/17
00002 * DTSIC072
00003 * DTSIC072 STATE POSTAL CODE VALUES. LV008
00004 * DTSIC072
00005 * REVIEWED AND MODIFIED FOR DC. 08/11/1998 EHH DTSIC072
00006 * MODIFIED FOR CANADIAN ADDRESS. 04/30/2002 ZL1 DTSIC072
00007 * ADDED 'QC' MODIFIED FOR CANADIAN ADDRESS. 10/11/2017 ZL1 CL**8
00008 * DTSIC072
00009 ***** DTSIC072
00010 DTSIC072
00011 05 C072-ST PIC X(02). DTSIC072
00012 88 C072-DC-88 VALUE 'DC'. DTSIC072
00013 88 C072-BORDER-88 VALUE 'MD' 'VA'. DTSIC072
00014 88 C072-US-88 VALUE DTSIC072
00015 'AL' 'AK' 'AZ' 'AR' 'CA' 'CO' 'CT' 'DE' 'DC' 'FL' DTSIC072
00016 'GA' 'HI' 'ID' 'IL' 'IN' 'IA' 'KS' 'KY' 'LA' 'ME' DTSIC072
00017 'MD' 'MA' 'MI' 'MN' 'MS' 'MO' 'MT' 'NE' 'NV' 'NH' DTSIC072
00018 'NJ' 'NM' 'NY' 'NC' 'ND' 'OH' 'OK' 'OR' 'PA' 'PR' DTSIC072
00019 'RI' 'SC' 'SD' 'TN' 'TX' 'UT' 'VT' 'VA' 'VI' 'WA' DTSIC072
00020 'WV' 'WI' 'WY' 'AA' 'AE' 'AP' 'GU' 'MP'. DTSIC072
00021 88 C072-CANADA-88 VALUE DTSIC072
00022 'AB' 'BC' 'CD' 'MB' 'NB' 'NF' 'NT' 'NS' 'ON' 'PQ' DTSIC072
00023 'QC' 'SK' 'YT'. CL**8
00024 88 C072-FOREIGN-88 VALUE '**'. DTSIC072
00025 88 C072-ARMED-FORCES-88 VALUE 'AA' 'AE' 'AP'. DTSIC072