Routines and programs used by ARSZDAPC
The external program ARSZSTOP is used to validate a requested Operation (OP) code contained in the Permitted Operation codes for the criteria. The Operation code and the Permitted Operations are unsigned small integer fields in the C programming language that are used as binary bit flags. The program ARSZSTOP validates the bit flag value for the requested Operation as a valid bit flag in the Permitted Operations.
The external program ARSZSXOP is used to convert the Permitted Operations to an array of Operation codes. The Permitted Operations and Operation codes are unsigned small integer fields in the C programming language used as binary bit flags. The program examines the bit flags in the Permitted Operations and prepares a single bit value Operation code field to match each permitted operator. The number of Operation code fields created is returned in ReturnCode.
The internal program ARSPTR2X converts a COBOL Pointer variable to display in HEX format (eight characters in length). Also, the internal program ARSADR2X converts a COBOL data item address to display in HEX format (eight characters in length).
The internal program NumberCheckAndJustify is used to validate an input field for numeric values and returns the numeric value justified.
- Justify right returns the significant number with leading zeroes converted to leading spaces.
- Justify left returns the significant number justified left with trailing spaces.
- Justify none returns the number with leading zeroes.
- Justify signed returns the number with leading zeroes. If the input number has a leading sign (+ or -), the number will be returned with as a signed number.
The routine allows the input number to be two numeric values separated by spaces, in that case, the leftmost number returns and the rightmost number are ignored. By changing the justification type used for the different number fields on the screens, you can change the justification of the numbers on the panel.
Although the sample CICS® driver ARSZDAPC is written as a conversational program, the structured APIs support pseudo-conversational tasks.
The sample program ARSZDAPC is written to execute calls to the structured APIs in a specific sequence:
- LOGON
- FOLDER OPEN
- HIT LIST
- RETRIEVE
- ANNOTATIONS
- LOGOFF
Multiple requests for retrieve would require multiple executions of the SAPI CICS transactions: one retrieve per SAPI execution.
The following sections contain the CICS Drive sample CICS screens. Some of the screen layouts have been compressed (blank lines removed) for inclusion in this document. All of the screens can display an informational message at the bottom of the screen (above the function keys). These message might overlay some screen text. If you receive an information message when a new screen displays, press any key to clear the message and display the full screen.