Changeset 793 for cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/SubfilesU.pas

Timestamp:

Jun 10, 2010, 3:13:12 PM (14 years ago)

Author:

Kevin Toppenberg

Message:

update

File:

• cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/SubfilesU.pas (modified) (1 diff)

cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/SubfilesU.pas

@@ -203 +203 @@
     cmd := 'GET SUB RECS LIST' + '^' + SubFileNum + '^' + ParentIENS;
     RPCBrokerV.Param[0].Mult['"REQUEST"'] := cmd;
-    RPCBrokerV.Call;
+    //RPCBrokerV.Call;
+    CallBroker;
     RPCResult := RPCBrokerV.Results[0];    //returns:  error: -1;  success=1
     if piece(RPCResult,'^',1)='-1' then begin