Index: cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fPtAdd.pas
===================================================================
--- cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fPtAdd.pas	(revision 793)
+++ cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fPtAdd.pas	(revision 801)
@@ -479,5 +479,6 @@
     //CheckPost('PtType',PtType);
 
-    RPCBrokerV.Call;
+    //RPCBrokerV.Call;
+    CallBroker;
     tempS := RPCBrokerV.Results.Strings[0];
     tempResult := strtoint(piece(tempS,'^',1));
Index: cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fWebTab.dfm
===================================================================
--- cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fWebTab.dfm	(revision 793)
+++ cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fWebTab.dfm	(revision 801)
@@ -13,5 +13,4 @@
   OldCreateOrder = True
   Position = poScreenCenter
-  OnCreate = FormCreate
   PixelsPerInch = 96
   TextHeight = 13
Index: cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fWebTab.pas
===================================================================
--- cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fWebTab.pas	(revision 793)
+++ cprs/branches/tmg-cprs/CPRS-Chart/TMG_Extra/HTMLEdit/fWebTab.pas	(revision 801)
@@ -76,5 +76,6 @@
     if (URLList <> nil) then begin
       RPCBrokerV.remoteprocedure := 'TMG CPRS GET URL LIST';
-      RPCBrokerV.Call;
+      //RPCBrokerV.Call;
+      CallBroker;
       URLList.Assign(RPCBrokerV.Results);
       if RPCBrokerV.Results.Count>0 then Result := RPCBrokerV.Results.Strings[0]