Writes a USPS CASS report based on the specified template.
Syntax
01 GSID PIC S9(9).
01 GS-EXTEND-CASS-DATA
01 DATA-SIZE PIC S9(9) BINARY.
01 OUTPUT-NAME PIC X(1).
01 GSFUNSTAT PIC S9(9) BINARY.
CALL "GSWECASS" USING GSID, GS-EXTEND-CASS-DATA, DATA-SIZE, OUTPUT-NAME, GSFUNSTAT.Arguments
GSID ID returned by GSINITWP for the current instance of GeoStan. Input.
GSE-XTEND-CASS-DATA Input structure, defined in the GEOSTAN copybook. Input.
DATA-SIZE Size of the CASS report data structure. Input.
OUTPUT-NAME Not used.
GSFUNSTAT Return value for the procedure. Output.
Return Values
GS-SUCCESS
GS-ERROR
Prerequisites
GSINITWP
Notes
Before running a CASS report, verify you have loaded the GSZ file (ZIPMove data).
This procedure writes the CASS information to the header buffer using the data passed in GSEXTENDCASSDATA. This structure contains the following:
01 GS-EXTEND-CASS-DATA.
05 GS-ECD-STRUCTVERSION PIC 9(9) BINARY.
05 GS-ECD-NRECS PIC 9(9) bINARY.
05 GS-ECD-NZIP4 PIC 9(9) BINARY.
05 GS-ECD-NZIP PIC 9(9) BINARY.
05 GS-ECD-NCARRT PIC 9(9) BINARY.
05 GS-ECD-NDPBC PIC 9(9) BINARY.
05 GS-ECD-LISTNAME PIC X(20).
05 GS-ECD-VERSION PIC X(12).
05 GS-ECD-CERTIFICATIONDATE PIC X(24).
05 GS-ECD-PSEARCHPATH PIC X(256).
05 GS-ECD-TEMPLATENAME PIC X(256).
05 GS-ECD-NZ4CHANGED PIC 9(9) BINARY.
05 GS-ECD-NLOT PIC 9(9) BINARY.
05 GS-ECD-Z4CHANGEVERSION PIC X(12).
05 GS-ECD-LOTVERSION PIC X(12).
05 GS-ECD-NHIGHRISEDEFAULT PIC 9(9) BINARY.
05 GS-ECD-NHIGHRISEEXACT PIC 9(9) BINARY.
05 GS-ECD-NRURALROUTEDEFAULT PIC 9(9) BINARY.
05 GS-ECD-NRURALROUTEEXACT PIC 9(9) BINARY.
05 GS-ECD-NLACS PIC 9(9) BINARY.
05 GS-ECD-Z4COMPANYNAME PIC X(40).
05 GS-ECD-LOT-DPCCOMPANYNAME PIC X(40).
05 GS-ECD-LOT-Z4CONFIG PIC X(4).
05 GS-ECD-LOT-DPCCONFIG PIC X(4).
05 GS-ECD-Z4SOFTWARENAME PIC X(30).
05 GS-ECD-DPCSOFTWARENAME PIC X(30).
05 GS-ECD-LISTPROCESSORNAME PIC X(25).
05 GS-ECD-ZIP4DATABASEDATE PIC 9(9) BINARY.
05 GS-ECD-LOTDATABASEDATE PIC 9(9) BINARY.
05 GS-ECD-EWS-DENIAL PIC 9(9) BINARY.
05 GS-ECD-EWS-NTOTALDPV PIC 9(9) BINARY.
05 GS-ECD-EWS-DPVDATABASEDATE PIC 9(9) BINARY.When you specify a version number for either version, Z4ChangeVersion, or LOTVersion, GeoStan updates the corresponding fields in the template cass3553.frm file. For example, entering a version number for Z4ChangeVersion prompts GeoStan to fill these fields on cass3553.frm:
-
B. List, 2b. Date list Processed Z4Change
-
B. List, 3b. Date of Database Product Used Z4Change
-
C. Output, 1b. Total Coded Z4Change Processed.
To develop CASS certified application in GeoStan, you must have the correct license agreement with Precisely. You must also obtain CASS certification from the USPS for every application developed in GeoStan. Using GeoStan does not make an application CASS certified. For information on becoming CASS certified, see CASS certification.