НЕРАБОТАЕТ СТОП

ПОДСКАЖИТЕ ! ПОЧЕМУ НЕ РАБОТАЕТ СТОП  ОЩИБКА В СТРОЧКЕ
T = SET_VALUE (T, "QUANTITY",QUANTITY) ХОТЯ ОБЬЁМ УКАЗАН В СТРОЧКЕ R=BUY_SBER(120,1) 120 ЦЕНА ,1 ЛОТ ,
ХОТЯ ТОЖЕ САМОЕ НА ОБЫЧНОЙ ЗАЯВКЕ РАБОТАЕТ ИДЕАЛЬНО НО ЕСЛИ  СТРОЧКУ T = SET_VALUE (T, "QUANTITY",QUANTITY) ПЕРЕПИСАТЬ T = SET_VALUE (T, "QUANTITY",1) ТО ВСЁ РАБОТАЕТ, НО ЧИСЛО 120 ПРОГРАММА БЕРЁТ КАК ЦЕНУ ЗАЯВКИ А 1 ЛОТ ПРЕНЕМАЕТ КАК ЦЕНУ СТОП ЦЕНЫ ,НО ЕЩЁ РАЗ повторюсь ЕСЛИ ТОТ ЖЕ САМЫЙ КОД СДЕЛАТЬ ОБЫЧНОЙ ЛИМИТНОЙ ЗАЯВКОЙ ТО ВСЁ РАБОТАЕТ  

PORTFOLIO_EX EMAvsAC;
DESCRIPTION Робот ЕМА и АС;
CLIENTS_LIST ALL_CLIENTS;
FIRMS_LIST ALL_FIRMS;
USE_CASE_SENSITIVE_CONSTANTS;

PROGRAM

NEW_GLOBAL ("TRANS_ID", 0)
ACCOUNT="NL0011100043"
CLIENT_CODE="102151"

FUNC STOP_ORDER (MARKET,TICKER,OPERATION,STOPPRICE,PRICE,QUANTITY)
T = CREATE_MAP  ()
TRANS_ID = TRANS_ID + 1
T = SET_VALUE (T, "TRANS_ID",TRANS_ID)
T = SET_VALUE (T, "ACTION", "NEW_STOP_ORDER")
T = SET_VALUE (T, "CLASSCODE",MARKET)
T = SET_VALUE (T, "SECCODE",TICKER)
T = SET_VALUE (T, "ACCOUNT", ACCOUNT)
T = SET_VALUE (T, "CLIENT_CODE",CLIENT_CODE)
T = SET_VALUE (T, "TYPE","L")
T = SET_VALUE (T, "OPERATION",OPERATION)
T = SET_VALUE (T, "STOPPRICE",STOPPRICE)
T = SET_VALUE (T, "PRICE",PRICE)
T = SET_VALUE (T, "QUANTITY",QUANTITY)

RESULT = SEND_TRANSACTION (30, T)
END FUNC

FUNC BUY_SBER(STOPPRICE,QUANTITY)
RESULT = STOP_ORDER("QJSIM","SBER","B",STOPPRICE,QUANTITY)
END FUNC

R=BUY_SBER(120,1)
MSG=GET_VALUE(R,"DESCRIPTION")
MESSAGE(MSG,1)

END_PROGRAM

PARAMETER TICKER;
PARAMETER_TITLE TICKER;
PARAMETER_DESCRIPTION ТИКЕР;
PARAMETER_TYPE STRING(20);
END

PARAMETER PRICE ;
PARAMETER_TITLE PRICE;
PARAMETER_DESCRIPTION PRICE;
PARAMETER_TYPE STRING(20);
END

END_PORTFOLIO_EX