Pathmaker Programming Guide

Modifying Requesters
Advanced Pathmaker Programming Topics
067868 Tandem Computers Incorporated 9–15
Example of Creating a SEND to a Remote Node
Assume that you have created, installed, and tested a Pathmaker application that
accesses an SQL database on the node \HOME. You want to put a server and the table
that it accesses on the node \AWAY. Suppose you have already created a remote
Pathway system on the node \AWAY. The PATHMON name for that Pathway
system is $FAR. The server on \AWAY will be invoked when the end user presses F9.
Without changing any of the Pathmaker screens, follow these steps to create a SEND
to a server on \AWAY:
1. Create a requester copy library containing the following code:
?SECTION USER-PRE-F11 , TANDEM
*
MOVE "\AWAY" TO T9154-SYSTEM-NAME.
MOVE "$FAR" TO T9154-PATHMON-NAME.
*
2. Add the SET TCP PATHWAYS 1 command to the PATHTCPS file on \HOME.
3. Duplicate the SET SERVER commands from the PATHSVRS file on \HOME and
add them to the Pathway configuration file on \AWAY, editing the commands to
refer to the appropriate locations on \AWAY.
The new commands could look like this:
RESET SERVER
SET SERVER PROGRAM $DATA.NCS3.SERVOBJ <-- New object file
location.
SET SERVER CPUS (1:2,3:4,0:1)
SET SERVER HOMETERM $USER <-- New hometerm
name.
SET SERVER MAXSERVERS 5, NUMSTATIC 1
SET SERVER LINKDEPTH 1, MAXLINKS 5
SET SERVER TMF ON, AUTORESTART 2
SET SERVER DEFINE =ORDERS, <-- New table
FILE \AWAY.$DATA.NCS3.ORDERS location.
ADD SERVER OP-SERVER-CLASS