If the application model is that an instance of the Data Access object serves a single Business Entity instance, then the Business Entity can run that instance as a persistent procedure, as in this example:
RUN OrderSource.p PERSISTENT SET hSourceProc.
The Entity can then use the API of the Data Access object to run support methods in this procedure handle.
The Business Entity could also make the Data Access object a super procedure of the Business Entity, as shown:
THIS-PROCEDURE:ADD-SUPER-PROCEDURE(hSourceProc).
This allows the Entity to use the API of the Data Access object as if it were part of its own procedure.
Using the super procedure technique also changes the nature of calls from outside that are routed from the Business Entity to the Data Access object. This is discussed in the .