Kbase 16289: How to configure an Progress AppServer Broker in Version 8.x
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  12/05/2005 |
|
Status: Unverified
GOAL:
How to set up a Progress AppServer in Version 8.x
GOAL:
How to configure an Progress AppServer Broker in Version 8.x
FACT(s) (Environment):
Progress 8.x
FIX:
Use the following steps to set up a test environment in Version 8.x AppServer:
1) Start the AppServer broker and connect to a database
proapbk -S <service name> -H <host name> -db /db/sports -1
You must specify the absolute path for database that you are connecting to. You do not need to specify -1 if you have started a database server for the database.
3) Place any remote procedures to be run by the AppServer on the machine where the AppServer broker was started and compile them.
For this example, the following code (raiselim.p) to increase all customer credit limits:
/* raiselim.p */
FOR EACH customer:
ASSIGN customer.credit-limit = customer.credit-limit + 100.
END.
4) Open a 4GL client session and run the following code that calls the remote procedure to be run on the Appserver machine.
DEFINE VARIABLE servhdl AS HANDLE NO-UNDO.
DEFINE VARIABLE ret AS LOGICAL NO-UNDO.
CREATE SERVER servhdl.
ASSIGN ret = servhdl:CONNECT("-S <service name> -H <host name> -N TCP").
IF ret THEN
RUN raiselim.p ON SERVER servhdl TRANSACTION DISTINCT.
ASSIGN ret = servhdl:DISCONNECT().
DELETE OBJECT servhdl.