FUNC BUY()
trans_params = ""
trans_params = set_value (trans_params, "ACCOUNT", AccountDepo)
trans_params = set_value (trans_params, "CLIENT_CODE",ClientCode)
trans_params = set_value (trans_params, "TYPE", "L")
trans_params = set_value (trans_params, "TRANS_ID", Trans_ID)
trans_params = set_value (trans_params, "CLASSCODE", ClassCode)
trans_params = set_value (trans_params, "SECCODE", SecCode)
trans_params = set_value (trans_params, "ACTION", "NEW_ORDER")
trans_params = set_value (trans_params, "OPERATION", "B")
trans_params = set_value (trans_params, "PRICE", Cennik +30 )
trans_params = set_value (trans_params, "QUANTITY",K_IN_LOT )
trans_result = SEND_TRANSACTION (30, trans_params)
Trans_ID=Trans_ID+1
END FUNC
trans_params = ""
trans_params = set_value (trans_params, "ACCOUNT", AccountDepo)
trans_params = set_value (trans_params, "CLIENT_CODE",ClientCode)
trans_params = set_value (trans_params, "TYPE", "L")
trans_params = set_value (trans_params, "TRANS_ID", Trans_ID)
trans_params = set_value (trans_params, "CLASSCODE", ClassCode)
trans_params = set_value (trans_params, "SECCODE", SecCode)
trans_params = set_value (trans_params, "ACTION", "NEW_ORDER")
trans_params = set_value (trans_params, "OPERATION", "B")
trans_params = set_value (trans_params, "PRICE", Cennik +30 )
trans_params = set_value (trans_params, "QUANTITY",K_IN_LOT )
trans_result = SEND_TRANSACTION (30, trans_params)
Trans_ID=Trans_ID+1
END FUNC