Зміст. стор
Введення. 3
Глава 1. Функціонування ринку ВКО. 4
Учасники ринку. 4
Процедура торгів. 4
Первинне розміщення (аукціон). 4
Вторинні торги. 5
Погашення. 5
Документообіг. 5
Звіти, що надаються біржею. 5
Звіти, що надаються Дилерами. 5
Глава 2. Завдання Дилера на ринку ВКО. 7
Ведення бек-офісу. 7
Оптимізація вкладання власних коштів. 7
Управління коштами інвесторів. 7
Виконання доручень Інвесторів. 8
Аналіз ефективності вкладень. 8
Глава 3. Завдання формування і ведення власного портфеляоблігацій Дилера. 9
Формування портфеля облігацій. 9
Ліквідність портфеля. 9
Період інвестування. 9
Інвестування з метою максимізації доходу. 10
безризикові інвестування. 10
Аналіз ефективності вкладень коштів у ВКО. 11
Постановка завдання. 11
Метод вирішення. 11
Економічна інтерпретація методу. 13
Економічна інтерпретація отриманих результатів. 13
Застосування результатів дослідження для побудови методів ефективного управління портфелем облігацій. 14
Висновок. 15
Список літератури. 15
Програми. 18
Додаток № 1. Програма автоматизації обліку РКО. 18
Додаток 1.1. Керівництво користувача. 18
Додаток 1.2. Текст програми. 20
Додаток № 1.3. Журнал обертів. 63
Додаток № 1.4. Журнал особового обліку. 64
Додаток № 1.5. Меморіальний ордер. 65
Додаток № 1.6. Звіт інвестору про здійснені угоди. 66
Додаток № 1.7. Структура пртфеля в розрізі по паперах. 67
Додаток № 1.8. Структура портфеля узагальнена. 68
Додаток № 1.9. Біржова інформація. 69
Додаток № 1.10. Щотижневий звіт в депозитарій. 70
Додаток № 1.11. Щомісячний звіт в депозитарій. 71
Додаток № 2. Програма аналізу ефективності вкладень у ВКО. 71
Додаток 2.1. Текст програми. 72
Додаток № 2.2. Діаграма порівняння прибутковості портфеля та ринку.
81
Додаток № 2.3. Діаграма порівняння індексу портфеля та ринку. 82
Додаток № 3. Вхідні статистичні дані. 83
Додаток 3.1. Інформація про папери. 83
Додаток 3.2. Інформація про угоди. 84
Додаток 3.3. Інформація про рух грошових коштів. 90
Додаток 3.4. Біржова інформація. 92
Введення.
Республіканські бескупонние короткострокові облігації (РКО) випускаються
Міністерством Фінансів Республіки Татарстан. Ринок РКО існує з 1995року. За три роки він став важливим сегментом в економіці Татарстану,порівнянний за обсягом запозичень з ринком міжбанківських кредитів ііноземної валюти.
Гарантом надійності вкладень у ВКО є Уряд РТ. РКО --ліквідний і найбільш дохідний інструмент фінансового ринку. Прибутковість по
РКО вище, ніж по банківських внесках і депозитних сертифікатах, а такождержавних цінних паперів. Маючи пільгове оподаткування, РКО єнайбільш привабливим вкладенням вільних фінансових ресурсів.
Вкладати кошти в РКО можуть як юридичні, так і фізичніособи. Дохід за цими облігаціями виходить від різниці між ціною купівлі тапродажу, тобто дисконт.
РКО звертаються в бездокументарній формі та обліковуються записами зарахунках депо. Продаж і покупка здійснюється на фондовій біржі. У зв'язку зцим виникає завдання обліку операцій з РКО як з боку біржі, так і збоку організацій-інвесторів.
На даному сегменті фондового ринку можна робити як короткостроковіспекулятивні операції, так і довгострокові вкладення вільних власнихабо позикових коштів. Таким чином, актуальною є задача оцінкиефективності вкладень у ВКО.
У даній дипломній роботі вирішуються два завдання:
1. Автоматизація обліку операцій з РКО;
2. Оцінка ефективності вкладень у ВКО.
На основі результатів другого завдання можна буде зробити деяківисновки для оптимізації прийняття рішень при вкладенні в бескупонниеоблігації.
Глава 1. Функціонування ринку ВКО.
Республіканські короткострокові облігації звертаються на Волзько-Камськойбіржі (ВКБ) за допомогою проведення електронних торгів. У функціонуванніринку РКО можна виділити наступні моменти:
1. Учасники ринку.
2. Процедура торгів.
3. Документообіг.
Учасники ринку.
Учасники ринку поділяються на дві категорії: Дилери та інвестори.
Дилер - будь-яка юридична особа, професійним учасником ринкуцінних паперів, що уклала договір на виконання функцій з обслуговуванняоперацій з облігаціями з комунальним підприємством "Дирекція по роботі зцінними паперами ". Дилер може укладати угоди з РКО від свого імені та засвій рахунок, а також може виконувати функції фінансового брокера приукладанні угод від свого імені за рахунок і за дорученням інвестора.
Інвестор - будь-яка юридична або фізична особа, що уклала з
Дилером договір брокерського обслуговування на ринку ВКО. Інвестор можекупувати облігації тільки через Ділерів, сплачуючи при цьому комісію.
Процедура торгів.
Під час торгів РКО проходять такі етапи:
. Первинне розміщення;
. Вторинні торги;
. Погашення.
Первинне розміщення (аукціон).
Аукціон - це первинне розміщення облігацій, що проводиться
Організатором (Комунальне підприємство "Дирекція по роботі з ціннимипаперами ", агент Міністерства фінансів РТ по обслуговуванню випусківоблігацій) за дорученням Міністерства фінансів Республіки Татарстан. Вонипроводяться за спеціальним графіком. Дата аукціону, граничний обсягвипуску, місце і час проведення аукціону оголошуються Організатором.
Контрагентами у цій процедурі є Міністерство Фінансів з одногобоку, і Дилери - інший. У ході аукціону Дилери подають заявки на купівлюоблігацій. Після подачі всіх заявок до встановленого часу, Міністерство
Фінансів встановлює ціну відсікання - мінімальна ціна, за якою вінготовий продати облігації. Усі заявки, подані вище ціни відсікання,задовольняються, заявки, подані з більш низькою ціною, не задовольняються.
Вторинні торги.
Звернення облігацій на вторинних торгах здійснюється у формі угодкупівлі-продажу через торговельну систему (організація, уповноважена напідставі договору з Міністерством фінансів РТ і двосторонніх договорів з
Дилерами забезпечувати процедуру укладання угод купівлі-продажу шляхомнадання технічних засобів). Контрагентами у цій процедурівиступають Дилери. Дилери вводять в Торгову систему за допомогою робочихтерміналів заявки на покупку або продаж облігацій. Якщо ціни заявокзбігаються, то вони задовольняються, тобто угода вважається здійсненою.
Погашення.
Погашення облігацій здійснюється в певний день Міністерством
Фінансів за номінальною вартістю.
Документообіг.
РКО звертаються в електронній формі. Облік за ним ведеться за допомогоюзаписів на рахунках депо, відкритих в Волзько-Камськой трастової компанії
(ВКТК). У зв'язку з цим виникають питання відображення обліку операцій вдокументальній формі. Під час звернення РКО можна виділити наступні типидокументів:
. Звіти, що надаються біржею;
. Звіти, що надаються Дилерами.
Звіти, що надаються біржею.
По завершенні торгів біржа надає кожному Ділеру наступнідокументи:
. Біржова інформація;
. Виписка з протоколу торгів;
. Зобов `язання Дилера за підсумками торгів;
. Виписка з реєстру угод.
Звіти, що надаються Дилерами.
У процесі участі в торгах Дилери зобов'язані надавати наступнідокументи біржі:
. Щотижневий звіт;
. Щомісячний звіт;
. Інші документи, необхідні для допуску Дилера до торгів.
Після здійснення угоди купівлі-продажу за дорученням Інвестора, Дилерзобов'язаний надати Інвестору звіт про зроблену угоду у формі,встановленою в договорі з брокерського обслуговування та виписку з рахункудепо. Дилер також може надати біржову інформацію і надаватиконсультаційні послуги.
Глава 2. Завдання Дилера на ринку ВКО.
Будучи активним учасником ринку РКО, Дилер стикається знаступними завданнями:
1. Ведення бек-офісу;
2. Оптимізація вкладання власних коштів;
3. Управління коштами Інвесторів;
4. Виконання доручень Інвесторів;
5. Аналіз ефективності вкладень.
Ведення бек-офісу.
Бек-офіс - система електронного обліку операцій з цінними паперами. Вінвключає в себе дуже широкий спектр функціональних питань:
. Ведення журналу особового обліку та журналу оборотів (Додаток № 1.3,
1.4);
. Формування та друк меморіальних ордерів (Додаток № 1.5);
. Формування та друк звітів Інвесторам (Додаток № 1.6);
. Формування та друк власного портфеля Дилера (Додаток №
1.7, 1.8);
. Формування та друк біржової інформації (Додаток № 1.9);
. Формування та друк щотижневого та щомісячного звітів
(Додаток № 1.10, 1.11).
Всі перераховані завдання реалізовані у поданій програміавтоматизованого обліку операцій з РКО.
Оптимізація вкладання власних коштів.
Під оптимізацією вкладання власних коштів розуміється створенняпортфеля облігацій, який задовольняв би поставленої інвестиційної абоспекулятивної завданню.
Для формування портфеля можна виходити з таких факторів:
. Ліквідність;
. "Час життя";
. Отримання найбільшого доходу;
. Використання РКО в заставних операцій для отримання міжбанківських кредитів.
Управління коштами інвесторів.
Дилер може сам управляти коштами Інвесторів, якщо було укладенодоговір трастового обслуговування. При цьому він може брати комісію як зокремої угоди, так і з доходу, отриманого Інвестором. У даному випадкуактуальною є задача оптимального управління портфелем Інвестора іоцінка ефективності діяльності Дилера.
Виконання доручень Інвесторів.
Дилер, будучи також і брокером на ринку РКО, здійснює операції купівлі -продажу від свого імені, але за дорученням Інвестора і за його рахунок. У цьомувипадку Дилер повинен вести облік прийому заявок Інвесторів, виконаннядоручень на біржі і формування звітів. За ці послуги він отримуєкомісійну винагороду.
Аналіз ефективності вкладень.
Дане завдання є однією з найбільш складних і необхідними.
Визначення методу аналізу - нетривіальне завдання. У Главі 3 розглянутідві методики аналізу ефективності вкладання власних коштів уоблігації.
Глава 3. Завдання формування і ведення власного
портфеля облігацій Дилера.
У процесі управління портфелем облігацій Дилер ставить перед собоюнаступні завдання:
. формування портфеля облігацій;
. аналіз ефективності вкладень коштів.
Формування портфеля облігацій.
У процесі участі в торгах Дилер інвестує вільні грошовікошти в облігації, створюючи при цьому портфель, що складається з різних серій
РКО, що відрізняються тим, що мають різні терміни до погашення.
Специфікою портфеля, що складається з РКО, можуть бути наступнімоменти:
. ліквідність портфеля;
. період інвестування;
. інвестування з метою максимізації прибутку;
. безризикові інвестування.
Ліквідність портфеля.
При інвестуванні коштів у РКО необхідно враховувати наступниймомент. Грошові кошти Ділерів, що інвестуються в облігації на вториннихторгах, часто перевищують обсяги торгів з якої-небудь окремої серіїоблігації. У зв'язку з цим виникає питання ліквідності портфеля. Якпоказує практика фондового ринку, облігації з найменшим строкомпогашення більш ліквідні, ніж ті, які мають більш тривалий строк допогашення. Але, з іншого боку, облігації з меншим терміном до погашеннямають і меншу прибутковість. Таким чином, при продажу найлегше продатиоблігації з меншим терміном до погашення, а купити ті, які мають більштривалий термін до погашення.
Період інвестування.
Дилер при інвестуванні стикається і з наступним завданням: періодінвестування. Так як ліквідність ринку безпосередньо залежить від терміну допогашення облігації, то з цим доводиться диверсифікувати портфеля застроками погашення облігацій. Причому необхідно вибрати найкращу стратегію,що залежить від цілей інвестування. Якщо метою інвестування єотримання максимального доходу за тривалий період часу, то можнаінвестувати кошти в найбільш дохідні серії облігацій. У разі якщометою інвестування є короткострокова спекуляція, то найбільшоптимальною стратегією в даному випадку є покупка серій облігацій зстроком погашення, близьким до встановленого строку інвестування; в цьомувипадку мінімізується ризик неможливості продажу облігацій на вторинномуринку.
Інвестування з метою максимізації доходу.
У разі якщо метою інвестування є максимізація доходу,причому термін інвестування не фіксований, тобто невідомий періодінвестування, Дилер стикається з двома суперечливими факторами:прибутковість і ліквідність. У зв'язку з цим виникають задачі оптимальногоуправління портфелем облігацій. Методи, які застосовують Дилери, єїх власними розробками (ноу-хау). Існують безліч публікацій вфінансово-економічній літературі по оптимізації вкладень у бескупонниеоблігації, але запропоновані методи або містять в собі невірні передумовипри побудові методу оптимізації, або містять спрощення, після чогомодель стає не застосовується на практиці.
безризикові інвестування.
З метою одержання доходу, але також мінімізації ризику вилученнягрошових коштів з портфеля, можна формувати портфеля за допомогоюдиверсифікації за строками погашення серій облігацій. Облігації, завизначенням, будучи борговими зобов'язаннями, мають термін погашення, тобтотермін, в який інвестор отримує номінал облігації, тому про ризиквкладень доводиться говорити лише з точки зору періоду вкладення.
Аналіз ефективності вкладень коштів у ВКО.
Постановка завдання.
Аналіз ефективності вкладення в РКО можна розділити на аналізвнутрішнього управління портфелем облігацій і зовнішнього.
Внутрішнє управління - це оцінка зміни індексу портфеля впорівняно з індексом ринку.
Зовнішнє управління - це оцінка зміни середньозваженої дохідностідо погашення портфеля в порівнянні з середньозваженою дохідністю допогашення ринку.
Таким чином, виникає задача порівняння управління портфелемоблігацій щодо ринку шляхом побудови деякого показника,який адекватно відображав би динаміку зміни портфеля в порівнянні здинамікою зміни ринку.
Метод рішення.
Пропонуються методики для вирішення поставлених завдань шляхом побудовинаступних показників:
1. Індекс портфеля та ринку (для оцінки внутрішнього управління).
Індекс будується наступним чином.
Для портфеля:
(1)
(1.1)
(1.2) де:
значення індексу в момент t
коефіцієнт
вартість портфеля за середньозваженими цінами на момент закриттяторгів у момент t
сума додаткових вкладень (витягів) грошових коштів упортфель в момент t, причому, якщо
додаткові вкладення
сума вилучених грошей
середньозважена ціна i серії на момент закриття торгів
кількість паперів i серії в портфелі
кількість серій паперів, що обертаються на ринку
Для ринку при розрахунку коефіцієнта і змінні будутьмати такий зміст:
обсяг капіталізації ринку за середньозваженими цінами на момент t
сума розміщених (погашених) коштів на аукціоні
сума розміщених коштів на аукціоні
сума погашених коштів на аукціоні
кількість паперів i серії, що обертаються на ринку
Даний індекс показує, наскільки ефективніше було внутрішнєуправління портфелем в порівнянні з ринкової кон'юнктури. Причому, якщоіндекс портфеля менше індексу ринку, то управління було неефективним.
2. Ефективна норма прибутковості до погашення портфеля та ринку (для оцінки зовнішнього управління).
Показник будується таким чином (2 методи):
У теорії розрахунку застосовується наступний метод: < p> (2) де:
(2.1)
сума i витратного платежу
сума i дохідного платежу
кількість днів між i видаткових та дохідних платежами
ефективна норма прибутковості, яка і визначається з рішення даного рівняння
кількість видаткових та дохідних платежів
Рівняння (2) вирішується чисельними методами, причому рішення єдино.
Через незручності рішення рівняння на практиці звичайно застосовують другой метод знаходження:
(2.2) де:
прибутковість до погашення i папери
кількість i папери
днів до погашення i папери
розраховується наступним чином:
(2.3) де:
ціна купівлі i папери в% від номіналу (видатковий платіж)
ціна погашення в% від номіналу (прибутковий платіж)
кількість днів у році
днів до погашення i папери
Даний метод більш зручний при розрахунках і дає більш швидкі результати , внаслідок чого він був застосований при побудові даного показника.
Економічна інтерпретація методу.
Аналіз за допомогою методики побудови індексу портфеля та ринку міститьв себе наступні моменти:
Індекс побудований таким чином, що він адекватно відображає управлінняпортфелем і поведінка ринку.
За побудованого індексу можна визначити прибутковість до придбанняпортфеля та ринку, що буває необхідним для порівняння вкладень в РКО зіншими інвестиційними операціями. Прибутковість до придбання - цедохідність на день розрахунку, яку можна отримати при продажу портфеляоблігацій.
Крім того, можна оцінити поведінку ринку РКО в порівнянні з іншимиринками. Методика порівняння може бути різною і їх побудова вимагаєобліку специфіки різних ринків.
Другий вид аналізу - обчислення ефективної норми прибутковості портфеляі ринку.
Запропонований метод відображає поведінку ринку і прибутковість до погашенняпортфеля в поточний момент часу. Впливати на цей показник можнашляхом додавання або вилучення грошових коштів у портфель облігацій. Прице, ефективне зовнішнє управління безпосередньо залежить від обсягівдодавання/вилучення грошових коштів та сформованою кон'юнктурою ринку вдень проведення операцій, тобто іншими словами, має бути своєчаснепроведення даних операцій.
Цей вид аналізу можна застосувати також для ефективного розподілувільних ресурсів між різними інвестиційними ринками, оцінюючи тапорівнюючи прибутковості різних ринків і спрямовуючи вільні грошовікошти на найбільш прибуткові сектори.
Економічна інтерпретація отриманих результатів.
У даній роботі порівнювався портфель РКО банку і ринок РКО з лютогопо травень місяць 1997 року.
При аналізі шляхом побудови індексу було виявлено наступне. Графік,побудований на основі індексу ринку (Додаток № 2.3), має позитивнийнахил. Це обумовлено тим, що ринок у той час мав тенденцію до зниженняприбутковості, тому, індекс, що відображає прибутковість до придбання,збільшувався. У наведеному прикладі, заснованому на реальних даних,внутрішнє управління портфелем було ефективним в порівнянні з ринком допочатку травня місяця.
На графіку порівняння прибутковості портфеля та ринку (Додаток № 2.2)можна бачити падіння прибутковості до погашення портфеля у зв'язку з ситуацією, щоринковою кон'юнктурою. При аналізі за допомогою даного показника можнасказати, що квітень місяць був найбільш сприятливим для додатковогоінвестування грошових коштів.
Застосування результатів дослідження для побудови методів ефективного управління портфелем облігацій.
Результати дослідження за допомогою застосування запропонованих методикдозволяють зробити основні висновки для побудови методівефективного управління портфелем облігацій. У даному випадку, підефективним управлінням розуміється отримання найбільшого доходу запевний проміжок часу.
Для побудови методик ефективного управління портфелем облігаційнеобхідно враховувати наступне:
1) управління повинне давати максимальний ефект;
2) в управлінні потрібно враховувати можливість вводу-виводу коштів;
3) необхідність спроби прогнозування ситуації при зміні ринкової кон'юнктури;
4) управління портфелем з точки зору як прибутковості, так і ліквідності;
Отримані результати також дозволяють оцінити ступінь впливу людини
(в даному випадку - трейдер) на управління портфелем облігацій. Від методів,застосовуваних ним для прийняття рішень, залежить ефективність управлінняпортфелем облігацій. У цьому випадку буває доцільним контроль зауправлінням портфелем з боку вищого начальства без застосуванняобтяжливих методик розрахунків, з іншого боку, можна заохочувати трейдераза успішне управління портфелем облігацій. Отже, запропонованийіндекс можна застосувати для оцінки управління портфелем облігацій трейдером.
Інше завдання, якою можна вирішити на основі отриманих результатів --це завдання довірчого управління (траст). Грунтуючись на результатах,можна запропонувати наступну схему стягнення плати за траст з бокукеруючого з клієнта. Порівнюється індекс ринку та індекс портфеляоблігацій, що знаходиться в трасті. У разі, якщо індекс портфеляперевершує індекс ринку, то додатковий дохід, що виходить від більшефективного управління портфелем облігацій, ділиться у певнійпропорції між керуючим і клієнтом. Інший варіант: керуючийгарантує клієнтові певний відсоток, а плата керуючомурозраховується за методикою виходячи з гарантованого доходу ідоходу, отриманого понад.
Висновок.
У роботі вирішені наступні ключові моменти, необхідні для роботи з
Республіканськими короткостроковими бескупоннимі облігаціями (РКО):
. Автоматизація обліку операцій з РКО
. Оцінка ефективності інвестицій в РКО
. Описано функціонування ринку РКО, поставлені завдання, які вирішує Дилер на ринку.
Рішенням задачі автоматизації операцій з РКО є програмнийпродукт, написаний на Visual Basic for Microsoft Excel, який дозволяєвести повний документообіг Дилера на ринку ВКО. Результатамиавтоматизації є стандартизовані вихідні форми, необхідні дляведення бухгалтерського обліку РКО та надання різних звітів.
При вирішенні задачі оцінки ефективності інвестицій в РКО застосовувалисястатті, що містять інформацію про різні методики розрахунку прибутковостіоблігацій. Результатом вирішення даного завдання є розробкавласної методики аналізу. Методика перевірена на реальних чисельнихданих за певний період функціонування ринку ВКО. Кінцевимпродуктом методу є програма, написана на Visual Basic for
Microsoft Excel, що дозволяє робити аналіз ефективності управлінняпортфелем облігацій. Наведений метод аналізу також можна застосувати вНадалі для побудови методів ефективного управління портфелемоблігацій.
Обидві поставлені завдання впроваджені і використовуються на практиці.
Список літератури.
1. Башарин Г.П. «Начала фінансової математики» Москва, «ИНФРА-М» 1997р.
2. Бродський В., Горліна Ю. «Модель дійсної прибутковості ГКО дляклієнтів »журнал« Ринок цінних паперів »№ 1 1994 г.
3. Вєтров А. «Як побудувати агреговані показники прибутковості ринку
ГКО/ОФЗ »журнал« Ринок цінних паперів »№ 5 1996 г.
4. Горєлов М. «Побудова оптимального портфеля ГКО: якмаксимізувати прибуток »журнал« Ринок цінних паперів »№ 6 1996 г.
5. Горєлов М., Никифоров Л. «Про межах застосування принципуринкового моменту »журнал« Ринок цінних паперів »№ 16 1996 г.
6. Горєлов М. «Що не можна упускати при побудові моделі управлінняпортфелем ГКО »журнал« Ринок цінних паперів »№ 11 1996 г.
7. Горліна Ю. «Оцінка прибутковості операцій з ДКО: варіантів біржовийігри »журнал« Ринок цінних паперів »№ 6 1994 г.
8. Грядовая О. «Прибутковість як критерій оптимізації рішень зуправління портфелем ГКО »журнал« Ринок цінних паперів »№ 15 1994 г.
9. Губернієв В. «ГКО в оптимальному портфелі» журнал «Ринок ціннихпаперів »№ 15 1996 г.
10. Демушкина Е. «Угоди з державними цінними паперами» журнал
«Ринок цінних паперів» № 23 1996 г.
11. Екушов А. «Як перевищити середню прибутковість ринку ГКО» журнал
«Ринок цінних паперів» № 11 1997 г.
12. Івахін А. «Як подолати обмеження у моделюванні ринку ГКО»журнал «Ринок цінних паперів» № 12 1996 г.
13. Комягин В.Б. «Програмування в Excel 5 і Excel 7 мовою Visual
Basic »Москва,« Радио и связь »1996 р.
14. Кузнецов М., Ніфатов П. «Грошовий потік і торгові операції наринку ГКО »журнал« Ринок цінних паперів »№ 4 1996 г.
15. Мєшкова Н. Кулакова Ю. «Прогнозування тренда ціни ДКО" журнал
«Ринок цінних паперів» № 6 1996 г.
16. Михеев А. «Граємо на позикові кошти» журнал «Ринок цінних паперів»
№ 3 1997 г.
17. Остроушко О., Гришин О. «Прибутковість і дюрація портфеля ГКО» журнал
«Ринок цінних паперів» № 5 1996р.
18. Положення про обслуговування та обіг випусків РКО РТ (затвердженопостановою Кабінету Міністрів РТ від 21 квітня 1995 р. № 238)
19. «Потоки платежів, види облігацій та обчислення дохідності» Москва
«Консультаційний агентство« Соболєв »1996 р.
20. «Ринок цінних паперів» підручник під ред. Галанова В.А., Басова А.И.
Москва «Фінанси та статистика» 1996 р.
21. Суменкова Е.В. «Операції з цінними паперами» Москва «Перспектива»
1997
22. Ушаков П. «Про взаємозв'язках індикаторів ринку ГКО» журнал «Ринокцінних паперів »№ 3 1997 г.
23. Черкасов В.Е. «Практичний посібник з фінансово-економічнихрозрахунками »Москва« Метаінформ »1995 р.
24. Черновский А. «Як оцінити еффектівноть управління портфелем ГКО»журнал «Ринок цінних паперів» № 24 1996 г.
25. Четиркина Е. «Методи фінансових і комерційних розрахунків»
Програми.
Додаток № 1. Програма автоматизації обліку РКО.
Додаток 1.1. Керівництво користувача.
Дана програма написана на Microsoft Visual Basic for Excel. Длязапуску програми необхідно відкрити файл sprav.xls в Excel, після чого влінійці меню з'явиться додатковий пункт меню «Довідник», що складається знаступних розділів:
Дата
Перегляд залишків
Друк
Депозитарій
Портфель
Біржова інформація
Звіти клієнтам
Звіт тижневий
Звіт місячний
Журнал особового обліку
Вікно
Папери
Угоди
Клієнти
Біржа
Розглянемо докладніше кожен з пунктів меню.
Дата - зміна дати для роботи.
Перегляд залишків - перегляд залишків по Клієнтам.
Друк - роздруківка на принтер наступних даних:
Депозитарій - друк депозитарію.
Портфель - друк власного портфеля Дилера.
Біржова інформація - друк біржової інформації.
Звіти клієнтам - друк звітів Клієнтам.
Звіт тижневий - друк щотижневого звіту, що надається вдепозитарій.
Звіт місячний - друк щомісячного звіту, що надається вдепозитарій.
Журнал особового обліку - друк журналу особового обліку та журналуоборотів Дилера.
Вікно - вибір наступних вікон для введення інформації:
Папери - вибір вікна введення інформації про обертаються на ринку паперах.
Угоди - вибір вікно вводу угод.
Клієнти - вибір вікно вводу Клієнтів.
Біржа - вибір вікно вводу біржової інформації.
Результатом роботи програми є Додатку № 1.3-1.12
Додаток 1.2. Текст програми.
Option Explicit
Option Base 1
Public CurDate As Date
Public DepoArray () As Integer
Public BumArray (); BumArrayV () As Integer
Public Button; Перегляд; ExitVar; Купівля; Продаж; Погашення As
Boolean
Const DilerConst = 1000900000
Const FilialConst = 1000999999
Const ConstMaxBum = 100 'максимальну кількість паперів (випусків)
Const MaxCount = 1000 'Максимальна кількість угод по 1-ій папері
Const S192 = "50202"
Const S904 = "47423"
Const S960 = "70102"
Const S970 = "70204"
Const SR970 = "70204"
Sub Auto_Open ()
ActiveWindow. WindowState = xlMaximized
CurDate = Date
Worksheets ( "Врем"). Cells (1; 4) = CurDate
Application.OnWindow = "CancelChanges"
Application.Windows ( "Sprav.xls"). OnWindow = "Start"
End Sub
Sub Auto_Close ()
MenuBars (xlModule). Reset
MenuBars (xlWorksheet). Reset
Application.OnWindow = ""
Application.Windows ( "Sprav.xls"). OnWindow = ""
ActiveWorkbook.Save
End Sub
Sub Start ()
Call CreateMenu
Application . DisplayFullScreen = False
ActiveWindow.WindowState = xlMaximized
CurDate = Date
Worksheets ( "Врем"). Cells (1; 4) = CurDate
End Sub
Sub CancelChanges ()
MenuBars (xlModule). Reset
MenuBars (xlWorksheet). Reset
End Sub
Sub CreateMenu ()
MenuBars (xlModule). Reset
MenuBars (xlWorksheet). Reset
With MenuBars ( xlModule). Menus.Add ( "& Довідник")
. MenuItems.Add "& Дата"; "DateChange"
. MenuItems.Add "П & росмотр залишків"; "PrintOst"
. MenuItems.AddMenu ( "& Друк")
. MenuItems ( "& Друк"). MenuItems.Add "& Депозитарій"; "PrintDepo"
. MenuItems ( " & Друк "). MenuItems.Add" & Портфель ";" PrintPortfel "
. MenuItems (" & Друк "). MenuItems.Add" & Біржова інформація ";
"PrintBirgaInfo"
. MenuItems ( "& Друк"). MenuItems.Add "Звіти & клієнтам";
"PrintOtchClient"
. MenuItems ( "& Друк"). MenuItems.Add "Звіт & тижневий";
"PrintOtchWeek"
. MenuItems ( "& Друк"). MenuItems.Add "Звіт & місячний";
"PrintOtchMonth"
. MenuItems ( "& Друк"). MenuItems.Add "Журнал & особового обліку";
"PrintMagazine"
. MenuItems.AddMenu ( "& Вікно")
. MenuItems ( "& Вікно"). MenuItems.Add "& Папери"; "ViewPaper"
. MenuItems ( "& Вікно"). MenuItems.Add "& Угоди"; "ViewDeal"
. MenuItems ( "& Вікно"). MenuItems.Add "& Клієнти"; "ViewClient"
. MenuItems ( "& Вікно"). MenuItems.Add "Бі & іржа"; "ViewBirga"
. MenuItems ( "& Вікно"). MenuItems.Add "& Залишки 812"; "ViewOst812" < p>. MenuItems ( "& Вікно"). MenuItems.Add "Про & статки біржа"; "ViewOstBirga"
. MenuItems ( "& Вікно"). MenuItems.Add "& Захист"; "ViewProgram"
End With
With MenuBars (xlWorksheet). Menus.Add ( "& Довідник")
. MenuItems.Add "& Дата"; "DateChange"
. MenuItems.Add "П & росмотр залишків"; "PrintOst"
. MenuItems.AddMenu ( "& Друк")
. MenuItems ( "& Друк"). MenuItems.Add "& Депозитарій" ; "PrintDepo"
. MenuItems ( "& Друк"). MenuItems.Add "& Портфель"; "PrintPortfel"
. MenuItems ( "& Друк"). MenuItems.Add "& Біржова інформація ";
"PrintBirgaInfo"
. MenuItems ( "& Друк"). MenuItems.Add "Звіти & клієнтам";
"PrintOtchClient"
. MenuItems ( "& Друк"). MenuItems.Add "Звіт & тижневий";
"PrintOtchWeek"
. MenuItems ( "& Друк"). MenuItems.Add "Звіт & місячний";
"PrintOtchMonth"
. MenuItems ( "& Друк"). MenuItems.Add "Журнал & особового обліку";
"PrintMagazine"
. MenuItems.AddMenu ( "& Вікно")
. MenuItems ( "& Вікно"). MenuItems.Add "& Папери"; "ViewPaper"
. MenuItems ( "& Вікно"). MenuItems.Add "& Угоди"; "ViewDeal"
. MenuItems ( "& Вікно"). MenuItems.Add "& Клієнти"; "ViewClient"
. MenuItems ( "& Вікно"). MenuItems.Add "Бі & іржа"; "ViewBirga"
. MenuItems ( "& Вікно"). MenuItems.Add "& Залишки 812"; "ViewOst812" < p>. MenuItems ( "& Вікно"). MenuItems.Add "Про & статки біржа"; "ViewOstBirga"
. MenuItems ( "& Вікно"). MenuItems.Add "& Захист"; "ViewProgram"
End With
End Sub
Sub ViewPaper ()
Sheets ( "Папери"). Select
Call EndOf
End Sub
Sub ViewDeal ()
Sheets ( "Угоди"). Select
Call EndOf
End Sub
Sub ViewClient ()
Sheets ( "Клієнти"). Select
Call EndOf
End Sub
Sub ViewBirga ()
Sheets ( "Біржа"). Select
Call EndOf
End Sub
Sub ViewOst812 ( )
Sheets ( "Остаткі812"). Select
Call EndOf
End Sub
Sub ViewOstBirga () < p> Sheets ( "ОстаткіБіржа"). Select
Call EndOf
End Sub
Sub ViewProgram ()
Sheets ( "Захист "). Select
End Sub
'----------------------------- - Друк Депозитарію ---------------
Sub PrintDepo ()
Dim BumNum; CliNum; i; j; k; a; n ; Sign; s As Integer
Dim Flag As Boolean
Dim Code As Long
Dim Str As String
Dim DepoFil () As Integer
Dim Num As Integer
CurDate = Worksheets ( "Врем"). Cells (1; 4)
Call FormBum
Sheets ( "Депо"). Select
BumNum = Worksheets ( "Врем"). Cells (1; 2)
Cells (3; 5) = Worksheets ( "Врем" ). Cells (1; 4)
Cells (3; 5). NumberFormat = "Д мммм, РРРР"
Cells (3; 5). HorizontalAlignment = xlCenterAcrossSelection
Cells (3; 5). Font.Bold = True
Num = 9
For i = 1 To BumNum
Cells (6; i + 1) = Worksheets ( "Врем"). Cells (i; 1)
Cells (6; i + 1). Font.Bold = True
Cells (6; i + 1). Interior.ColorIndex = 40
Cells (Num + 1; i + 1). Interior.ColorIndex = 15
Cells (Num + 1; i + 1) = ""
Cells (Num; i + 1). Interior.ColorIndex = 40
Cells (Num; i + 1) = ""
Cells (5; i + 1). Interior.ColorIndex = 40
Next
Cells (Num; 1). Interior.ColorIndex = 40
Cells (Num ; 1) = "Разом"
Cells (Num; 1). Font.Bold = True
Cells (Num; 1). Font.Italic = True < p> Cells (Num; 1). HorizontalAlignment = xlCenter
Cells (Num + 1; 1) = ""
Cells (Num + 1; 1). Interior.ColorIndex = 15
CliNum = Worksheets ( "Врем"). Cells (1; 3)
ReDim DepoArray (CliNum; BumNum)
ReDim DepoFil (BumNum) a = 2
While Worksheets ( "Угоди"). Cells (a; 1) Empty i = 1
While Worksheets ( "Клієнти"). Cells (i + 1; 2) _
Worksheets ( "Угоди"). Cells (a; 2)
If Worksheets ( "Клієнти"). Cells (i + 1; 2) = Empty Then
MsgBox "Невірний номер клієнта у вікні 'Угоди' рядок:" + CStr (a)
Sheets ( "Угоди"). Select
Cells (a; 2) . Select
Exit Sub
End If i = i + 1
Wend
k = 0
For j = 1 To BumNum
If Worksheets ( "Врем"). Cells (j; 1) = Worksheets ( "Угоди"). Cells (a;
3) Then k = j
Exit For
End If
Next
If k = 0 Then a = a + 1
GoTo NNN
End If
If Not IsEmpty (Worksheets ( "Угоди"). Cells (a; 4)) Then
Sign = 1
Else
Sign = -1
End If
If CurDate> = Worksheets ( "Угоди"). Cells (a; 1) Then
If Worksheets ( "Угоди"). Cells (a; 2) = FilialConst Then
DepoFil (k) = DepoFil (k) + Sign * Worksheets ( "Угоди"). Cells (a; 6)
Else
DepoArray (i; k) = DepoArray (i; k) + Sign *
Worksheets ( "Угоди"). Cells (a; 6)
End If
End If a = a + 1
NNN: < p> Wend
n = 7
For i = 1 To CliNum
Flag = False
For k = 1 To BumNum
If DepoArray (i; k)> 0 Then Flag = True
Next
If Flag Then
Str = Format (Worksheets ( "Клієнти"). Cells (i + 1; 2); "0000000000")
Str = Right (Str; 5)
Cells (n; 1). NumberFormat = " @ "
Cells (n; 1). Font.Bold = True
Cells (n; 1). HorizontalAlignment = xlCenter
Cells (n; 1 ). Font.Italic = False
Cells (n; 1). Interior.ColorIndex = 2
Cells (n; 1) = Str
For k = 1 To BumNum
If DepoArray (i; k) 0 Then
Cells (n; k + 1) = DepoArray (i; k)
Else
Cells (n; k + 1) = ""
End If
Cells (n; k + 1). Font.Bold = False
Cells (n; k + 1). Font.Italic = False
Cells (n; k + 1). Interior.ColorIndex = 2
Next
If n = 7 Then n = n + 4
Else n = n + 1
End If
End If
Next
'розрахунок по філії
Cells (8; 1) = "Філія"
Cells (8; 1). Font.Bold = True
Cells (8; 1). HorizontalAlignment = xlCenter
Cells (8; 1). Font.Italic = False
Cells (8; 1) . Interior.ColorIndex = 2
For k = 1 To BumNum
If DepoFil (k) 0 Then
Cells (8; k + 1) = DepoFil (k)
Else
Cells (8; k + 1) = ""
End If
Cells (8; k + 1). Font.Bold = False
Cells (8; k + 1). Font.Italic = False
Cells (8; k + 1). Interior.ColorIndex = 2
Next
For i = 1 To BumNum
Cells (n; i + 1). Interior.ColorIndex = 40 s = 0
For k = 11 To n - 1 s = s + Cells (k; i + 1)
Next
Cells (n; i + 1). Value = s
Next
For i = 1 To BumNum
Cells (9; i + 1) = Cells (7; i + 1) + Cells (8; i + 1)
Next
Cells (n; 1). Interior.ColorIndex = 40
Cells (n; 1) = "Разом 9998"
Cells (n; 1). Font.Bold = True
Cells (n; 1). Font.Italic = True
Range ( "A1: Z200 "). Borders (xlLeft). LineStyle = xlNone
Range (" A1: Z200 "). Borders (xlRight). LineStyle = xlNone
Range (" A1: Z200 ") . Borders (xlTop). LineStyle = xlNone
Range ( "A1: Z200"). Borders (xlBottom). LineStyle = xlNone
Range ( "A1: Z200"). BorderAround LineStyle: = xlNone
Range (Cells (5; 1); Cells (n; BumNum + 1)). Borders (xlLeft). Weight =xlThin
Range (Cells (5; 1); Cells (n; BumNum + 1)). Borders (xlRight). Weight =xlThin
Range (Cells (5; 1); Cells (n; BumNum + 1)). Borders (xlTop). Weight =xlThin
Range (Cells (5; 1); Cells (n; BumNum + 1)). Borders (xlBottom). Weight =xlThin
Range (Cells (5; 1); Cells (n; BumNum + 1)). BorderAround
Weight: = xlMedium
Range (Cells (n + 1; 1); Cells (100; 30)). Delete shift: = xlToLeft
Range (Cells (1; BumNum + 2); Cells (100; 30)). Delete shift: = xlToLeft
If DialogPrint ( "Депо"; 1) Then Exit Sub
Call EditOstBirga (DilerConst)
End Sub
'-------------------------------- Друк Звіти клієнтам -- ----------
Sub PrintOtchClient ()
Dim Sheet; Ost812 As Object
Dim i; j; d; a; Col; m; MM; NN; MMM; k; b; q As Long
Dim FlagBuy; FlagCell; FlagDeal; FlagDepo As Boolean
Dim CliNum As Long < p> Dim ComStr; StrComS As String
Dim BumNum; z; z1; Index As Integer
Dim s; sum; SumBuy; Ost; SumCom; ComBirga; ComDiler; ComSum As Double
Dim Com As Double
Dim OstIn; OstOut; OstBegin; OstEnd As Double
Dim RowNum As Long
Dim OstInDate; OstOutDate As String
Dim DoFlag As Boolean
Dim Auk As Boolean
Set Sheet = Worksheets ( "Угоди")
Sheet.Range ( "A2"). Sort Key1: = Sheet.Range ( "A2"); Order1: = xlAscending;
_
Key2: = Sheet.Range ( "B2"); Order2: = xlAscending;
_
Key3: = Sheet.Range ( "D2"); Order3: = xlAscending;
_
Header: = xlYes; OrderCustom: = 1; _
MatchCase: = False; Orientation: = xlTopToBottom
CurDate = Worksheets ( "Врем") . Cells (1; 4)
Worksheets ( "ОтчетиІнвесторам"). Select i = 2
FlagDeal = False
FlagBuy = True < p> FlagCell = True
NN = 29 'початок m = NN
Range (Cells (NN - 1; 2); Cells (NN + 200; 6)). Delete shift : = xlToLeft
Rows (CStr (NN - 1) + ":" + CStr (NN - 1)). RowHeight = 28
Rows (CStr (NN - 1) + ":" + CStr (NN - 1)). WrapText = True
Rows (CStr (NN - 1) + ":" + CStr (NN - 1)). HorizontalAlignment =xlCenter
Rows (CStr (NN - 1) + ":" + CStr (NN - 1)). VerticalAlignment = xlBottom
Cells (NN - 1; 2) = "№ випуску "
Cells (NN - 1; 3) =" Дата погашення "
Cells (NN - 1; 4) =" Ціна угоди "
Cells (NN - 1; 5) = "Кількість"
Cells (NN - 1; 6) = "Сума операції"
Cells (NN - 3; 3) = "Досконалі угоди на ринку ВКО "
Cells (NN - 3; 3). Font.Bold = True sum = 0
SumBuy = 0
SumCom = 0
ComBirga = 0
Call FormBum
BumNum = Worksheets ( "Врем"). Cells (1; 2)
ReDim BumArray (BumNum )
ReDim BumArrayV (BumNum)
Index = CInt (InputBox ( "Введіть номер 1-го ордера "))
Do While Sheet.Cells (i ; 1) Empty
If Sheet.Cells (i; 1) = CurDate And Sheet.Cells (i; 2) DilerConst
Then
FlagDeal = True
If FlagBuy And Sheet.Cells (i; 4) Empty Then
Купівля = True
CliNum = Sheet.Cells (i; 2)
Cells (m; 2) = "Покупка"
Cells (m; 2). HorizontalAlignment = xlLeft
Range (Cells (m; 2); Cells (m; 6)). Interior.ColorIndex = 15 m = m + 1
MM = m
FlagBuy = False
End If
If FlagCell And Sheet.Cells (i; 4) = Empty Then
If Not FlagBuy Then s = 0
Col = 0
SumCom = 0
ComBirga = 0
For a = MM To m - 1
Cells (a; 6) = Cells (a; 4) * Cells (a; 5) * 10
If Cells (a; 4) 100 Then
SumCom = SumCom + Cells (a; 4) * Cells ( a; 5) * 10
ComBirga = ComBirga + _
CDbl (Format (Cells (a; 4) * Cells (a; 5) * 0,1 *
Worksheets ( "Інфо"). Cells (1; 2) + 0,001; "0,00 "))
Else
Погашення = True
End If
Cells (a; 6). NumberFormat = "# # # #" s = s + Cells (a; 6)
Col = Col + Cells (a; 5)
Next a sum = sum + s
SumBuy = s
Cells (m; 6) = s
Cells (m; 6 ). NumberFormat = "# ###"
Cells (m; 5) = Col
Cells (m; 2) =" Разом "m = m + 1
End If
CliNum = Sheet.Cells (i; 2)
Cells (m; 2) = "Продаж"
Продаж = True
Cells (m; 2). HorizontalAlignment = xlLeft
Range (Cells (m; 2); Cells (m; 6)). Interior.ColorIndex = 15 m = m + 1
MM = m
FlagCell = False
End If
Cells (m; 2) = Sheet.Cells (i; 3) q = 2
While Worksheets ( "Папери"). Cells (q; 1) Empty
If Worksheets ( "Папери"). Cells (q; 1) = Cells (m; 2) Then
Cells (m; 3) = Worksheets ( "Папери"). Cells (q; 3)
Cells (m; 3). NumberFormat = " дд.мм.гг "
End If q = q + 1
Wend
If Sheet.Cells (i; 4) Empty Then
Cells (m; 4) = Sheet.Cells (i; 4)
Else
Cells (m; 4) = Sheet.Cells (i; 5)
End If
Cells (m; 4). NumberFormat = "0,00"
Cells (m; 5) = Sheet.Cells (i; 6) m = m + 1
If CliNum Sheet.Cells (i + 1; 2) Or Sheet.Cells (i + 1; 1)
CurDate Then s = 0
Col = 0
For a = MM To m - 1
Cells (a; 6) = Cells (a; 4) * Cells (a; 5) * 10
If Cells (a; 4) 100 Then
SumCom = SumCom + Cells (a; 4) * Cells (a; 5) * 10
ComBirga = ComBirga + _
CDbl (Format (Cells (a; 4) * Cells (a; 5) * 0,1 *
Worksheets ( "Інфо"). Cells (1; 2) + 0,001; "0,00 "))
Else
Погашення = True
End If
Cells (a; 6). NumberFormat = "# # # #, 00" s = s + Cells (a; 6)
Col = Col + Cells (a; 5 )
Next a sum = sum + s
If FlagCell Then SumBuy = s
Cells (m; 6) = s
Cells (m; 6). NumberFormat = "# # # #, 00"
Cells (m; 5) = Col
Cells (m; 2) = "Разом"
Cells (5; 4) = CliNum
