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

Реферат Автоматизована інформаційна система "Довідкова служба магазину"





2р. p align="justify">. Фігурне В. 1С: Бухгалтерія 7.7: Керівництво користувача. М.: Фірма 1С. p align="justify">. Чистов Д. В. Основи бухгалтерського обліку в системі Windows: Учеб.Практікум з ведення бухобліку в 1С: Бухгалтерії 7.0. p align="justify">. 1С: Бухгалтерія. Версія 7.7: Керівництво користувача. М.: Фірма 1С. p align="justify">. 1С: Підприємство. Версія7.7.: Опис вбудованої мови. М.: Фірма 1С. p align="justify">. 1С: Бухгалтерія 7.7. Практичний курс. М., 2004 р.



Програми


Додаток 1


Лістинг програми

Глобальний модуль


Функція глВзятьКонтекст (Конт) Експорт

Повернення Конт;

КонецФункции// глВзятьКонтекст ()

Процедура глПодбор (Конт, Параметри = "") Експорт

В 

Якщо ТіпЗначеніяСтр (Параметри) <> "СпісокЗначеній" Тоді

Параметри = СоздатьОб'ект ("СпісокЗначеній");

КонецЕсли;

// відкриваємо форму підбору

Конт.ОткритьПодбор ("Товар", "ДляПодбора", Параметри);

КонецПроцедури// глПодбор ()

Модуль форми списку довідника В«МагазиниВ»

// {{ПРОЦЕДУРА_ПЕЧАТІ (Друк)

Процедура Друк ()

Спр = СоздатьОб'ект ("Справочнік.Магазіни");

Спр.ІспользоватьДату (ІспользоватьДату ());

Таб = СоздатьОб'ект ("Таблиця");

Таб.ІсходнаяТабліца ("Друк");

Таб.ВивестіСекцію ("Шапка");

Таб.Опціі (0,0, Таб.ВисотаТабліци (), 0);

Спр.ВибратьЕлементи ();

Поки Спр.ПолучітьЕлемент () = 1 Цикл

Якщо Спр.ЕтоГруппа () = 1 Тоді

Таб.ВивестіСекцію ("Група");

Інакше

Таб.ВивестіСекцію ("Рядок");

КонецЕсли;

КонецЦікла;

Таб.ВивестіСекцію ("Підвал");

Таб.ТолькоПросмотр (1);

Таб.Показать ("Друк Магазини", "");

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

//}} ПРОЦЕДУРА_ПЕЧАТІ

Модуль форми списку довідника В«ТоварВ»

// {{ПРОЦЕДУРА_ПЕЧАТІ (Друк)

Процедура Друк ()

Спр = СоздатьОб'ект ("Справочнік.Товар");

Спр.ІспользоватьДату (ІспользоватьДату ());

Таб = СоздатьОб'ект ("Таблиця");

Таб.ІсходнаяТабліца ("Друк");

Таб.ВивестіСекцію ("Шапка");

Таб.Опціі (0,0, Таб.Ви...


Назад | сторінка 10 з 16 | Наступна сторінка





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

  • Реферат на тему: Друк текстового документа
  • Реферат на тему: Логістика виробничих процесів в організації (на прикладі ТОВ "Вятка-др ...
  • Реферат на тему: Бізнес-планування інноваційної діяльності на ІП "ДП-Друк Сервіс" ...
  • Реферат на тему: Технологія друкарських процесів. Офсетний друк
  • Реферат на тему: Поліграфічні підприємства Білорусі. Флексографская друк та її переваги