Mark Invalid ZIP Code Records in a script

All things related to the Script feature of AccuZIP6, including the Script Monitor.

Moderators: Chrissy, Steve, Terry, Donna, Dave, Eric, MartyH, Kristen, Geoff, Vince

Post Reply
User avatar
Eric
Moderator
Posts: 1910
Joined: Tue Sep 19, 2006 3:29 pm
Contact:

Mark Invalid ZIP Code Records in a script

Post by Eric » Wed Apr 29, 2009 4:11 pm

Use this command to mark Invalid ZIP Codes in your database. This makes it so you can identify Invalid ZIP Codes in a script, as you won't have to pull down Select to Show > Invalid ZIP Codes.

Code: Select all

com_alias=alias()
USE IN IIF(USED('USZIP'),SELECT('USZIP'),0) 
SET SAFETY OFF
USE (ADDBS(XDEFFLDR)+"DMM\_USZIPS.DBF") IN 0 ALIAS  uszip
SELECT("uszip")
INDEX ON LEFT(zip,5) TAG mytag
SELECT(com_alias)
replace all X with ""
replace X with "X" for !SEEK(LEFT(zip,5),"uszip")
USE IN IIF(USED('_USZIP'),SELECT('_USZIP'),0)
In the Script, you can add this command event after the Validate Records event.

When you export your data or when you show Marked records, look for a capital X in the x field. These will be your Invalid ZIP Code records.
Chat with an AccuZIP6 technician weekdays from 7-4 PST with AccuZIP6 Live Online Support

Post Reply