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
|
Query := @FM
|
||||||
end
|
end
|
||||||
If OrderStatus NE '' then Query := 'ORDER_STATUS' : @VM : OrderStatus : @FM
|
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)
|
Btree.Extract(Query, Table, hDict, OrderKeys, Option, Flag)
|
||||||
If Flag NE 0 then
|
If Flag NE 0 then
|
||||||
ErrorMsg = 'Error in ':Service:' service. Btree.Extract call failed.'
|
ErrorMsg = 'Error in ':Service:' service. Btree.Extract call failed.'
|
||||||
@ -161,7 +166,7 @@ end service
|
|||||||
|
|
||||||
Service GetActiveOrders(EntityType=ENTITY_TYPES, EntityId, OrderTypes=ORDER_TYPES)
|
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
|
end service
|
||||||
|
|
||||||
@ -640,3 +645,4 @@ end service
|
|||||||
// Internal GoSubs
|
// Internal GoSubs
|
||||||
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user