Virtual Hometerm Subsystem (VHS) Manual (H06.03+)

Installing VHS
Virtual Hometerm Subsystem (VHS) Manual—429311-001
2-19
ViewPoint Installation Considerations
11. Installing VHS Browser into the Pathway system
Adds and starts the VHS servers in the Pathway environment.
12. Modifying the VHS Browser Environment Configuration File
This step is described in Modifying the VHS Configuration Files on page 2-29.
ViewPoint Installation Considerations
The following subsections describe additional considerations for installing the VHS
Browser into your ViewPoint environment.
Merging VHS Browser With Your ZVPT-EXTRAS Requester
If a ViewPoint Extras screen already exists within your Pathway environment, you can
do either of the following:
•
Add your ViewPoint Extras screen code into the one supplied with VHS. The
SCREEN COBOL source file, REXTRA, that is supplied with VHS, is located on
the ISV. This program uses the ViewPoint SCREEN COBOL definitions from the
GLNK file, which is also located on the ISV.
•
Add the necessary code in your own ViewPoint Extras screen program. To do so,
associate a function key with each of the two major VHS Browser screens—the
VHS Log Browser and the VHS Prompt Browser—and add the following piece of
code into your SCREEN COBOL source file.
In the working section of the data division of your SCREEN COBOL program, add
this code:
01 ws-initial-program PIC X(30).
Add the following lines to the procedure division of your SCREEN COBOL
program:
Do-VHSL SECTION.
MOVE "ZVHS-LOG-BROWSER-V3" TO ws-initial-program.
CALL "ZVHS-MAIN-PROFILE-V1" USING zvpt-link-data-l,
ws-option-line,
ws-initial-program
ON ERROR PERFORM VHSL-call-error.
MOVE ws-option-line TO z-option-line.
PERFORM Check-post-selection.
PERFORM Display-Extra.
Do-VHSP SECTION.
MOVE "ZVHS-PROMPT-BROWSER-V3" TO ws-initial-program.
CALL "ZVHS-MAIN-PROFILE-V1" USING zvpt-link-data-l,
ws-option-line,
ws-initial-program
ON ERROR PERFORM VHSL-call-error.
MOVE ws-option-line TO z-option-line.