Procedure

RemoveFromOrderList

Module

fOrders

Last Modified

7/15/2014 3:26:42 PM

Scope

Local

Local subprogram to

NotifyOrder

Declaration

procedure RemoveFromOrderList(ChildOrderID: string);

Called-By Hierarchy


     RemoveFromOrderList
TfrmOrders.NotifyOrder┘ 
TfrmFrame.UMNewOrder┘   

Called-By

Name Declaration Comments
TfrmOrders.NotifyOrder procedure NotifyOrder(OrderAction: Integer; AnOrder: TOrder); override; -


Source

483   procedure RemoveFromOrderList(ChildOrderID: string);
484   var
485    ij: integer;
486   begin
487     for ij := uOrderList.Count - 1 downto 0 do
488     begin
489       if TOrder(uOrderList[ij]).ID = ChildOrderID then
490         uOrderList.Remove(TOrder(uOrderList[ij]));
491     end;
492   end;