Support 805.461.7300
Sales
Our Technology. Your Success.

Populate City and St when you have only address and ZIP

If you have a need to populate the City and St fields when only the ZIP is available then use the following command, or run address validation.

USE IN IIF(USED('_USZIPS'),SELECT('_USZIPS'),0)
REPLACE ZIP WITH ALLT(SUBSTR(ADDRESS,RAT(" ",ALLT(ADDRESS)))),;
    ADDRESS WITH LEFT(ADDRESS,RAT(" ",ALLT(ADDRESS)));
    FOR EMPTY(ZIP) AND ISDIGIT(RIGHT(ALLT(ADDRESS),1))
REPLACE ADDRESS WITH ALLT(ADDRESS)+" "+ZIP,;
    ZIP WITH "" FOR ISALPHA(ALLT(ZIP))
PUBLIC COMALIAS
COMALIAS=ALIAS()
USE (ADDBS(XDEFFLDR)+"DMM\_USZIPS.DBF") IN 0 ORDER USZIP
REPLACE CITY WITH _USZIPS.PREFCITY,;
    ST WITH _USZIPS.ST FOR SEEK(LEFT(ZIP,5),'_USZIPS')
USE IN IIF(USED('_USZIPS'),SELECT('_USZIPS'),0)

« Back to Commands

All of you at Accuzip are TOP NOTCH in customer service! I've been mailing for 25 years and I only wish I'd found Accuzip years ago! You are all wonderful. Thanks for being there for me!
L.B., Englewood, FL