Есть задача удаления всех лимитированных заявок в таблице. Написал такой код
client...
code...
n=GET_NUMBER_OF("ORDERS")
FOR i FROM 1 to n
trade = GET_ITEM ("ORDERS", i)
schet=GET_VALUE (trade,"ACCOUNT")
sec_t=GET_VALUE (trade, "SECCODE")
if schet=client
if sec_t=code
status_limit=GET_VALUE(trade,"STATUS")
tip_operation=GET_VALUE (trade,"OPERATION")
balance=GET_VALUE (trade,"BALANCE")
order_number=GET_VALUE (trade,"NUMBER")
end if
end if
END FOR
if status_limit="ACTIVE"
trans_params = set_value (trans_params, "ACTION", "KILL_ORDER")
trans_params = set_value (trans_params, "ORDER_KEY", order_number)
trans=SEND_TRANSACTION (30,trans_params)
message("Заявка снята.Остаток "&balance,1)
end if
Заявку снимает, но только последнюю активную в таблице. Остальные не снимает. Что я делаю не так ?
client...
code...
n=GET_NUMBER_OF("ORDERS")
FOR i FROM 1 to n
trade = GET_ITEM ("ORDERS", i)
schet=GET_VALUE (trade,"ACCOUNT")
sec_t=GET_VALUE (trade, "SECCODE")
if schet=client
if sec_t=code
status_limit=GET_VALUE(trade,"STATUS")
tip_operation=GET_VALUE (trade,"OPERATION")
balance=GET_VALUE (trade,"BALANCE")
order_number=GET_VALUE (trade,"NUMBER")
end if
end if
END FOR
if status_limit="ACTIVE"
trans_params = set_value (trans_params, "ACTION", "KILL_ORDER")
trans_params = set_value (trans_params, "ORDER_KEY", order_number)
trans=SEND_TRANSACTION (30,trans_params)
message("Заявка снята.Остаток "&balance,1)
end if
Заявку снимает, но только последнюю активную в таблице. Остальные не снимает. Что я делаю не так ?