ViewPoint Manual

Sample Custom Status Server
ViewPoint Manual—426801-001
D-15
Custom Server Code
BEGIN
-------------------------------------------------------------------------------
--
-- This version procedure is very nice, since we can list it using the VPROC
-- tool and then know all the time the server version we are dealing with.
--
-------------------------------------------------------------------------------
END;
?PAGE "STATUS MAIN PROCEDURE"
PROC Status MAIN;
BEGIN
-------------------------------------------------------------------------------
--
-- This is the main procedure invoking this string of procedures.
-- After Server^Startup processing, we do Server^Initialize and then go to
-- Server^Processing who is the main loop and stay there until all requester
-- close us. Finally we will terminate the program with Server^Shutdown.
--
-------------------------------------------------------------------------------
CALL Server^Startup;
CALL Server^Initialize;
CALL Server^Processing;
CALL Server^Shutdown;
END;