Guardian Application Conversion Guide

Opening and Communicating With a High-PIN Server
Converting TAL Applications
096047 Tandem Computers Incorporated 3–33
If you started the server using the PROCESS_CREATE_ procedure, you can use the
PROCESS_CREATE_ process-descriptor output parameter directly in the
FILE_OPEN_ procedure call (shown below as the server^name parameter). Refer to
“Creating and Managing a High-PIN Process” earlier in this section for details.
error := FILE_OPEN_(server^name:server^length,
server^file^number,
exclusion^mode,
nowait^operations,
sync^depth,
options);
If you open the server using the nowait open option, you must call the AWAITIO[X]
procedure to complete the open. To determine the error and options values, call
the FILE_GETINFOLIST_ procedure and check the items specified by
ZSYS^VAL^FINF^LASTERROR and ZSYS^VAL^FINF^OPENOPTS, respectively
(provided you use the ZSYSTAL file).
Opening a High-PIN Server for a Backup Requester Process
If your requester is running as a process pair, it might open the server for its backup
process using the CHECKOPEN procedure:
CALL CHECKOPEN (server^name,
server^file^number,
nowait^depth,
sync^depth,
! seq^block^buffer ! ,
! buffer^length ! ,
back^error);
Figure 3-5 shows a requester process pair and a server process.
Figure 3-5. Opening a High-PIN Server for a Backup Process
$SRV
Server
Process
TACL
TAL Requester
Process Pair
$REQ
Primary
$REQ
Backup