Hi, Try this...Hope it helps data lookup; infile cards dlm=','; input code $ description $ 30.; cards; 1,Broadway 2,Lindell 3,Chouteau 4a,Peachtree 5,Del Rey 6,Grand 7,Pershing B8,Adobe 9,Revillo 10,Menard ; run; data fmt (keep=FMTNAME START END LABEL TYPE); length FMTNAME $30. START END $256.; set WORK.lookup; FMTNAME = 'desc' ; START = code; END = START; LABEL = description; TYPE = 'C' ; run; proc format cntlin=fmt lib=work; run; data want; infile cards dsd dlm=','; length name addr city st zip $ 20.; input custid name $ addr $ city $st $ zip $ code1 $ code2 $ code3 $ code4 $; codedesc1=put(code1,$desc.); codedesc2=put(code2,$desc.); codedesc3=put(code3,$desc.); codedesc4=put(code4,$desc.); cards; 29348,Frands,101 Main,Centerville,AZ,85522,1,5,, 29074,Frenchs,108 South,Midvale,CA,92141,5,6,7, 23947,Alberts,52 Grant,Jefferson,MI,50852,4a,5,3,4a 92347,Ralphs,786 Hanley,Lewis,KS,60503,4a,2,2,1 32047,Kroger,567 Frost,Scottsdale,TX,45221,6,4a,7,6 29347,AP,678 Barton,Phoenix,AZ,84502,9,B8,4a, 94594,Aldi,901 Wilson,Mesa,AZ,86522,2,1,5,4a 93475,Meijer,345 12th,San Dimas,CA,92622,3,3,, 93479,Bass,354 Appletree,Bernard,WA,90255,1,6,6, 47349,Culvers,987 Peartree,Manzanita,NV,81511,1,5,7, 34978,Mr B,498 Figtree,Leonard,PA,20611,5,4a,, ; run; Thanks, Shiva
... View more