Merged PR 11921: improved GetActiveOrders reliability
improved GetActiveOrders reliability
This commit is contained in:
parent
6fd0d30717
commit
41cbdaadba
@ -74,7 +74,12 @@ Service GetOrderIds(EntityType=ENTITY_TYPES, EntityID, OrderTypes=ORDER_TYPES, O
|
||||
Query := @FM
|
||||
end
|
||||
If OrderStatus NE '' then Query := 'ORDER_STATUS' : @VM : OrderStatus : @FM
|
||||
If IsComplete NE '' then Query := 'IS_COMPLETE' : @VM : IsComplete : @FM
|
||||
If IsComplete NE '' then
|
||||
Query := 'IS_COMPLETE'
|
||||
For each Val in IsComplete using @VM
|
||||
Query := @VM : Val
|
||||
Next Val
|
||||
end
|
||||
Btree.Extract(Query, Table, hDict, OrderKeys, Option, Flag)
|
||||
If Flag NE 0 then
|
||||
ErrorMsg = 'Error in ':Service:' service. Btree.Extract call failed.'
|
||||
@ -161,7 +166,7 @@ end service
|
||||
|
||||
Service GetActiveOrders(EntityType=ENTITY_TYPES, EntityId, OrderTypes=ORDER_TYPES)
|
||||
|
||||
Response = Nica_Orders_Services('GetOrderIds', EntityType, EntityID, OrderTypes, '#cancelled', False$)
|
||||
Response = Nica_Orders_Services('GetOrderIds', EntityType, EntityID, OrderTypes, '#cancelled', False$:@VM:'')
|
||||
|
||||
end service
|
||||
|
||||
@ -640,3 +645,4 @@ end service
|
||||
// Internal GoSubs
|
||||
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||
|
||||
|
||||
|
Loading…
x
Reference in New Issue
Block a user