TS/MP Pathsend and Server Programming Manual (H06.05+, J06.03+)

! The following is the structure of the output record that BREQ
! writes to the OUT file specified in the run line.
STRUCT BREQ^OUTPUT^REC^TEMPLATE (*);
BEGIN
STRUCT SERVER^REPLY [0:1];
BEGIN
STR SYSTEM^NAME[0:7];
STR PROCESS^NAME[0:7];
STRUCT ERROR^MSG;
BEGIN
STR PATHSEND^ERROR[0:77];
STR FILE^SYSTEM^ERROR[0:77];
END;
END;
STR NON^SEND^ERROR^MSG[0:77];
END; ! BREQ output rec template
?PAGE "STRUCTURE OF A REQUEST TO PATHSRV"
?SECTION PATHSRV^REQUEST
! The following is the format of the msg to PATHSRV. It is
! used in BREQ.
STRUCT PATHSRV^REQUEST^TEMPLATE (*);
BEGIN
STR PATHMON^ASSIGN^NAME[0:30];
STR PATHMON^SYSTEM^AND^PROCESS^NAME[0:14];
STR SERVER^CLASS[0:14];
END;
?PAGE "STRUCTURE OF A REPLY FROM PATHSRV"
?SECTION PATHSRV^REPLY
! The following is the format of the reply from PATHSRV. It is
! used in BREQ.
STRUCT PATHSRV^REPLY^TEMPLATE (*);
BEGIN
INT REPLY^CODE;
STRUCT THIS^SERVER;
BEGIN
STR SYSTEM^NAME[0:7];
STR PROCESS^NAME[0:7];
END;
STRUCT SUBSIDIARY^SERVER;
BEGIN
STR SYSTEM^NAME[0:7];
STR PROCESS^NAME[0:7];
END;
STR TMF^ABORT^REQUIRED;
STRUCT ERROR^MSG;
BEGIN
STR PATHSEND^ERROR[0:77];
STR FILE^SYSTEM^ERROR[0:77];
END;
STR NON^SEND^ERROR^MSG[0:77];
END; ! PATHSRV reply template
Pathsend Requester Example 135