HRS City/State Separation Utility

Easytrieve Plus

HRS uses a single field to store city and state information. Many functions require these to be separate fields.

From an Easytrieve Plus program, this module is called using an Easytrieve Plus include as follows:

%IS9055B HPARM

where HPARM is a 48 byte field subdefined as follows:

Subroutine Return Code -- 1 byte/output
- 0 - Successful Completion of Routine
- 6 - City Field Cannot be Found
- 7 - State Field Cannot be Found
- 8 - The Input String Had a Bad Format (no comma)
- 9 - The Input String Was Blank
Combined City/State Field -- 25 bytes/input
City Field -- 20 bytes/output
State Field -- 2 bytes/output

The routine is only useable in Easytrieve Plus or Cobol. The routine has an Easytrieve Plus include to quickly and easily define the variables needed to use the routine. It is called LIB9055B.

An example program might be:

...
...
%LIB9055B
...
...
HPARM2 = 'AUBURN, AL'
%IS9055B HPARM
DISPLAY '*' HPARM1 '*' HPARM31 '*' HPARM32 '*'
...
...

output would be:

*0*AUBURN *AL*

No JCL changes are required to invoke this procedure.

The City/State field must have a format of "city, state", where state is 2 bytes.