Курсы валют
<a href="https://www.instaforex.com/ru/" target="blank">ИнстаФорекс портал"</a>
Новости от FOREXPF.RU
<a href="https://www.instaforex.com/ru/">Форекс портал</a>
Июль 2018
Пн Вт Ср Чт Пт Сб Вс
« Июн    
 1
2345678
9101112131415
16171819202122
23242526272829
3031  
При поддержке: деньги и фен шуй.

Торговый дневник 15.12.2015 (вторник) Сделано обновление расчетных данных в таблице Accounts по стейтам (Abb Statements 1.35)

Show »

06:34 Зашел в интернет-банкинг Авангард чтобы проверить результат – в карте с лимитом 100000 руб. отказали… Написал еще одно заявление на лимит 50000 руб. Может на этот раз прокатит. Если нет – напишу еще меньше…
07:57 Приехал на работу на служебном, т.к. оставил машину Ольге (ей нужно съездить с Ирой на биржу и еще куда-то…)

08:00 Начинаю делать версию AbbStatements 1.35
08:16 В функцию fnImportRebatesFxCash() добавлено обновление поля RebatesCalc в таблице dbo_Accounts:

Show »

strSQL = «SELECT St.Id_Account»

strSQL = strSQL + «, BST.Id_BrokerServerType»

strSQL = strSQL + «, Sum(St.RebateReal) AS SumRebateReal»

strSQL = strSQL + «, Sum(IIf(nz(TCR.TypeCalcRebate,0)=0,0»

strSQL = strSQL + «, IIf(nz(TCR.TypeCalcRebate,0)=1,Round(I.Rebate_InstaForex*St.Lots*Abs(Type.TypeCalcPL),4)»

strSQL = strSQL + «, IIf(Abs(nz((St.PriceClose-St.PriceOpen)*I.Digits*Type.TypeCalcPL,0))>=I.MTP,Round(I.Spread*I.Percent_RebateF4u*St.Lots/nz(BST.KoefRebates,1)*Abs(Type.TypeCalcPL),4)))))»

strSQL = strSQL + » AS SumRebateCalc»

strSQL = strSQL + » FROM (dbo_BrokerServerTypes AS BST»

strSQL = strSQL + » RIGHT JOIN (((dbo_BrokerServers AS BS»

strSQL = strSQL + » RIGHT JOIN (dbo_Brokers AS B»

strSQL = strSQL + » RIGHT JOIN dbo_Tables_Statements AS TS ON B.Id_Broker = TS.Id_Broker)»

strSQL = strSQL + » ON BS.Id_BrokerServer = TS.Id_BrokerServer)»

strSQL = strSQL + » LEFT JOIN dbo_TypeCalcRebates AS TCR ON B.Id_TypeCalcRebate = TCR.Id_TypeCalcRebate)»

strSQL = strSQL + » INNER JOIN dbo_Accounts AS Acc ON TS.Id_Tables_Statements = Acc.Id_Tables_Statements)»

strSQL = strSQL + » ON BST.Id_BrokerServerType = BS.Id_BrokerServerType)»

strSQL = strSQL + » INNER JOIN ((dbo_Statements AS St»

strSQL = strSQL + » LEFT JOIN dbo_TypeOperations AS Type ON St.Type = Type.Type)»

strSQL = strSQL + » LEFT JOIN dbo_Items AS I ON St.Item = I.Item)»

strSQL = strSQL + » ON Acc.Id_Account = St.Id_Account»

strSQL = strSQL + » WHERE Nz(St.PriceClose, 0) <> 0″

strSQL = strSQL + » GROUP BY St.Id_Account»

strSQL = strSQL + «, BST.Id_BrokerServerType»

strSQL = strSQL + » HAVING (((St.Id_Account)=fnActive_Account()));»

08:37 Исправлен расчет PipsPL (убрано округлениев запросах по журналам(St.PriceClose-St.PriceOpen)*I.Digits*Type.TypeCalcPL AS PipsPL 

09:01 В журнал Accounts добавлена колонка RebatesCalc, убрана колонка BrokerServerType.

Переделана шапка журнала Accounts — кнопки фильтров вынесены вверх, как в других журналах.

09:21 Пересчитываю рибейты по всем счетам, и получается, что по старым счетам RebatesCalс сильно занижено по сравнению с RebatesReal, т.к. спреды тогда были другие – больше… 

2015-12-16 05-09-28 Скриншот экрана

10:04 За счет того, что убрал округление PipsPL, теперь не по всем сделкам, приблизительно равным МТП, насчитываются RebatesCalс… 7.0 ~ 6.99996948242188 … Пока оставляю так…
10:18 Посмотрел на последнем реальном счете 3136492 – по некоторым сделкам реальные рибейты насчитаны, а RebatesCalс = 0, поэтору нужно вернуть округление PipsPL, только до 4 знаков сделаю … 4 – не подходит, сделал 3
10:26 Исправлен расчет PipsPL (округление до 3 знаков): Round((St.PriceClose-St.PriceOpen)*I.Digits*Type.TypeCalcPL,3) AS PipsPL
Опять нужно пересчитывать все счета…
10:42 Сделана функция обновления рибейтов по всем счетам в таблице Accounts: fnUpdateRebatesInAccounts()
Прогнал функцию через макрос по всем счетам – цифры обновились…
11:51 Итоги в журнале Accounts перенес выше, добавил поле SumPeriodTrading_ — период торговли по всему журналу.
12:27 Из таблицы Accounts удалены поля DepositsTransfer, DepositsTransferCount, WithdrawalsTransfer, WithdrawalsTransferCount
13:00 В функцию fnUpdateBalanceCurrent() добавил занесение в dbo_Accounts полей с датами
15:00 В функцию fnUpdateBalanceCurrent() добавил занесение в dbo_Accounts данных по операциям баланса и кредита

Show »

                        If !Type =»balance» Then

                            If !ResultOfTrade> 0 Then

                                If !Note Like»*Return comission WM*» _      Or !Note Like»*Refund*» _ Then

dblReturnComissionWM = dblReturnComissionWM + !ResultOfTrade

iReturnComissionWMCount = iReturnComissionWMCount + 1

                                ElseIf !Note Like «*ReSpread*» Then

dblReSpread = dblReSpread + !ResultOfTrade

iReSpreadCount = iReSpreadCount + 1

 ElseIf Left(!Note, 2) =»IR» _   Or !Note Like«*Contest*» _Then

dblIR =dblIR + !ResultOfTrade

                                    iIRCount= iIRCount + 1

  ElseIf !NoteLike «*BONUS*» Then

dblBonuses = dblBonuses + !ResultOfTrade

iBonusesCount = iBonusesCount + 1

           ElseIf !Note Like «*reset*» Then

dblBalanceReset = dblBalanceReset + !ResultOfTrade

iBalanceResetCount = iBalanceResetCount + 1

   Else

                           dblDeposits = dblDeposits + !ResultOfTrade

iDepositsCount = iDepositsCount + 1

  End If

     Else ‘
ResultOfTrade < 0 Then 
     If !Note Like «*Commission*» _ Or !Note Like «*fee*» _  Then

dblWithdrawalsCommission = dblWithdrawalsCommission + !ResultOfTrade

                        iWithdrawalsCommissionCount = iWithdrawalsCommissionCount + 1

     ElseIf !Note Like «*reset*» Then

dblBalanceReset = dblBalanceReset + !ResultOfTrade

                   iBalanceResetCount = iBalanceResetCount + 1

  Else

dblWithdrawals = dblWithdrawals + !ResultOfTrade

iWithdrawalsCount = iWithdrawalsCount + 1

  End If

    End If

   End If

                        If !Type = «credit» Then

   If !Note Like «* In*» Then

                                dblCreditsIn = dblCreditsIn + !ResultOfTrade

iCreditsInCount = iCreditsInCount + 1

   ElseIf !Note Like «* Out*» Then

                                dblCreditsOut = dblCreditsOut + !ResultOfTrade

                      iCreditsOutCount = iCreditsOutCount + 1

   ElseIf !Note Like «* Cancelled*» Then

dblCreditsCancelled = dblCreditsCancelled + !ResultOfTrade

                                iCreditsCancelledCount = iCreditsCancelledCount + 1

    ElseIf !Note Like «* StopOut*» Then

dblCreditsStopOut = dblCreditsStopOut + !ResultOfTrade

iCreditsStopOutCount = iCreditsStopOutCount + 1

   End If

     dblCredits = dblCredits + !ResultOfTrade

    iCreditsCount = iCreditsCount + 1

   End If

15:30 В функцию fnUpdateBalanceCurrent() добавил занесение в dbo_Accounts данных по расчетным полям Min/Max
16:24 Сделана функция обновления данных в таблице dbo_Accounts в цикле по стейтам:
fnUpdateAccountItogs(SelectId_Account As Long). 
Будет работать вместо функции вместо функции fnUpdate_dbo_Account_Itogs()
16:52 Отладил работу fnUpdateAccountItogs () и обновил цифры по всем счетам.

Show »

18:13 Дома. Проверил заявление в банке Авангард – отказано… Написал новое на лимит 40000 руб….
19:07 Оформил второе заявление на лимит 30000 руб. – не дождался ответа на предыдущее заявление…
19:11 Оформил третье заявление на лимит 25000 руб. … Если и теперь не прокатит, напишу еще меньше…
21:00 Закачал несколько старых демок в базу. Торгую на последней демке как на реале.
23:05 Пока ответа нет на заявления в банке Авангард. Скорее всего только завтра будет результат…
23:08 Решил оформить заявку на кредитную карту в Росбанке:http://www.rosbank.ru/ru/persons/cards/credit/?page_17=2 Должны со мной связаться…

05:03 Встал пораньше, т.к. выспался. Даже сон приснился, что лимит повысили по карте Авангард… Проверил в интернет-банке – пока ответа нет, заявления находятся в отделе верификации до сих пор…
05:10 Ночью прошли не хилые тренды по всем парам, фунт и еврик ушли вниз на 150-160 п., франк вырос на 130 п. Лучше торговались луни, аусси, и евройена.
На обеих демках очень много сделок закрылось по превышению. На последней демке 1234727129 на балансе осталось 1800, эквити около 1000. Рибейтами было бы отбито около 40% от депозита.

2015-12-16 05-03-41 Скриншот экрана

05:16 Нужно дорабатывать советника, чтобы во время расставлял стоповые отложенники.
Основные идеи были описаны 16.11.2015 (понедельник) Назревает новая версия советника по стратегии Суперскальпинга
Программа учета нормально работает. Аналитику нужно доделывать, но это не горящий вопрос.

Оставить комментарий