Returns if the file successfully opened, and the date of the USPS data used in generating the primary GSD file.
Syntax
01 GSID PIC S9(9) BINARY.
01 STATE-CODE PIC X(2).
01 GSFUNSTAT PIC 9(4) BINARY.
01 BUILD-DATE PIC 9(4) COMP-5.
*
CALL "GSFSTAT" USING GSID, STATE-CODE, BUILD-DATE, GSFUNSTAT.Arguments
GSID ID returned by GSINITWP for the current instance of GeoStan. Input.
STATE-CODE State FIPS or abbreviation (this argument is now ignored). Input
GSFUNSTAT Return value for the procedure. Output.
BUILD-DATE Publish date of the USPS data used in the current GeoStan release. Output.
Return Values
Series of bit-flags. The following GS-VARIABLEs are used to test these flags:
|
GS-AUXILIARY-EXISTS |
Opened an auxiliary file (.gsx). |
|
GS-EWS-MATCH-EXISTS |
loaded a valid, unexpired EWS file is loaded (ews.txt). |
|
GS-EXP-CENTROIDS-EXISTS |
Opened the Expanded Centroids file (us_cent.gsc in MLDB folder). |
|
GS-FILE-EXISTS |
Opened a primary GSD file (us.gsd, use.gsd, usw.gsd). |
|
GS-GSL-EXISTS |
Opened eLOT and Z4Change dataa(us.gsl). |
|
GS-REV-PBKEY-EXISTS |
Opened a Reverse PreciselyID Lookup file (*.pbk in MLDR folder)b |
|
GS-STATEWIDE-EXISTS |
Initialized a state-wide intersection file (us.gsi, use.gsi, usw.gsi). |
|
GS-SUPP-EXISTS |
Opened a supplemental GSD file. (ust.gsd, uste.gsd, uswt.gsd) |
|
GS-ZIP9-IDX-EXISTS |
Opened a ZIP9 index file (ZIP9.gsu, ZIP9e.gsu, ZIP9w.gsu). |
|
GS-ZIPMOVE-EXISTS |
Opened a ZIPMove datab (us.gsz). |
|
aeLOT data requires an additional license. However, the Z4Change data is always enabled. bYou must have an additional license to use this file. |
Prerequisites
GSINITWP
Example
The following is an example of how to obtain the month/day/year from the build date:
01 GSID PIC S9(9) BINARY.
01 STATE-CODE PIC X(2).
01 GSFUNSTAT PIC S9(4) BINARY.
01 BUILD-DATE PIC 9(4) COMP-5.
01 BUILD-YEAR PIC 9(4).
01 BUILD-MONTH PIC 9(4).
01 BUILD-DAY PIC 9(4).
CALL "GSFSTAT" USING GSID, STATE-CODE, BUILD-DATE, GSFUNSTAT.5 Divide BUILD-DATE by 384 giving BUILD-YEAR
remainder build-month.
6 Add 1990 to BUILD-YEAR.
7 Divide BUILD-MONTH by 32 giving
BUILD-MONTH remainder BUILD-DAY.
8 Add 1 to BUILD-MONTH.
– or –
9 Compute BUILD-YEAR = (BUILD-DATE/384)+1990
10 Compute BUILD-MONTH =
((BUILD-DATE-((BUILD-YEAR-1990)*384)/32)+1
11 Compute BUILD-DAY =
BUILD-DATE-((BUILD-YEAR-1990)*384)-((BUILD-MONTH-1)*32)