-
Notifications
You must be signed in to change notification settings - Fork 9
Expand file tree
/
Copy pathsendTransaction.lua
More file actions
40 lines (31 loc) · 1.25 KB
/
sendTransaction.lua
File metadata and controls
40 lines (31 loc) · 1.25 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
function OnInit()
class = "QJSIM" -- êëàññ áóìàã: àêöèè
tiker = "SBER" -- òèêåð: Ñáåð
account = "NL0011100043" -- òîðãîâûé ñ÷åò
id_transact = 0 -- id ñ÷åò÷èê âñåõ òðàíçàêöèé
progname = "sndTrnsctn_v1" -- íàçâàíèå ñêðèïòà
end
function main()
id_transact = id_transact + 1
price = 256.59 -- öåíà ïîêóïêè
quant = 1 -- îáúåì ïîêóïêè
newtransaction =
{
["TRANS_ID"] = tostring(id_transact),-- id òðàíçàêöèè
["ACTION"] = "NEW_ORDER", -- ÷òî äåëàåì: âûñòàâëÿåì íîâóþ çàÿâêó
["CLASSCODE"] = class , -- êëàññ áóìàãè
["SECCODE"] = tiker, -- òèêåð
["OPERATION"] = "B", -- B - Buy=ïîêóïêà / S - Sell=ïðîäàæà
["QUANTITY"] = tostring(quant), -- îáúåì
["PRICE"] = tostring(price), -- öåíà
["ACCOUNT"] = account, -- òîðãîâûé ñ÷åò
["CLIENT_CODE"] = "sndTr_v1/"..id_transact, -- êîììåíòàðèé, íå áîëåå 12 ñèìâîëîâ
["EXECUTION_CONDITION"] = "PUT_IN_QUEUE" -- óñëîâèå èñïîëíåíèÿ: ïîñòàâèòü â î÷åðåäü
}
error_transaction = sendTransaction(newtransaction)
if error_transaction ~= "" then
message(progname.." : îøèáêà âûñòàâëåíèÿ çàÿâêè :"..error_transaction, 3)
else
message(progname.." : çàÿâêà âûñòàâëåíà óñïåøíî. id òðàíçàêöèè="..id_transact)
end
end