Procedure

UnflagOrder

Module

rOrders

Last Modified

7/15/2014 3:26:42 PM

Scope

Interfaced

Declaration

procedure UnflagOrder(AnOrder: TOrder; const AComment: string);

Calls Hierarchy


UnflagOrder
 └SetOrderFromResults
   └SetOrderFields
     ├TOrder.Clear
     ├SeqOfDGroup
     │ └LoadDGroupMap
     └TopNameOfDGroup
       └LoadDGroupMap

Called-By Hierarchy


                     UnflagOrder
            ExecuteUnflagOrder┘ 
TfrmOrders.mnuActUnflagClick┘   

Calls

Name Declaration Comments
SetOrderFromResults procedure SetOrderFromResults(AnOrder: TOrder); -

Called-By

Name Declaration Comments
ExecuteUnflagOrder function ExecuteUnflagOrder(AnOrder: TOrder): Boolean; -


Source

1616  procedure UnflagOrder(AnOrder: TOrder; const AComment: string);
1617  begin
1618    CallV('ORWDXA UNFLAG', [AnOrder.ID, AComment]);
1619    SetOrderFromResults(AnOrder);
1620  end;