All things related to the Script feature of AccuZIP6, including the Script Monitor.
Moderators: Chrissy, Steve, Terry, Donna, Dave, Eric, MartyH, Kristen, Geoff, Vince
- Posts: 1910
- Joined: Tue Sep 19, 2006 3:29 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
USE IN IIF(USED('USZIP'),SELECT('USZIP'),0)
SET SAFETY OFF
USE (ADDBS(XDEFFLDR)+"DMM\_USZIPS.DBF") IN 0 ALIAS uszip
INDEX ON LEFT(zip,5) TAG mytag
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.