Теми рефератів
> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти
Реферати, твори, дипломи, практика » Курсовые обзорные » Створення автоматизованої інфоpмаціонно-спpавочной системи розкладу руху поїздів та продажу квитків

Реферат Створення автоматизованої інфоpмаціонно-спpавочной системи розкладу руху поїздів та продажу квитків





ремяПрібитія = Основание.ДатаИВремяПрибытия;

СуммаБілета = Основаніе.ІтоговаяСумма;

Маршрут = Основаніе.Маршрут;

Місце = Основаніе.Место;

НомерПаспорта = Основаніе.НомерПаспорта;

НомерПоезда = Основаніе.НомерПоезда;

ДокументОснованіе = Основаніе.Ссилка;

СтанціяНазначенія = Основание.СтанцияНазначения;

ТіпВагона = Основаніе.ТіпВагона;

ТіпМеста = Основаніе.ТіпМеста;

ПІБ = Основаніе.ФІО;

КонецЕсли;

КонецПроцедури

Процедура Друк (Елемент)

ТабДок = Новий ТаблічнийДокумент;

Макет =

Область = Макет.ПолучітьОбласть ("Тема");

ТабДок.Вивесті (Область);

Шапка = Макет.ПолучітьОбласть ("Шапка");

Шапка.Параметри.Заполніть (ЕтотОб'ект);

ФорматнаяСтрока = "Л = ru_RU";

ТабДок.Вивесті (Шапка);

ТабДок.ОтображатьСетку = Брехня;

ТабДок.Защіта = Істина;

ТабДок.ТолькоПросмотр = Істина;

ТабДок.ОтображатьЗаголовки = Брехня;

ТабДок.Показать ();

КонецПроцедури

Модуль Документа "Прибутковий касовий ордер"

Процедура ДокументОснованиеОбработкаВыбора (Елемент, ВибранноеЗначеніе, СтандартнаяОбработка)

Підстава = ВибранноеЗначеніе;

Якщо ТіпЗнч (Підстава) = Тип ("ДокументСсылка.ПродажаБилета") Тоді

СуммаКОплате = Основаніе.ІтоговаяСумма;

Касир = Основаніе.Кассір;

ДокументОснованіе = Основаніе.Ссилка;

КонецЕсли;

КонецПроцедури

Процедура Друк (Елемент)

ТабДок = Новий ТаблічнийДокумент;

Макет =

Область = Макет.ПолучітьОбласть ("Тема");

ТабДок.Вивесті (Область);

Шапка = Макет.ПолучітьОбласть ("Шапка");

Шапка.Параметри.Заполніть (ЕтотОб'ект);

Якщо ДокументОснованіе = Не визначено Тоді

Шапка.Параметри.СсилкаД = "";

Інакше

КонецЕсли;

Шапка.Параметры.СуммаКОплате = СуммаКОплате;

ПараметрыПредметаИсчисления =

ФорматнаяСтрока = "Л = ru_RU";

Шапка.Параметры.СуммаПрописью =

ТабДок.Вивесті (Шапка);

Назад | сторінка 22 з 23 | Наступна сторінка





Схожі реферати:

  • Реферат на тему: Новий маршрут як форма підвищення конкурентоспроможності турфірми (на прикл ...
  • Реферат на тему: Новий маршрут як форма підвищення конкурентоспроможності турфірми на прикла ...
  • Реферат на тему: Розробка інформаційно-довідкової системи розкладу поїздів
  • Реферат на тему: Статистично-економічний аналіз наявності, руху та використання трудових рес ...
  • Реферат на тему: Сплави системи Al-Mе, властивості, характеристика і область застосування