«Бастапқы қалдықтарды енгізу» құжаты
Құжаттың экрандық формасы келесідегідей көрінеді:
Сурет 53 –«Бастапқы қалдықтарды енгізу» құжатының формасы
Өткізу модулі:
Процедура ОбработкаПроведения()
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Регистр.Кошельки.Кошелек = Кошелек;
Регистр.Кошельки.Сумма = Сумма;
Регистр.Кошельки.ДвижениеПриходВыполнить();
КонецЦикла;
КонецПроцедуры
«Кіріс» құжаты
Құжаттың экрандық формасы келесідегідей болып көрінеді:
Сурет 54 –«Кіріс» құжатының экрандық формасы
Өткізу модулі:
Процедура ОбработкаПроведения()
Регистр.Доходы.Участник = Участник;
Регистр.Доходы.Статья = Статья;
Регистр.Доходы.Сумма = Сумма;
Регистр.Доходы.ДвижениеВыполнить();
Регистр.Кошельки.Кошелек = Кошелек;
Регистр.Кошельки.Сумма = Сумма;
Регистр.Кошельки.ДвижениеПриходВыполнить();
КонецПроцедуры
«Шығыс» құжаты
Құжаттың экрандық формасы келесідегідей болады:
Сурет 55 –«Кіріс» құжатының экрандық формасы
Өткізу модулі:
Процедура ОбработкаПроведения()
Регистр.Расходы.Участник = Участник;
Регистр.Расходы.Статья = Статья;
Регистр.Расходы.Сумма = -Сумма;
Регистр.Расходы.ДвижениеВыполнить();
Регистр.Кошельки.Кошелек = Кошелек;
Регистр.Кошельки.Сумма = Сумма;
Регистр.Кошельки.ДвижениеРасходВыполнить();
КонецПроцедуры
«Аудару» құжаты
Берілген құжат бір кошелектің қаржатын екіншісіне тасымалдайды.
Сурет 56 –«Аудару» құжатының экрандық формасы
Өткізу модулі:
Процедура ОбработкаПроведения()
Регистр.Кошельки.Кошелек = КошелекОткуда;
Регистр.Кошельки.Сумма = Сумма;
Регистр.Кошельки.ДвижениеРасходВыполнить();
Регистр.Кошельки.Кошелек = КошелекКуда;
Регистр.Кошельки.Сумма = Сумма;
Регистр.Кошельки.ДвижениеПриходВыполнить();
КонецПроцедуры
«Қалдық» есебі
Есептің диалогінің экрандық формасы келесідей болып көрінеді:
Сурет 57 –«Қалдық» есбінің экрандық формасы
Есеп модулі:
Процедура Сформировать()
Запрос = СоздатьОбъект("Запрос");
ТекстЗапроса = "
|Кошелек = Регистр.Кошельки.Кошелек;
|Участник = Регистр.Кошельки.Кошелек.Участник;
|Сумма = Регистр.Кошельки.Сумма;
|Группировка Кошелек;
|Функция СуммаВКошельке = КонОст(Сумма);
|Условие(Кошелек в ВыбрКошелек);
|Условие(Участник в ВыбрУчастник);
|";
Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
.......Возврат;
КонецЕсли;
Таб = СоздатьОбъект("Таблица");
Таб.ВывестиСекцию("Все<");
Пока Запрос.Группировка(1) = 1 Цикл
....... Таб.ВывестиСекцию("Кошелек");
КонецЦикла;
Таб.ВывестиСекцию("Все>");
Таб.Показать();
КонецПроцедуры
Есептің жұмыс жасау мысалы келесі формада көрсетілген.
Сурет 58 –«Қалдық» есебінің соңғы экрандық формасы
«Кіріс және шығыс» есебі
Есептің диалогінің экрандық формасы келесідегідей болып көрінеді:
Сурет 59 –«Кіріс және шығыс» есебінің экрандық формасы
Алдымен есептің типі көрсетіледі: кіріс немесе шығыс. Содан кейін есеп құрастырылатын уақыт аралығы көрсетіледі. Есепте 1 немесе 2 группировканы: «Участники» немесе «Статьи» кез-келген тәртіпте көрсете беруге болады. Сонымен қатар бір ғана қатысушы немесе статья бойынша таңдау алуға болады. Есептің модулін «Денежки» конфигурациясында қараңыз.
Бақылау сұрақтары:
1) Бұл жұмыста қандай анықтамалықтар қолданылады?
2) Жұмыстың мақсаты қалай?
3) «Кіріс және шығыс» есебі дегенімізді қалай түсінесің?
4) «Кіріс және шығыс» есебінің экрандық формасын
түсіндіріңіз?
Практикалық жұмыс №6. Кітапханадағы кітаптарды
есепке алу жүйесі
Мақсаты: Кітапхана үшін оқырмандарға кітаптарды беруге мүмкіндік беретін, оқырманның қарыздарын қадағалап отыратын және берілген уақыт аралығындағы орындалған есептерді құруға мүмкіндік беретін есеп жүйесін құру болып табылады.
Көрініп тұрғандай, конфигурацияда «Книги» анықтамалығы болуы тиіс. Әр кітаптың ерекше кітапханалық нөмірі (код) бар. Айта кететін жайт, бір туындының бірнеше көшірмесі болуы мүмкін.
Көрініп тұрғандай, конфигурацияда «Читатели» анықтамалығы болуы қажет. Әр оқырманға ерекше нөмірі бар оқырман билеті беріледі.
Бағдарламада келесі оқиғалар тіркелуі керек:
Кітапханадан кітап оқырманға белгілі бір мерзімге берілуі тиіс;
Кітап берілу мерзімі ұзартылуы тиіс;
Оқырманның кітапты кітапханаға қайтаруы;
Оқырманның кітапты жоғалтып алуы.
Конфигурацияда әр оқиға үшін сәйкесінше құжат қарастырылуы қажет.
Кітапхана жұмысының ережелері келесі:
Оқырман кітапханадан тек белгілі-бір мөлшердегі кітаптарды ғана ала алады (кітап мөлшері кітапхана директорымен бекітіледі);
Оқырман әдетте кітапты бір айға ғана алады, бірақ егер ол алдын-ала айтатын болса, одан ұзақ мерзімге алуына болады;
Оқырман кітапты тапсыру мерзімін ұзарта алады, яғни ол кітапты бекітілген мерзімнен кейінірек әкелетінін хабарласа;
Кітапты әкелу мерзімі өтіп кетсе, оқырман ескерту алады;
Егер оқырманның ескертулері шамадан тыс асып кетсе, ол 1 ай кітапханамен қолдана алмайды;
Кітапты жоғалтып алған жағдайда, оқырман,а ескертулер санына қарамастан, 1 ай кітапханаға келуіне тиым салынады;
Бағдарламада белгілі-бір уақыт мерзімінде орындалған іс-әрекетті көрсететін кітапханалық есеп беру мүмкіншілігі болуы тиіс. Есеп беруді көрсетілген оқырман және/немесе көрсетілген кітап бойынша өткізуге мүмкіншілктері болуы тиіс.
Бағдарламада белгілі-бір оқырманның дәл сол уақыттағы нақты қарыздарын білуге, яғни оның қолында қандай кітаптар бар және ол оларды қашан қайтару керектігі жайында ақпарат алуына мүмкіншілігі болуы қажет.
Конфигурация объектілері
Конфигурацияда келесі объектілерді құру қажет:
Объекттер типі
|
Объекттер
|
Тұрақтылар
|
МаксКолвоПредупреждений
МаксКолвоКнигНаРуках
КолвоДнейБлокировки
КолвоДнейДляВыдачи
|
Анықтамалықтар
|
Произведения
Книги (подчинен спр. Произведения)
Оқырмандар
ЖанрыКниг
Авторлары
|
Тізбектеу
|
СтатусКниги (мәні: Свободна, Выдана, Списана)
ДаНет (значения: Да, Нет)
|
Құжаттар
|
ВыдачаКниги
ПродлениеКниги
ВозвратКниги
ПотеряКниги
|
Құжаттар журналы
| |
Есеп берулер
|
БиблиотечнаяВыписка
ДолгиЧитателя
|
«Произведения» анықтамалығы
«Произведения» анықтамалығының экрандық формасы келесі түрде болуы қажет:
Сурет 60 –«Произведения» анықтамалығының экрандық формасы
Достарыңызбен бөлісу: |