SNAX Connection Manager (SNAX/CM) Manual

User Process Procedures
SNAX/CM Sample Server
097842 Tandem Computers Incorporated C–17
INT(32) PROC do^user3^connect( proc^buf, luexpname, errmsg, xpoolhead );
INT .EXT proc^buf( proc^buffer^template );
INT .luexpname;
STRING .errmsg;
INT .xpoolhead;
BEGIN -- do^user3^connect
RETURN 0D;
END; -- do^user3^connect
INT PROC do^user3^disconnect( connect^buf, errmsg, xpoolhead );
INT .EXT connect^buf( connected^buffer^template );
STRING .errmsg;
INT .xpoolhead;
BEGIN -- do^user3^disconnect
RETURN false;
END; -- do^user3^disconnect
INT(32) PROC do^user4^connect( proc^buf, luexpname, errmsg, xpoolhead );
INT .EXT proc^buf( proc^buffer^template );
INT .luexpname;
STRING .errmsg;
INT .xpoolhead;
BEGIN -- do^user4^connect
RETURN 0D;
END; -- do^user4^connect
INT PROC do^user4^disconnect( connect^buf, errmsg, xpoolhead );
INT .EXT connect^buf( connected^buffer^template );
STRING .errmsg;
INT .xpoolhead;
BEGIN -- do^user4^disconnect
RETURN false;
END; -- do^user4^disconnect
-------------------------------------------------------------------------------------------