Информация по предмету Компьютеры, программирование

201. Автоматизация систем управления в образовании
Другое Компьютеры, программирование

Заметим, что условие централизации информационных запросов является одним из самых важных для функционирования и развития АСУ ОП. Как правило, все сведения, необходимые для составления ответа на любой информационный запрос, пришедший из вышестоящей организации, предусмотрены структурой баз данных, однако даже в тех школах, где эти сведения были введены, отчеты формируются и заполняются "вручную". Это объясняется тем, что для автоматического формирования отчета должна быть запрограммирована конкретная заданная запрашивающей организацией форма обработки и вывода данных. Для этого требуется работа программиста, участвующего в сопровождении программного обеспечения АСУ ОП. При условии централизации информационных запросов работа по программированию новой формы и установке программного обеспечения в образовательных учреждениях может быть произведена в оптимальные сроки.
202. Автоматизация теплового источника
Другое Компьютеры, программирование
1. А.А.Калмаков и др. «Автоматика и автоматизация систем теплогазоснабжения и вентиляции». М: Стройиздат, 1986.
2. Эксплуатационная документация. Автоматический регулятор теплопотребления ВЭСТ-01.2.
3. Методичка «Автоматизация и управление процессами теплогазоснабжения»: ТГАСУ.
4. ШафроновскийВ.А. «Справочник наладчика автоматики котельных установок».-Симферополь: Таврия, 1987.-176с.
203. Автоматизация управления персоналом
Другое Компьютеры, программирование

),%20%d0%b2%d1%8b%d0%bf%d1%83%d1%81%d1%82%d0%b8%d0%b2%20%d1%81%d0%bf%d0%b5%d1%86%d0%b8%d0%b0%d0%bb%d1%8c%d0%bd%d1%8b%d0%b9%20%d0%98%d0%bd%d1%82%d0%b5%d1%80%d0%bd%d0%b5%d1%82-%d0%bf%d1%80%d0%be%d0%b4%d1%83%d0%ba%d1%82.%20%d0%95%d0%b5%20%d1%81%d0%b8%d1%81%d1%82%d0%b5%d0%bc%d0%b0%204%d0%9f%20.%d0%9e%d1%84%d0%b8%d1%81%d0%9c%d0%be%d0%bd%d0%b8%d1%82%d0%be%d1%80%202.0">Предлагаемое на рынке кадровое ПО предназначено для хранения, обработки и предоставления информации о персонале предприятия, оставляя без внимания корпоративную культуру. Именно этот «пробел» решила устранить российская компания UNI (www.uni.ru <http://www.uni.ru>), выпустив специальный Интернет-продукт. Ее система 4П .ОфисМонитор 2.0 (рис. 5) позволяет автоматизировать оба эти аспекта кадровой деятельности. С ее помощью можно оперативно получать сведения о структуре предприятия, информацию о сотрудниках. Кроме того, она позволяет полностью автоматизировать процесс сбора и обработки статистики по использованию рабочего времени и доступа на предприятие.
204. Автоматизация учета и анализа уровня затрат на крупного рогатого скота
Другое Компьютеры, программирование

Рабочий бланк объектаНаименование объекта: затраты.Краткое описание:Данные о затратах на выращивание КРС.Связанные объекты:Тип связи: Имя: М:1 М:1Виды затрат поголовьеИмя атрибутаТип данныхОписаниеСвойствакод затратСчетчикПервичный ключ для таблицы "виды затрат"Уник. длинное целоегодчисловойГод полученных затратПоле. Обязательное поле - "да". Длинное целое, последовательноеКод поголовьечисловойВторичный ключ для связи с табл. "затраты"Поле со списком. (1;2) Обязательное поле - "да". Код виды затратчисловойВторичный ключ для связи с табл. "затраты"Поле со списком. (1;3) Обязательное поле - "да". ЗатратычисловойКоличество затрат Поле, обязательное поле - "да".
205. Автоматизация учета исполнения бюджета Краснодарского края
Другое Компьютеры, программирование
Основным содержанием программы создания АСОД является проектирование базовых информационных массивов, являющихся основой для проблемно-ориентированных систем, на основе которых строится учет, анализ и контроль отчетных данных распорядителей кредитов. Это включает в себя три основных этапа:
1. Сбор информации о распорядителях кредита;
2. Качественный анализ принятой бухгалтерской
206. Автоматизация учета перечней льготных должностей в Отделении Пенсионного фонда Российской Федерации по Краснодарскому краю
Другое Компьютеры, программирование

(XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. HasChildNodes) then begin[0]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['Профессия']. Text);[1]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['УсловияРаботы']. Text);[2]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['ОснованиеЛьготы1']. Text);[3]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['ОснованиеЛьготы2']. Text);[4]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['ОснованиеЛьготы3']. Text);[5]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['ПозицияСписка']. Text);[6]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['ПодтверДокумент']. Text);[7]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['КоличествоШтат']. Text);[8]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['КоличествоФакт']. Text);[9]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['ЕТКС']. Text);[10]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['ДатаЗап']. Text);[11]: = VarToStr (XMLDoc. DocumentElement. ChildNodes [Lvl1]. ChildNodes [I]. ChildNodes [Q]. ChildNodes ['ДатаКор']. Text);: = ADOTableProfession. Lookup ('PODRAZD_ID; PERIOD_ID; PROFESSION',([PODRAZD_ID, PERIOD_ID, Prof [0]]), 'PODRAZD_ID');not VarIsNull (V) then begin. Locate ('PODRAZD_ID; PERIOD_ID; PROFESSION',([PODRAZD_ID, PERIOD_ID, Prof [0]]), []);. Edit;. AsString: = Prof [1];. AsString: = Prof [2];. AsString: = Prof [3];. AsString: = Prof [4];_POZ. AsString: = Prof [5];. AsString: = Prof [6];_SHTAT. AsString: = Prof [7];_FAKT. AsString: = Prof [8];_ZAP. AsString: = Prof [10];_KOR. AsString: = Prof [11];_EDIT. AsString: = Login;_EDIT. Value: = Date;. Post;_ID: = ADOTableProfessionPROF_ID. AsInteger;else begin. Insert;_ID. AsInteger: = PODRAZD_ID;_ID. AsInteger: = PERIOD_ID;. AsString: = Prof [0];. AsString: = Prof [1];. AsString: = Prof [2];. AsString: = Prof [3];. AsString: = Prof [4];_POZ. AsString: = Prof [5];. AsString: = Prof [6];_SHTAT. AsString: = Prof [7];_FAKT. AsString: = Prof [8];_ZAP. AsString: = Prof [10];_KOR. AsString: = Prof [11];_ADD. AsString: = Login;_ADD. Value: = Date;. Post;. SQL. Clear;. SQL. Add ('SELECT PROF_ID FROM PROFESSION WHERE' +
207. Автоматизация учета продажи товаров в ООО Мастер-СД
Другое Компьютеры, программирование
В ее возможности входит:
1. Подготовка документов на поставку и отпуск товаров в формате, заданном пользователем;
2. Резервирование товаров на складе при выписке счетов;
3. Возможность отследить сроки оплаты выписанных счетов;
4. Регистрация пользователей при оформлении всех документов;
5. Развитая система разграничения доступа;
6. Работа в различных валютах и гибкость при учете меняющегося курса валют;
7. Получение справок по наличию и движению товаров;
8. Ведение полного баланса с партнерами и анализ динамики отношений с ними;
9. Классификатор товаров и клиентов неограниченной глубины вложенности;
10. Ведение многоколоночного прайс-листа и гибкая система скидок;
11. Средства работы с услугами;
12. Анализ движения товаров по складам, группам товаров, поставщикам, покупателям и т.д.;
13. Анализ эффективности работы персонала;
14. Расчет прибыли и рентабельности в целом по компании и отдельно по складам, по товарам, по группам товаров и т.д.;
15. Экспорт и импорт данных в формате CSV, обеспечивающий интерфейс с другими системами;
16. Разнообразная настройка справочных таблиц с использованием фильтров, сортировки данных, редактированием набора колонок;
17. Настройка базы данных на специфику пользователя;
18. Возможность самостоятельно создавать и редактировать бланки выходных документов и включать в них графические и сканированные изображения, формулы и таблицы.
208. Автоматизированная информационная система Учет экономической деятельности мукомольного цеха
Другое Компьютеры, программирование
1. Дж. Тельман, "Основы систем баз данных", Москва,'Финансы и статистика', 1983г.
2. Дейт К., "Введение в системы баз данных", Москва, 'Hаука', 1980 г.
3. Когловский М.Р., "Технология баз данных на персональных ЭВМ", Москва, 'Финансы и статистика', 1992 г.
4. Шумаков П. В., "Delphi 3.0 и создание баз данных". Москва 1997г.
5. Джон Матчо, Дэвид Р.Фолкнер. «Delphi» пер. с англ. М.:Бином, 1995г.
6. A.M.Епанешников. Епанешников В.А., "Программирование в среде Delphi 2.0",М.: Диалог-Мифи, 1997г.-235с.
7. Дж. Мартин., "Организация баз данных в вычислительных системах",М: Мир 1978г.
8. С.М.Диго, "Проектирование и использования баз данных". Москва: Финансы и статистика 1995.
9. Горев А., Ахаян Р., Макашарипов С., "Эффективная работа с СУБД".СПб.:Питер, 1997. 704 с.,ил.
10. Атре Ш., "Структурный подход к организации баз данных". М.: Финансы и статистика, 1983. 320 с.
11. Бойко В.В., Савинков В.М., "Проектирование баз данных и информационных систем". М.: Финансы и статистика, 1989. 351 с.
12. Джексон Г., "Проектирование реляционных баз данных для использования с микроЭВМ". -М.: Мир, 1991. 252 с.
13. Кириллов В.В., "Структурированный язык запросов (SQL)". СПб.: ИТМО, 1994. 80 с.
14. Мейер М., "Теория реляционных баз данных". М.: Мир, 1987. 608 с.
15. Тиори Т., Фрай Дж., "Проектирование структур баз данных". В 2 кн., М.: Мир, 1985. Кн. 1. 287 с.: Кн. 2. 320 с.
16. Цикритизис Д., Лоховски Ф., "Модели данных". М.: Финансы и статистика, 1985. 344 с.
17. "Paradox for Windows: Практическое руководство". Под редакцией Оспищева Д. А. Издательство АОЗ "Алевар", 1993.
18. Брябрин В.М., "Программное обеспечение персональных ЭВМ", Москва, 'Hаука', 1989 г.
19. Шафрин Ю.А., "Основы компьютерной технологии". М., 1998
20. "Кибернетические диалоговые системы", И.П.Кузнецов.
21. "Рекоммендации по общепользовательскому интерфейсу", Microsoft, редакция 1995г.
22. Тейксейра, Стив, Пачеко, Ксавье. Delphi 4. "Руководство разработчика".СПб:Издательский дом 'Вильямс' 1999г.-912с.
23. Ден Оузьер, Стив Гробман, Стив Батсон. DELPHI. "Освой самостоятельно" Перевод с англ.-М.:Восточная Книжная Компания, 1997г.-624с.
24. Калянов Г.Н., "Консалтинг при автоматизации предприятий": Научно-практическое издание. Серия "Информатизация России на пороге 21 века" М.:СИНТЕГ, 1997г.-316с.
25. Питер Колетски и др. ORACLE DESIGNER "Настольная книга пользователя".Второе издание.Издательство 'Лори' 1999г.
26. Касьянова Г.Ю., Колесников С.Н., " Управленческий учёт по формуле 'три в одном' " М.:Издательство-консультационная компания 'Статус Кво 97', 1999г.-328с.
209. Автоматизированная система бронирования компании Amadeus
Другое Компьютеры, программирование

Система AMADEUS Cars предлагает возможности бронирования в режиме реального времени, обеспечивая взаимодействие с основными компаниями проката автомобилей в тысячах населенных пунктов в сотнях стран. Можно получить информацию из базы данных многих компаний, узнать о специальных расценках и предложениях, квотировать тарифы в местной валюте. Все представленные цены будут фактическими ценами, без каких-либо вводящих в заблуждение скрытых условий и ограничений, что позволяет смело предлагать их клиентам. Информация доступна в интерактивном режиме, поэтому клиент может сам узнать об условиях и услугах соответствующей компании, а также уточнить минимальные требования относительно возраста и квалификации, предъявляемые к водителю этой компанией и в данной стране. Для удобства клиента запрос о местонахождении предлагающей услуги компании производится по любым городам или аэропортам.
210. Автоматизированная система бюджетирования Hyperion Pillar
Другое Компьютеры, программирование

Информацию можно распределить по различным измерениям, что позволит систематизировать данные с учетом текущих бизнес-потребностей. Таким образом, бюджетирование можно будет проводить как по всему проекту, так и по каналам распространения, ряду продуктов и вообще по любым другим категориям, которые компания пожелает задействовать при планировании. Для каждого измерения можно задать атрибуты, которые описывают бизнес-структуру. Возможности моделирования, заложенные в Hyperion Pillar позволяют оценивать конъюнктуру рынка и влияние различных стратегий на результаты ее деятельности. Пользователи могут создавать и хранить стандартные шаблоны распределения по периодам времени: кумулятивные, с задержкой, смешанные, - и динамически их применять к различным элементам моделей. К дополнительным возможностям относятся: полное моделирование с математическими операторами и расчетами по финансовым ведомостям. Бюджеты связываются динамически, что позволяет менеджерам сравнивать данные за текущий и предыдущие периоды.
211. Автоматизированная система документационного обеспечения управления
Другое Компьютеры, программирование

В условиях динамичного проведения реформ в России довольно часто происходят изменения в направлениях деятельности государственных органов, организаций и предприятий (далее организаций), что, как правило, приводит реорганизации их структуры. Внедрение информационных технологий дает наибольший эффект при модернизации внутренней структуры организаций. Основной стратегией внедрения являются максимальное развитие коммуникаций и разработка новых организационных взаимосвязей, ранее экономически нецелесообразных. Продуктивность организационной структуры возрастает, так как рационально распределяются архивы данных, снимается объем циркулирующей по системным каналам информации, достигается сбалансированность эффективности каждого управленческого уровня и объема решаемых задач. Система расширяется строго в соответствии с потребностями и возможностями организации, и ликвидируется разрыв между информационной и организационной структурой. В этих условиях возрастает роль эффективности и качества принимаемых управленческих решений, следовательно, автоматизированной системы делопроизводства - одной из важнейших компонент подготовки и принятия решений.
212. Автоматизированная система управления взрывоопасным технологическим процессом
Другое Компьютеры, программирование

ПО системы создавалось с учётом требований реализации интуитивно понятного интерфейса пользователя. Исходя из этого, на мнемосхемах изображается технологическое оборудование в приближенном к реальному виде. Состояние объектов определяется цветом, анимацией и текстом с дополнительной информацией, появляющимся при наведении курсора мыши на интересующий объект. Технологическое оборудование имеет местное и дистанционное управление. Для дистанционного управления (с компьютера) необходимо произвести выбор объекта при помощи мыши, а затем в появившемся окне выбрать необходимую команду (открыть/закрыть, включить/выключить и т.д.). Для запуска технологического режима оператору необходимо загрузить статоры в шкаф и указать режим работы этого шкафа, после чего система произведёт действия, направленные на корректную работу технологического оборудования и поддержание требуемых технологических параметров. Поскольку технологический процесс возможен только при строго определенном состоянии низового оборудования, ПО выполняет еще и информационно советующие функции по включению режимов и оборудования в виде текстовых сообщений (подсказок) пользователю.
213. Автоматизированная система управления комбината Белшина
Другое Компьютеры, программирование

Ïðîäîëæåíèå òàáë. 4.1Íàèìåíîâàíèå ïîêàçàòåëåéÁóêâåííûå îáîçíà÷åíèÿÅäèíèöû èçìåðåíèÿÊîëè÷åñòâîÓñòàíîâëåííàÿ ïëàíîâàÿ ïðîäîëæèòåëüíîñòü ðàçðàáîòêèÒðòËåò0.5Ãîäîâîé ýôôåêòèâíûé ôîíä âðåìåíèÔýôÄíåé230Ïðîäîëæèòåëüíîñòü ðàáî÷åãî äíÿÒ÷×àñ8Òàðèôíàÿ ñòàâêà 1-ãî ðàçðÿäà, ìåñÿ÷íàÿÒì ðóá.4500Êîýôôèöèåíò ïðåìèðîâàíèÿÊïÅäèíèö1,4Íîðìàòèâ äîïîëíèòåëüíîé çàðàáîòíîé ïëàòûÍçä%10Íîðìàòèâ çàðàáîòíîé ïëàòû ïðî÷èõ êàòåãîðèéÍçï%50Ñòàâêà îò÷èñëåíèé â ôîíä ñîöèàëüíîé çàùèòû íàñåëåíèÿÍñçñ%36Ñòàâêà ÷ðåçâû÷àéíîãî íàëîãàÍí÷%4Ñòàâêà îò÷èñëåíèé â ôîíä çàíÿòîñòèÍíç%1Íîðìàòèâ êîìàíäèðîâî÷íûõ ðàñõîäîâÍðíê%30Íîðìàòèâ ïðî÷èõ çàòðàòÍïç%20Íîðìàòèâ íàêëàäíûõ ðàñõîäîâÍðí%500Íîðìàòèâ íà ñîïðîâîæäåíèå è àäàïòàöèþ ïðîãðàììíîãî ñðåäñòâàÍðñà%10Ñòàâêà íàëîãà íà äîáàâëåííóþ ñòîèìîñòüÍäñ%20Íîðìà àìîðòèçàöèè âû÷èñëèòåëüíîé òåõíèêèÍà%10Норма расходов на сопровождение и адаптацию программного средстваРса10В разработке программного средства участвуют исполнители, перечисленные в табл. 4.2.
214. Автоматизированное проектирование электронных устройств
Другое Компьютеры, программирование

Íàä ðåãèñòðîâûì óðîâíåì íàõîäèòñÿ óðîâåíü ìèêðîñõåì (èëè ÈÑ). Íà ìèêðîñõåìíîì óðîâíå â êà÷åñòâå ýëåìåíòîâ âûñòóïàþò òàêèå êîìïîíåíòû, êàê ìèêðîïðîöåññîðû, óñòðîéñòâà îñíîâíîé ïàìÿòè, ïîñëåäîâàòåëüíûå è ïàðàëëåëüíûå ïîðòû è êîíòðîëëåðû ïðåðûâàíèé. Õîòÿ ãðàíèöû ìèêðîñõåì ÿâëÿþòñÿ è ãðàíèöàìè ìîäåëåé ýëåìåíòîâ, âîçìîæíû è äðóãèå ñèòóàöèè. Òàê, íàáîð ìèêðîñõåì, êîòîðûå ñîâìåñòíî îáðàçóþò îäíî ôóíêöèîíàëüíîå óñòðîéñòâî, ìîæíî ïðåäñòàâèòü êàê îäèí ýëåìåíò. Ïîêàçàòåëüíûì ïðèìåðîì çäåñü ìîæåò ñëóæèòü ìîäåëèðîâàíèå ðàçðÿäíî - ìîäóëüíîãî ïðîöåññîðà. Âîçìîæåí è àëüòåðíàòèâíûé âàðèàíò - êîãäà ýëåìåíòû ïðåäñòàâëÿþò îòäåëüíûå ñåêöèè îäíîé ìèêðîñõåìû, íàïðèìåð, íà ýòàïå àíàëèçà òåõíè÷åñêîãî çàäàíèÿ è äåêîìïîçèöèè. Ãëàâíîé îñîáåííîñòüþ çäåñü ÿâëÿåòñÿ òî, ÷òî ýëåìåíòîì ïðåäñòàâëÿåòñÿ áîëüøîé áëîê ëîãèêè, ãäå äëÿ äëèííûõ è çà÷àñòóþ ñõîäÿùèõñÿ òðàêòîâ îáðàáîòêè äàííûõ íåîáõîäèìî ïðåäñòàâëÿòü çàâèñèìîñòè âûõîäîâ îò âõîäîâ. Êàê è â ñëó÷àå ýëåìåíòîâ íèæåëåæàùèõ óðîâíåé, ýëåìåíòû ìèêðîñõåìíîãî óðîâíÿ íå ñòðîÿòñÿ èåðàðõè÷åñêè èç áîëåå ïðîñòûõ ïðèìèòèâîâ, à ïðåäñòàâëÿþò ñîáîé åäèíûå îáúåêòû-ìîäåëè. Òàê, åñëè íóæíî ìîäåëèðîâàòü ïîñëåäîâàòåëüíûé ïîðò ââîäà-âûâîäà (óíèâåðñàëüíûé àñèíõðîííûé ïðèåìîïåðåäàò÷èê, ÓÀÏÏ), ñîîòâåòñòâóþùóþ ìîäåëü íå ñòðîÿò ïóòåì ñîåäèíåíèÿ áîëåå ïðîñòûõ ôóíêöèîíàëüíûõ ìîäåëåé òàêèõ áëîêîâ, êàê ðåãèñòðû è ñ÷åò÷èêè, çäåñü ñàì ÓÀÏÏ ñòàíîâèòñÿ áàçîâîé ìîäåëüþ. Ìîäåëè òàêîãî òèïà âàæíû äëÿ èçãîòîâèòåëåé êîìïëåêñíîãî îáîðóäîâàíèÿ, êîòîðûå ïðèîáðåòàþò ìèêðîñõåìû ó äðóãèõ ôèðì-èçãîòîâèòåëåé, íî íå çíàþò èõ âíóòðåííåé ñòðóêòóðû óðîâíÿ ëîãè÷åñêèõ âåíòèëåé, ïîñêîëüêó ýòî ÿâëÿåòñÿ îáû÷íî ñåêðåòîì ôèðìû. Ïîâåäåí÷åñêîå îïèñàíèå ìîäåëè ìèêðîñõåìíîãî óðîâíÿ ñòðîèòñÿ íà îñíîâå âõîäíîé-âûõîäíîé çàâèñèìîñòè êàæäîé êîíêðåòíîé ÈÑ-àëãîðèòìà,ðåàëèçóåìîãî äàííîé ÈÑ. Âåðõíèé óðîâåíü - ýòî ñèñòåìíûé óðîâåíü. Â êà÷åñòâå ýëåìåíòîâ ýòîãî óðîâíÿ èñïîëüçóþòñÿ ïðîöåññîð, ïàìÿòü è êîììóòàòîð (øèíà) è äð. Ïîâåäåí÷åñêîå îïèñàíèå íà ýòîì óðîâíå âêëþ÷àåò òàêèå îñíîâíûå äàííûå è õàðàêòåðèñòèêè, êàê, íàïðèìåð, ïîêàçàòåëü áûñòðîäåéñòâèÿ ïðîöåññîðà â ìèëëèîíàõ êîìàíä â ñåêóíäó (ìåãîôëîïñû) èëè ïðîïóñêíàÿ ñïîñîáíîñòü òðàêòà îáðàáîòêè äàííûõ (áèò/ñ). Èç òàáë. 1 è âûøåèçëîæåííîãî âèäíî, ÷òî ñòðóêòóðíûå èëè ïîâåäåí÷åñêèå õàðàêòåðèñòèêè ñîñåäíèõ óðîâíåé â îïðåäåëåííîé ñòåïåíè ïåðåêðûâàþòñÿ. Íàïðèìåð, è íà ðåãèñòðîâîì è íà ìèêðîñõåìíîì óðîâíå ìîæåò èñïîëüçîâàòüñÿ ïðåäñòàâëåíèå ïðè ïîìîùè ÃÑÀ. Îäíàêî ñòðóêòóðíîå ïðåäñòàâëåíèå äëÿ îáîèõ óðîâíåé ñîâåðøåííî ðàçëè÷íî, ïîýòîìó îíè è ðàçäåëÿþòñÿ. Ìèêðîñõåìíûé è ñèñòåìíûé óðîâåíü èìåþò ïî ñóòè îäíè è òå æå ýëåìåíòû, îäíàêî îíè àáñîëþòíî ðàçëè÷íû ïî ñâîèì ïîâåäåí÷åñêèì õàðàêòåðèñòèêàì. Òàê, ïîâåäåí÷åñêèå ìîäåëè óðîâíÿ ÈÑ ïîçâîëÿþò âû÷èñëÿòü äåòàëüíûå îòäåëüíûå ðåàêöèè â âèäå çíà÷åíèé öåëûõ ÷èñåë è áèòîâ. À ïîâåäåí÷åñêîìó ïðåäñòàâëåíèþ ñèñòåìíîãî óðîâíÿ ñâîéñòâåííî ñåðüåçíîå îãðàíè÷åíèå - îíî ñëóæèò ïðåèìóùåñòâåííî äëÿ ìîäåëèðîâàíèÿ ïðîïóñêíîé ñïîñîáíîñòè ñèñòåìû èëè îïðåäåëåíèÿ ñòîõàñòè÷åñêèõ ïàðàìåòðîâ ñèñòåìû. Íà ïðàêòèêå ïðåäñòàâëåíèå ïðîåêòà íà ñèñòåìíîì óðîâíå èñïîëüçóåòñÿ ãëàâíûì îáðàçîì äëÿ ñðàâíèòåëüíîé îöåíêè ðàçëè÷íûõ àðõèòåêòóð. Â îáùåì, ñëåäóåò èñïîëüçîâàòü ìîäåëè ðàçíîãî óðîâíÿ, åñëè òðåáîâàíèÿ ëèáî ïîâåäåí÷åñêîãî, ëèáî ñòðóêòóðíîãî õàðàêòåðà ðàçëè÷íû.
215. Автоматизированное рабочее место (АРМ) бухгалтера
Другое Компьютеры, программирование

С помощью АРМ специалист может обрабатывать тексты, посылать и принимать сообщения, хранящиеся в памяти ЭВМ, участвовать в совещаниях, организовывать и вести личные архивы документов, выполнять расчеты и получать готовые результаты в табличной и графической форме. Обычно процессы принятия решений и управления в целом реализуются коллективно, но необходима проблемная реализация АРМ управленческого персонала, соответствующая различным уровням управления и реализуемым функциям. Подготовка информации для принятия решений, собственно принятие решений и их реализация могут иметь много общего в различных экономических службах предприятия. Также многие функции являются типовыми для многих предприятий. Это позволяет создавать гибкие, перестраиваемые структуры управления.
216. Автоматизированное рабочее место оператора автоматизированного переговорного пункта и информационной системы
Другое Компьютеры, программирование

; IAKoff Save, %n, 05/06/96iaphandiaphand;IAKoff;12:49 PM 2 Mar 1996n %T,%DEMOs %DEMO="DEMO VERSION FOR DOORS"l +^ReestrIndRK:1s %T=$TEST i %T=0 l -^ReestrIndRK qd ^iaphandinitd ORDERLIST^iaphandsubl -^ReestrIndRKq ; -----------------------------------------------------------ADDORDER(%nord) n %f,%addtime,%zone,%tarif,%tarif1,%notify,%key,%ef,%DDDD,%HHHHn %month,%ltarifs %ltarif=0s %DDDD=$p($h,",",1)s %HHHH=$p($h,",",2)s %f("FAST")=0 s %f("TOTAL")=0 s %f("TIME")=3i $g(%nord)="" g add i $p(^appstat("ORDERS",%nord),$c(30),20)'="" g workORDERd str2frm^uf58("%f",^appstat("ORDERS",%nord),$c(30),"iap!HORD")s %notify=$p(^appstat("ORDERS",%nord),$c(30),18)s %ef=1g eddadd s %ef=0s %key=$$^dp58dlg(10,30,15,50,"ОФОРМЛЕНИЕ ЗАКАЗА","ТЕКУЩИЙ"_%_"УВЕДОМЛЕНИЕ","",2,"","VC") i $p(%key,%,2)="KEYESC" qs %notify=$p(%key,%,1)-1 s %nord=$g(^appstat("LASTORDER"))+1s %month=$g(^appstat("LASTORDER","MONTH"))i ($p($zdate,"/",1)+0)'=%month s %nord=1 s %month=($p($zdate,"/",1)+0)edd d drscr^uf58($s(%notify=0:"iap!HORD",%notify=1:"iap!NORD")) w /color(7,0),/c(20,3),$j(%nord,3)i $$get^uf58($s(%notify=0:"iap!HORD",%notify=1:"iap!NORD"),"%f")="ESC" qs %f("X")=%addtime,%f("Y")=%tarif,%f("Z")=%zone,%f("ZZ")=%notifys ^appstat("ORDERS",%nord)=$$frm2str^uf58("%f",%)_%_$h_%_""_%_%APPSYS("NOM_OPER")s $p(^appstat("ORDERS",%nord),$c(30),25)=%ltarifi %ef=0 s ^appstat("LASTORDER")=%nord s ^appstat("LASTORDER","MONTH")=%monthq ; -----------------------------------------------------------workORDER d str2frm^uf58("%f",^appstat("ORDERS",%nord),$c(30),"iap!HORD")s %notify=$p(^appstat("ORDERS",%nord),$c(30),18)s %tarif1=$p(^appstat("ORDERS",%nord),$c(30),16)s %addtime=$p(^appstat("ORDERS",%nord),$c(30),15) d drscr^uf58($s(%notify=0:"iap!HORD",%notify=1:"iap!NORD",%notify=2:"iap!FORD")) w /color(7,0),/c(20,3),$j(%nord,3)d redraw^uf58($s(%notify=0:"iap!HORD",%notify=1:"iap!NORD",%notify=2:"iap!FORD"),"%f")w /c(57,5),/color(7,0),$zzc(%tarif1,13)w /color(7,0),/c(38,10),$j(%addtime,3)w /color(7,0),/c(26,3),"Оператор МТТС : "_$j($p(^appstat("ORDERS",%nord),$c(30),24),3)vo1 s %key=$$RKey^uf58() i %key="KEYNOPRESS" g vo1q ; ----------------------------------------------------------- OutCOUNTRY() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q %ufNEWDATAi $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"i $p(%ufNEWDATA,$c(30),1)="" q "СНГ"_$c(30)_$p(%ufNEWDATA,$c(30),2)i $p(%ufNEWDATA,$c(30),1)="СНГ" q %ufNEWDATAn %id,%ress %id=$p(%ufNEWDATA,$c(30),1)i $d(^appACDC(%id))>0 q %ufNEWDATAs %res=$$LIST^dp58Sel("^appACDC(%id)","%id",20,13,40,8,"",0,"SINGLE","","DrawCOUNTRY^iaphand")i $p(%res,$c(30),2)="KEYESC" q "PROBLEM"q %id_$c(30)_"KEYENTER" DrawCOUNTRY i %dpINDEX="DRAWFREE" w $j("",%dpSX) qw $j(%id,%dpSX) q OutSHTAT() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"n %id,%id1,%ress %id=$p(%ufNEWDATA,$c(30),1)s %id1=%f("COUNTRY") i %id1="СНГ" g OutSHT1i %id="" g OutSHT0i $d(^appACDC(%id1,%id))>0 q %ufNEWDATAOutSHT0 s %res=$$LIST^dp58Sel("^appACDC(%id1,%id)","%id",20,13,40,8,"",0,"SINGLE","","DrawCOUNTRY^iaphand")g OutSHT2OutSHT1 i %id="" g OutSHT3i $d(^app8ACDC(%id))>0 q %ufNEWDATAOutSHT3 s %res=$$LIST^dp58Sel("^app8ACDC(%id)","%id",20,13,40,8,"",0,"SINGLE","","DrawCOUNTRY^iaphand")OutSHT2 i $p(%res,$c(30),2)="KEYESC" q "PROBLEM"q %id_$c(30)_"KEYENTER" InREGION() s %f("REGION")=""i %f("COUNTRY")'="СНГ" q "FIELDOFF"q %ufOLDDATA OutREGION() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"n %id1,%id,%ress %id1=%f("SHTAT")s %id=$p(%ufNEWDATA,$c(30),1)i %id="" q %ufNEWDATAi $d(^app8ACDC(%id1,%id))>0 q %ufNEWDATAs %res=$$LIST^dp58Sel("^app8ACDC(%id1,%id)","%id",20,13,40,8,"",0,"SINGLE","","DrawCOUNTRY^iaphand")i $p(%res,$c(30),2)="KEYESC" q "PROBLEM"q %id_$c(30)_"KEYENTER" OutTARGET() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"q %ufNEWDATA InCODE() i %f("COUNTRY")'="СНГ" q ^appACDC(%f("COUNTRY"),%f("SHTAT"))i (^app8ACDC(%f("SHTAT"))=^AppSys58("KOD_OBLS"))&(%f("REGION")="") q 2i %f("REGION")="" q ^app8ACDC(%f("SHTAT"))i ^app8ACDC(%f("SHTAT"))=^AppSys58("KOD_OBLS") q 2_^app8ACDC(%f("SHTAT"),%f("REGION"))q ^app8ACDC(%f("SHTAT"))_^app8ACDC(%f("SHTAT"),%f("REGION")) OutCODE() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"i $l($p(%ufNEWDATA,$c(30),1))<3 q "PROBLEM"n %code s %code=$e($p(%ufNEWDATA,$c(30),1),1,3)i %f("COUNTRY")="СНГ" g outcodi $g(^appMGTRF(%code))="" s ^appMGTRF(%code)=3s %zone=^appMGTRF(%code)i $g(^appstat("TARIF","HAND810",%zone))="" s ^appstat("TARIF","HAND810",%zone)=^appstat("TARIF","HAND810",3)s %tarif1=$$NTARIF(^appstat("TARIF","HAND810",%zone))g outcod1outcod i $e(%code,1,1)="2" s %code=^AppSys58("KOD_OBLS")i $g(^app8MTRF(%code))="" s ^app8MTRF(%code)=3s %zone=^app8MTRF(%code)i $g(^appstat("TARIF","HAND8",%zone))="" s ^appstat("TARIF","HAND8",%zone)=^appstat("TARIF","HAND8",3)s %tarif1=$$NTARIF(^appstat("TARIF","HAND8",%zone))outcod1 w /c(57,5),/color(7,0),$zzc(%tarif1,13)q %ufNEWDATA NTARIF(Str) s %ltarif=$$SHARE^AppSyst(%DDDD,%HHHH)s Str=$p(Str,$c(30),%ltarif+1)i Str<20 s Str=Str*^AppSys58("USD_KURS")q Str q %ufNEWDATA InPH1() i %notify s %f("PH1")="" q "FIELDOFF"q %ufOLDDATA OutPH1() i %notify q $p(%ufNEWDATA,$c(30),1)_%_"KEYENTER"i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM";i $p(%ufNEWDATA,$c(30),1)="" q "PROBLEM"q %ufNEWDATA InDATE() ;n %dd s %dd=$$DATE^dp58sys();i %ufOLDDATA="" q $p(%dd,"/",1)_$p(%dd,"/",2)_$p(%dd,"/",3)q %ufOLDDATA OutDATE() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"i $e($p(%ufNEWDATA,$c(30),1),5,6)="" s $p(%ufNEWDATA,$c(30),1)=$p(%ufNEWDATA,$c(30),1)_"96"n %d s %d=$p(%ufNEWDATA,$c(30),1)s %DDDD=$$DATE2SYS^dp58sys($e(%d,1,2)_"/"_$e(%d,3,4)_"/"_$e(%d,5,6))q %ufNEWDATA InNTIME() ;n %dd s %dd=$$TIME^dp58sys();i %ufOLDDATA="" q $p(%dd,":",1)_$p(%dd,":",2)q %ufOLDDATA OutNTIME() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"n %t s %t=$p(%ufNEWDATA,$c(30),1)s %HHHH=$$TIME2SYS^dp58sys($e(%t,1,2)_":"_$e(%t,3,4))i %f("COUNTRY")="СНГ" s %tarif1=$$NTARIF(^appstat("TARIF","HAND8",%zone))i %f("COUNTRY")'="СНГ" s %tarif1=$$NTARIF(^appstat("TARIF","HAND810",%zone))w /c(57,5),/color(7,0),$zzc(%tarif1,13)q %ufNEWDATA InADDR() q "" OutADDR() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"q %ufNEWDATA InPH() i %notify s %f(%ufII)="" q "FIELDOFF"i %f("PH"_($e(%ufII,3,3)-1))="" s %f(%ufII)="" q "FIELDOFF"q %ufOLDDATA OutPH() i %notify q ""_%_"KEYENTER"i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"q %ufNEWDATA OutCALL() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"i (%notify)&($p(%ufNEWDATA,$c(30),1)="") q "PROBLEM"q %ufNEWDATA OutTIME() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"i ($p(%ufNEWDATA,$c(30),1)="")&(%f("PH1")="") g outime2i ($p(%ufNEWDATA,$c(30),1)+0)<3 q "PROBLEM"i ($p(%ufNEWDATA,$c(30),1)+0)>255 q "PROBLEM"outime2 s %addtime=0s %addtime=$p(^SpravUsl(61+%notify),%,4)i %f("CALL")'="" s %addtime=%addtime+$p(^SpravUsl(61+%notify,31),%,4)i %notify g outime1i %f("PH1")="" s %addtime=%addtime+$p(^SpravUsl(61,32),%,4) g outime1i %f("PH5")'="" s %addtime=%addtime+$p(^SpravUsl(61,35),%,4) g outime1i %f("PH4")'="" s %addtime=%addtime+$p(^SpravUsl(61,34),%,4) g outime1i %f("PH3")'="" s %addtime=%addtime+$p(^SpravUsl(61,33),%,4) g outime1outime1 w /color(7,0),/c(38,10),$j(%addtime,3)q %ufNEWDATA OutFAST() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"q %ufNEWDATA InTOTAL() n %summs %tarif=%tarif1*$p(^SpravUsl(61+%notify,10+%f("FAST")),%,4)s %summ=%tarif*(%f("TIME")+%addtime)w /c(57,5),/color(7,0),$zzc(%tarif,13)q $zzoo(%summ) OutTOTAL() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q $p(%ufNEWDATA,$c(30),1)_$c(30)_"KEYUP"i $p(%ufNEWDATA,$c(30),2)'="KEYENTER" q "PROBLEM"q %ufNEWDATA AskPrint() n %Retaskdel s %Ret=$$^dp58dlg(20,42,23,77,"ПОДТВЕРДИТЕ ПЕЧАТЬ"," Печатать "_%_" Не печатать ","",2,"7,0,7,0,0,7,7,0")w /color(0,8)d ^dp58box(20,42,23,77,0," ")i $p(%Ret,%,2)="KEYENTER" q (2-%Ret)i $p(%Ret,%,2)="KEYESC" q 0g askdel; IAKoff Save, %n, 05/06/96iaphandsubiaphandsub;IAKoff;02:41 PM 2 Mar 1996;q SYSH() q %APPSYS("NOM_OPER")_","_%APPSYS("NOM_SMEN")_","_%APPSYS("NOM_DENN")_","_%APPSYS("NOM_MESS") ORDERLIST n %key,%title,%ids %title="Nзк Опр "_$zzr("СТРАНА",7)_$zzr("ОБЛАСТЬ",8)_$zzr("РЕГИОН",7)_$zzr("НАС.ПУНКТ",10)_$zzr("ПРИНЯТ",9)_$zzr("ПЕРЕДАН",9)_$zzr("ЖДЕТ",6)ordlist s %key=$$LIST^dp58Sel("^appstat(""ORDERS"",%id)","%id",2,3,65,8,"",0,"SINGLE"," Список заказов "_%_$zzr(%title,58)_%_"F2-Принять F4-Ред/Смтр F8-Снять <ENTER>-Прд/Вып/Ост","DrawORDERS^iaphandsub","KEYF2,KEYF8,KEYF4")i $p(%key,%,2)="KEYESC" qi $p(%key,%,2)="KEYF2" d ADDORDER^iaphand() g ordlisti %id="" g ordlisti $p(%key,%,2)="KEYF4" d ADDORDER^iaphand(%id) g ordlisti ($p(%key,%,2)="KEYENTER")&($p(^appstat("ORDERS",%id),%,23)'="") d REST(%id) g ordlisti ($p(%key,%,2)="KEYENTER")&($p(^appstat("ORDERS",%id),%,20)="") d SENT(%id) g ordlisti $p(%key,%,2)="KEYENTER" d EXECUTE(%id) g ordlisti $p(%key,%,2)="KEYF8" d ABORT(%id) g ordlistg ordlist DrawORDERS i %dpINDEX="DRAWFREE" w $j("",%dpSX) qi %id="" w $zzr(" НЕТ ЗАКАЗОВ ",%dpSX) qw $zzr(%id,4)w $zzr($e($p(^appstat("ORDERS",%id),%,21),1,3),4)w $zzr($e($p(^appstat("ORDERS",%id),%,3),1,6),7)w $zzr($e($p(^appstat("ORDERS",%id),%,11),1,7),8)w $zzr($e($p(^appstat("ORDERS",%id),%,10),1,6),7)w $zzr($e($p(^appstat("ORDERS",%id),%,12),1,9),10)i $p(^appstat("ORDERS",%id),%,23)="" g drord3w "Остаток:"_$zzc($p(^appstat("ORDERS",%id),%,23),17) g drord2drord3 i $p(^appstat("ORDERS",%id),%,18) g drord1w $$TIME^dp58sys($p($p(^appstat("ORDERS",%id),%,19),",",2))_" "i $p(^appstat("ORDERS",%id),%,20)="" w "----- "e w $$TIME^dp58sys($p($p(^appstat("ORDERS",%id),%,20),",",2))_" "w $zzr(($p($h,",",2)-$p($p(^appstat("ORDERS",%id),%,19),",",2))\60,3)_"мин "g drord2drord1 n %d s %d=$p(^appstat("ORDERS",%id),$c(30),5)w $j($e(%d,1,2)_"/"_$e(%d,3,4)_"/"_$e(%d,5,6),9)s %d=$p(^appstat("ORDERS",%id),$c(30),6) w $j($e(%d,1,2)_":"_$e(%d,3,4),9)w $j("",7)drord2 q SENT(%nord) n %key,%msg,%notify,%ord,%reestr,%fffs %ord=^appstat("ORDERS",%nord)s %notify=$p(%ord,%,18)s %msg=%APPSYS("NOM_GOES")_"-му отд. связи"_%i $p(%ord,%,4)=1 s %msg=%msg_"СРОЧНЫЙ"_%s %msg=%msg_$p(%ord,%,3)_%i %notify s %msg=%msg_$p(%ord,%,11)_%i %notify s %msg=%msg_$p(%ord,%,10)_%i %notify s %msg=%msg_$p(%ord,%,12)_%i '%notify s %msg=%msg_"Код:"_$p(%ord,%,2)_%i %notify s %msg=%msg_$tr($p(%ord,%,7)," ",%)_%i %notify s %msg=%msg_"Дата:"_$p(%ord,%,5)_%e s %msg=%msg_"Тел:"_$p(%ord,%,5)_%i %notify s %msg=%msg_"Время:"_$p(%ord,%,6)_%i '%notify f %key=6:1:9 i $p(%ord,%,%key)'="" s %msg=%msg_" или "_$p(%ord,%,%key)_%i $p(%ord,%,1)'="" s %msg=%msg_"Пригласить "_$p(%ord,%,1)_%s %msg=%msg_$p(%ord,%,13)_" минут"_%s %key=$$^dp58dlg(3,20,5+$l(%msg,%),60,%msg,"ПЕРЕДАН"_%_"ОТКАЗ","",2,"","")i $p(%key,$c(30),2)="KEYESC" qi $p(%key,$c(30),1)=2 qs %fff("NOPER")=""d drscr^uf58("iap!HSENT")i $$get^uf58("iap!HSENT","%fff")="ESC" qs $p(%ord,%,24)=%fff("NOPER")s $p(%ord,%,20)=$p($h,",",2-$p(%ord,%,18))s $p(%ord,%,28)=$$SYSHs ^appstat("ORDERS",%nord)=%ords %reestr=$$REESTR^iaphandsub("ПРН",%nord,$p(%ord,%,13),,$p(%ord,%,14),,)d AddOplata^AppSys($s($p(%ord,%,3)="СНГ":81,1:881),$p(%ord,%,14),%reestr,"",$$KVITAN(%nord,%ord,0))d ADDRRR(%reestr)i $$AskPrint^iaphand() d PrintKvit^AppSysde d NewKvit^AppSysdq InTIME() i ($p(^appstat("ORDERS",%id),%,13)+0)<3 s %fff("TIME")=0 q "FIELDOFF"i $p(^appstat("ORDERS",%id),%,13)'>3 s %fff("TIME")=3 q "FIELDOFF"q $p(^appstat("ORDERS",%id),%,13) OutTIME() i $p(%ufNEWDATA,$c(30),2)="KEYESC" q %ufNEWDATAi ($p(%ufNEWDATA,$c(30),1)+0)<3 q "PROBLEM"i ($p(%ufNEWDATA,$c(30),1)+0)>$p(^appstat("ORDERS",%id),%,13) q "PROBLEM"q %ufNEWDATA InTEL() n %ntel,%ii $p(^appstat("ORDERS",%id),%,18)=1 s %fff("TEL")=0 q "FIELDOFF"s %ntel=0 f %i=5:1:9 i $p(^appstat("ORDERS",%id),%,%i)'="" s %ntel=%ntel+1i %ntel=1 s %fff("TEL")=1 q "FIELDOFF"q %ntel OutTEL() n %ntel,%is %ntel=0 f %i=5:1:9 i $p(^appstat("ORDERS",%id),%,%i)'="" s %ntel=%ntel+1i %ntel=0 q %ufNEWDATAi ($p(%ufNEWDATA,$c(30),1)+0)<1 q "PROBLEM"i ($p(%ufNEWDATA,$c(30),1)+0)>%ntel q "PROBLEM"q %ufNEWDATA EXECUTE(%nord) n %fff,%reestr,%tsumm,%ord,%ntel,%i,%keys %ntel=0 i $p(^appstat("ORDERS",%nord),%,18) g exec2f %i=5:1:9 i $p(^appstat("ORDERS",%id),%,%i)'="" s %ntel=%ntel+1exec2 s %ord=^appstat("ORDERS",%nord)s %fff("TIME")=$p(%ord,%,13)d drscr^uf58("iap!HEXEC")i $$get^uf58("iap!HEXEC","%fff")="ESC" q s %fff("NOPER")=$p(%ord,%,24)d drscr^uf58("iap!HSTOL")i $$get^uf58("iap!HSTOL","%fff")="ESC" qs $p(%ord,%,24)=%fff("NOPER") s %key=$$^dp58dlg(7,20,11,60,"Подтвердите выполнение","ВЫПОЛНИТЬ"_%_"ОТМЕНА","",2,"","")i $p(%key,$c(30),2)="KEYESC" g exec2i $p(%key,$c(30),1)=2 qs $p(%ord,%,22)=%fff("TIME")i %ntel=0 s $p(%ord,%,27)=%fff("TEL") g exec1s %i=0 i %ntel>2 s %i=$p(^SpravUsl(61,30+%ntel),%,4)s $p(%ord,%,15)=$p(%ord,%,15)-%is %i=0 i %fff("TEL")>2 s %i=$p(^SpravUsl(61,30+%fff("TEL")),%,4)s $p(%ord,%,15)=$p(%ord,%,15)+%is $p(%ord,%,27)=%fff("TEL")exec1 s %tsumm=$zzoo((%fff("TIME")+$p(%ord,%,15))*$p(%ord,%,16))s %rest=$p(%ord,%,14)-%tsumms $p(%ord,%,23)=%rest i %rest=0 s %key=1 g exec11s %key=$$^dp58dlg(3,20,7,60,"Неужели клиент явился за остатком ?","ЯВИЛСЯ"_%_"НЕ ЯВИЛСЯ","",2,"","")i $p(%key,$c(30),2)="KEYESC" g exec2exec11 s ^appstat("ORDERS",%nord)=%ords %reestr=$$REESTR("ВЫП",%nord,$p(%ord,%,13),$p(%ord,%,22),,%tsumm,);d AddOplata^AppSys($s($p(%ord,%,3)="СНГ":82,1:882),%tsumm,%reestr)d AddOplata^AppSys($s($p(%ord,%,3)="СНГ":82,1:882),0,%reestr)d ADDRRR(%reestr) i $p(%key,$c(30),1)=1 g exec4s %reestr=$$REESTR("НЕВ",%nord,$p(%ord,%,13),$p(%ord,%,22),,,%rest)d AddOplata^AppSys($s($p(%ord,%,3)="СНГ":84,1:884),0,%reestr,"","Заказ "_%nord)d ADDRRR(%reestr)g exec3exec4 s %reestr=$$REESTR("ОСТ",%nord,$p(%ord,%,13),$p(%ord,%,22),,,%rest)s %i=$s($p(%ord,%,3)="СНГ":85,1:885)s %i=%i+($$SYSH=$p(%ord,%,28))d AddOplata^AppSys(81,$p(%ord,%,14),"","",$$KVITAN(%nord,%ord,1),"p")d AddOplata^AppSys(%i,-%rest,%reestr)d ADDRRR(%reestr)i %rest>0 s %key=$$^dp58msg(3,20,"Барышня,"_%_"верните пожалуста клиенту остаток"_%_$zzc(%rest),0)k ^appstat("ORDERS",%nord)i $$AskPrint^iaphand() d PrintKvit^AppSysde d NewKvit^AppSysdexec3 q ABORT(%nord) n %ord,%notify,%tarif,%key,%id,%tsumm,%rest,%reestr,%ttime,%fffs %ord=^appstat("ORDERS",%nord) s %notify=$p(%ord,%,18)i $p(%ord,%,20)="" s %key=$$^dp58msg(3,20,"Девушка с двумя веслами,"_%_"нельзя снимать заказ"_%_"если вы его еще не педерали",0) qs %tarif=$p(%ord,%,16)abr2 s %id=""s %key=$$LIST^dp58Sel("^SpravUsl(61+%notify,51,%id)","%id",60,3,10,11,"",0,"SINGLE","Причина","DrawREASON^iaphandsub")i $p(%key,%,2)="KEYESC" qs $p(%ord,%,26)=$p(^SpravUsl(61+%notify,51,%id),%,1)s %ttime=$p(^SpravUsl(61+%notify,50,%id),%,4)i $p(%ord,%,1)'="" s %ttime=%ttime+$p(^SpravUsl(61+%notify,51,%id),%,4)i %notify g abr1i $p(%ord,%,5)="" s %ttime=%ttime+$p(^SpravUsl(61,52,%id),%,4) g abr1i $p(%ord,%,9)'="" s %ttime=%ttime+$p(^SpravUsl(61,55,%id),%,4) g abr1i $p(%ord,%,8)'="" s %ttime=%ttime+$p(^SpravUsl(61,54,%id),%,4) g abr1i $p(%ord,%,7)'="" s %ttime=%ttime+$p(^SpravUsl(61,53,%id),%,4) g abr1abr1 s %fff("NOPER")=$p(%ord,%,24)d drscr^uf58("iap!HSTOL")i $$get^uf58("iap!HSTOL","%fff")="ESC" g abr2s $p(%ord,%,24)=%fff("NOPER")s %tsumm=$zzoo(%ttime*$p(%ord,%,16))s %rest=$p(%ord,%,14)-%tsumms $p(%ord,%,23)=%rests %key=$$^dp58dlg(3,20,7,60,"Неужели клиент явился за остатком ?","ЯВИЛСЯ"_%_"НЕ ЯВИЛСЯ","",2,"","")i $p(%key,$c(30),2)="KEYESC" g abr2 s ^appstat("ORDERS",%nord)=%ord s %reestr=$$REESTR("СНТ",%nord,$p(%ord,%,13),$p(%ord,%,22),,%tsumm,)d AddOplata^AppSys($s($p(%ord,%,3)="СНГ":82,1:882),0,%reestr)d ADDRRR(%reestr) i $p(%key,$c(30),1)=1 g abr4s %reestr=$$REESTR("НЕВ",%nord,$p(%ord,%,13),$p(%ord,%,22),,,%rest)d AddOplata^AppSys($s($p(%ord,%,3)="СНГ":84,1:884),0,%reestr,"","Заказ "_%nord)d ADDRRR(%reestr)g abr3abr4 s %reestr=$$REESTR("ОСТ",%nord,$p(%ord,%,13),$p(%ord,%,22),,,%rest)s %i=$s($p(%ord,%,3)="СНГ":85,1:885)s %i=%i+($$SYSH=$p(%ord,%,28))d AddOplata^AppSys(81,$p(%ord,%,14),"","",$$KVITAN(%nord,%ord,1),"p")d AddOplata^AppSys(%i,-%rest,%reestr)d ADDRRR(%reestr)i %rest>0 s %key=$$^dp58msg(3,20,"Барышня,"_%_"верните пожалуста клиенту остаток"_%_$zzc(%rest),0)k ^appstat("ORDERS",%nord)i $$AskPrint^iaphand() d PrintKvit^AppSysde d NewKvit^AppSysdabr3 q DrawREASON i %dpINDEX="DRAWFREE" w $j("",%dpSX) qw $zzr($p(^SpravUsl(61+%notify,51,%id),%,1),%dpSX) q REST(%nord) n %ord,%notify,%tarif,%key,%id,%tsumm,%rest,%reestr,%ttime,%is %ord=^appstat("ORDERS",%nord) s %notify=$p(%ord,%,18) s %key=$$^dp58dlg(3,20,7,60,"Неужели клиент явился за остатком ?","ЯВИЛСЯ"_%_"НЕ ЯВИЛСЯ","",2,"","")i $p(%key,$c(30),2)="KEYESC" qi $p(%key,$c(30),1)=2 q s %rest=$p(%ord,%,23)s %reestr=$$REESTR("ВЗВ",%nord,$p(%ord,%,13),$p(%ord,%,22),,,%rest)s %i=$s($p(%ord,%,3)="СНГ":85,1:885)s %i=%i+($$SYSH=$p(%ord,%,28))d AddOplata^AppSys(81,$p(%ord,%,14),"","",$$KVITAN(%nord,%ord,1),"p")d AddOplata^AppSys(%i,-%rest,%reestr)d ADDRRR(%reestr)i %rest>0 s %key=$$^dp58msg(3,20,"Девушка с веслом,"_%_"верните пожалуста клиенту остаток"_%_$zzc(%rest),0)k ^appstat("ORDERS",%nord)i $$AskPrint^iaphand() d PrintKvit^AppSysde d NewKvit^AppSysdq REESTR(%SUBJECT,%NORD,%FULLTIME,%TOTALTIME,%DEPOSIT,%TOTAL,%REST)n %r,%z,%ts %z=^appstat("ORDERS",%NORD) s %r.1=8s %r.2=%APPSYS("NOM_GOES")s %r.3=%APPSYS("NOM_OPER")s %r.4=$p($$GetDTQ^AppSys,%,1)s %r.5=%NORDs %r.6=%APPSYS("NOM_KVIT") ; НОМЕР КВИТАНЦИИs %r.7="" i %SUBJECT="ПРН" s %r.7=%APPSYS("NOM_OPER")s %r.8="" i %SUBJECT="ПРН" s %r.8=$p(%z,%,19) ; $h принятия заказаs %r.9=$p(%z,%,24) ; номер опреатора который принял заказ на столеs %r.10="" i %SUBJECT="ПРН" s %r.10=$p(%z,%,20) ; $h передачи заказаs %r.11="" i %SUBJECT'="ПРН" s %r.11=%APPSYS("NOM_OPER")s %r.12="" i %SUBJECT'="ПРН" s %r.12=$h ; выполнение заказаs %r.13=$g(%FULLTIME)s %r.14=$g(%TOTALTIME)s %r.15=$p(%z,%,17)s %r.16=%SUBJECTs %r.17=$p(%z,%,2)s %r.18=$p(%z,%,16)s %r.19=$p(%z,%,3)s %r.20="ОБЫЧНЫЙ" i $p(%z,%,4)=1 s %r.20="СРОЧНЫЙ"s %r.21=$p(%z,%,11)s %r.22=$p(%z,%,15)s %r.23=$g(%DEPOSIT)s %r.24=$g(%TOTAL)s %r.25=$g(%REST)s %r.26="" i $p(%z,%,25)=1 s %r.26="ЛЬГОТНЫЙ"s %r.27=$p(%z,%,10)s %r.28=$p(%z,%,12)s %r.29="" i $p(%z,%,18) d. s %r.29=$$DATE2SYS^dp58sys($e($p(%z,%,5),1,2)_"/"_$e($p(%z,%,5),3,4)_"/"_$e($p(%z,%,5),5,6))_","_$$TIME2SYS^dp58sys($e($p(%z,%,6),1,2)_":"_$e($p(%z,%,6),3,4))s %t=$p(%z,%,5)_","_$p(%z,%,6)_","_$p(%z,%,7)_","_$p(%z,%,8)_","_$p(%z,%,9)i $p(%z,%,27)'="" s $p(%t,",",$p(%z,%,27))="["_$p(%t,",",$p(%z,%,27))_"]"s %r.30=%ti $p(%z,%,18) s %r.30=$p(%z,%,7)s %r.31=$p(%z,%,1)s %r.32=$p(%z,%,24)s %r.33=$p(%z,%,26) i $p(%z,%,27)'="" s %r.33=$p(%z,%,27)_" "_$p(%z,%,26)s %r.34=$p(%z,%,23)q %rADDRRR(%RRR) s ^ReestrIndRK($p(%RRR,$c(30),5),$p(%RRR,$c(30),16))=%APPSYS("LAST_IND")q KVITAN(%NORD,%ORD,%RESTF) n %kv,%d s %kv="Заказ N "_%NORDs %kv=%kv_$c(13)_$p(%ORD,%,11)s %d=$p(%ORD,%,5)i $p(%ORD,%,18)s %kv=%kv_$c(13)_$e(%d,1,2)_"/"_$e(%d,3,4)_"/"_$e(%d,5,6)s %d=$p(%ORD,%,6)i $p(%ORD,%,18)s %kv=%kv_$c(13)_$e(%d,1,2)_":"_$e(%d,3,4)i %RESTF s %kv=%kv_$c(13)_$p(%ORD,%,2)_"-"_$p(%ORD,%,4+$p(%ORD,%,27))q %kv; IAKoff Save, %n, 05/06/96iaphandinitiaphandinit;IAKoff;02:06 PM 12 Feb 1996;i $g(^SpravUsl(61))="" s ^SpravUsl(61)="РУЧНОЙ ЗАКАЗ0000мин."i $g(^SpravUsl(61,10))="" s ^SpravUsl(61,10)="ОБЫЧНЫЙ1110разы"i $g(^SpravUsl(61,11))="" s ^SpravUsl(61,11)="СРОЧНЫЙ1120разы"i $g(^SpravUsl(61,31))="" s ^SpravUsl(61,31)="ПРИГЛАШЕНИЕ0010мин."i $g(^SpravUsl(61,32))="" s ^SpravUsl(61,32)="СПРАВКА0020мин."i $g(^SpravUsl(61,33))="" s ^SpravUsl(61,33)="ВЫЗОВ ПО 3 ТЛФ.0010мин."i $g(^SpravUsl(61,34))="" s ^SpravUsl(61,34)="ВЫЗОВ ПО 4 ТЛФ.0020мин."i $g(^SpravUsl(61,35))="" s ^SpravUsl(61,35)="ВЫЗОВ ПО 5 ТЛФ.0030мин."i $g(^SpravUsl(61,50))="" s ^SpravUsl(61,50)="СНЯТИЕ ЗАКАЗА0000мин."i $g(^SpravUsl(61,50,1))="" s ^SpravUsl(61,50,1)="ОМС0010мин."i $g(^SpravUsl(61,50,2))="" s ^SpravUsl(61,50,2)="НВЛ0000мин."i $g(^SpravUsl(61,50,3))="" s ^SpravUsl(61,50,3)="NoНО0000мин."i $g(^SpravUsl(61,50,4))="" s ^SpravUsl(61,50,4)="ПВ0000мин."i $g(^SpravUsl(61,50,5))="" s ^SpravUsl(61,50,5)="ПС0000мин."i $g(^SpravUsl(61,50,6))="" s ^SpravUsl(61,50,6)="ТИ0000мин."i $g(^SpravUsl(61,50,7))="" s ^SpravUsl(61,50,7)="СО0000мин."i $g(^SpravUsl(61,50,8))="" s ^SpravUsl(61,50,8)="РВ0000мин."i $g(^SpravUsl(61,50,9))="" s ^SpravUsl(61,50,9)="ВК0000мин."i $g(^SpravUsl(61,50,10))="" s ^SpravUsl(61,50,10)="ОДС0000мин."i $g(^SpravUsl(61,50,11))="" s ^SpravUsl(61,50,11)="ЗНЯ666010мин."i $g(^SpravUsl(61,51))="" s ^SpravUsl(61,51)="СНЯТИЕ С ПРИГЛАШЕНИЯ0000мин."i $g(^SpravUsl(61,51,1))="" s ^SpravUsl(61,51,1)="ОМС0010мин."i $g(^SpravUsl(61,51,2))="" s ^SpravUsl(61,51,2)="НВЛ0010мин."i $g(^SpravUsl(61,51,3))="" s ^SpravUsl(61,51,3)="NoНО0000мин."i $g(^SpravUsl(61,51,4))="" s ^SpravUsl(61,51,4)="ПВ0000мин."i $g(^SpravUsl(61,51,5))="" s ^SpravUsl(61,51,5)="ПС0000мин."i $g(^SpravUsl(61,51,6))="" s ^SpravUsl(61,51,6)="ТИ0000мин."i $g(^SpravUsl(61,51,7))="" s ^SpravUsl(61,51,7)="СО0000мин."i $g(^SpravUsl(61,51,8))="" s ^SpravUsl(61,51,8)="РВ0000мин."i $g(^SpravUsl(61,51,9))="" s ^SpravUsl(61,51,9)="ВК0000мин."i $g(^SpravUsl(61,51,10))="" s ^SpravUsl(61,51,10)="ОДС0000мин."i $g(^SpravUsl(61,51,11))="" s ^SpravUsl(61,51,11)="ЗНЯ666010мин."i $g(^SpravUsl(61,52))="" s ^SpravUsl(61,52)="СНЯТИЕ СО СПРАВКИ0000мин."i $g(^SpravUsl(61,52,1))="" s ^SpravUsl(61,52,1)="ОМС0010мин."i $g(^SpravUsl(61,52,2))="" s ^SpravUsl(61,52,2)="НВЛ0010мин."i $g(^SpravUsl(61,52,3))="" s ^SpravUsl(61,52,3)="NoНО0000мин."i $g(^SpravUsl(61,52,4))="" s ^SpravUsl(61,52,4)="ПВ0000мин."i $g(^SpravUsl(61,52,5))="" s ^SpravUsl(61,52,5)="ПС0000мин."i $g(^SpravUsl(61,52,6))="" s ^SpravUsl(61,52,6)="ТИ0000мин."i $g(^SpravUsl(61,52,7))="" s ^SpravUsl(61,52,7)="СО0000мин."i $g(^SpravUsl(61,52,8))="" s ^SpravUsl(61,52,8)="РВ0000мин."i $g(^SpravUsl(61,52,9))="" s ^SpravUsl(61,52,9)="ВК0000мин."i $g(^SpravUsl(61,52,10))="" s ^SpravUsl(61,52,10)="ОДС0000мин."i $g(^SpravUsl(61,52,11))="" s ^SpravUsl(61,52,11)="ЗНЯ666010мин."i $g(^SpravUsl(61,53))="" s ^SpravUsl(61,53)="СНЯТИЕ С 3-Х ТЕЛЕФОНОВ0000мин."i $g(^SpravUsl(61,53,1))="" s ^SpravUsl(61,53,1)="ОМС0010мин."i $g(^SpravUsl(61,53,2))="" s ^SpravUsl(61,53,2)="НВЛ0010мин."i $g(^SpravUsl(61,53,3))="" s ^SpravUsl(61,53,3)="NoНО0000мин."i $g(^SpravUsl(61,53,4))="" s ^SpravUsl(61,53,4)="ПВ0000мин."i $g(^SpravUsl(61,53,5))="" s ^SpravUsl(61,53,5)="ПС0000мин."i $g(^SpravUsl(61,53,6))="" s ^SpravUsl(61,53,6)="ТИ0000мин."i $g(^SpravUsl(61,53,7))="" s ^SpravUsl(61,53,7)="СО0000мин."i $g(^SpravUsl(61,53,8))="" s ^SpravUsl(61,53,8)="РВ0000мин."i $g(^SpravUsl(61,53,9))="" s ^SpravUsl(61,53,9)="ВК0000мин."i $g(^SpravUsl(61,53,10))="" s ^SpravUsl(61,53,10)="ОДС0000мин."i $g(^SpravUsl(61,53,11))="" s ^SpravUsl(61,53,11)="ЗНЯ666010мин."i $g(^SpravUsl(61,54))="" s ^SpravUsl(61,54)="СНЯТИЕ С 4-Х ТЕЛЕФОНОВ0000мин."i $g(^SpravUsl(61,54,1))="" s ^SpravUsl(61,54,1)="ОМС0010мин."i $g(^SpravUsl(61,54,2))="" s ^SpravUsl(61,54,2)="НВЛ0010мин."i $g(^SpravUsl(61,54,3))="" s ^SpravUsl(61,54,3)="NoНО0000мин."i $g(^SpravUsl(61,54,4))="" s ^SpravUsl(61,54,4)="ПВ0000мин."i $g(^SpravUsl(61,54,5))="" s ^SpravUsl(61,54,5)="ПС0000мин."i $g(^SpravUsl(61,54,6))="" s ^SpravUsl(61,54,6)="ТИ0000мин."i $g(^SpravUsl(61,54,7))="" s ^SpravUsl(61,54,7)="СО0000мин."i $g(^SpravUsl(61,54,8))="" s ^SpravUsl(61,54,8)="РВ0000мин."i $g(^SpravUsl(61,54,9))="" s ^SpravUsl(61,54,9)="ВК0000мин."i $g(^SpravUsl(61,54,10))="" s ^SpravUsl(61,54,10)="ОДС0000мин."i $g(^SpravUsl(61,54,11))="" s ^SpravUsl(61,54,11)="ЗНЯ666010мин."i $g(^SpravUsl(61,55))="" s ^SpravUsl(61,55)="СНЯТИЕ С 5-ТИ ТЕЛЕФОНОВ0000мин."i $g(^SpravUsl(61,55,1))="" s ^SpravUsl(61,55,1)="ОМС0010мин."i $g(^SpravUsl(61,55,2))="" s ^SpravUsl(61,55,2)="НВЛ0010мин."i $g(^SpravUsl(61,55,3))="" s ^SpravUsl(61,55,3)="NoНО0000мин."i $g(^SpravUsl(61,55,4))="" s ^SpravUsl(61,55,4)="ПВ0000мин."i $g(^SpravUsl(61,55,5))="" s ^SpravUsl(61,55,5)="ПС0000мин."i $g(^SpravUsl(61,55,6))="" s ^SpravUsl(61,55,6)="ТИ0000мин."i $g(^SpravUsl(61,55,7))="" s ^SpravUsl(61,55,7)="СО0000мин."i $g(^SpravUsl(61,55,8))="" s ^SpravUsl(61,55,8)="РВ0000мин."i $g(^SpravUsl(61,55,9))="" s ^SpravUsl(61,55,9)="ВК0000мин."i $g(^SpravUsl(61,55,10))="" s ^SpravUsl(61,55,10)="ОДС0000мин."i $g(^SpravUsl(61,55,11))="" s ^SpravUsl(61,55,11)="ЗНЯ666010мин."i $g(^SpravUsl(62))="" s ^SpravUsl(62)="ЗАКАЗ ПО УВЕДОМЛЕНИЮ0010мин."i $g(^SpravUsl(62,10))="" s ^SpravUsl(62,10)="ОБЫЧНЫЙ1110разы"i $g(^SpravUsl(62,11))="" s ^SpravUsl(62,11)="СРОЧНЫЙ1120разы"i $g(^SpravUsl(62,31))="" s ^SpravUsl(62,31)="ПРИГЛАШЕНИЕ0010мин."i $g(^SpravUsl(62,32))="" s ^SpravUsl(62,32)="СПРАВКА0010мин."i $g(^SpravUsl(62,50))="" s ^SpravUsl(62,50)="СНЯТИЕ ЗАКАЗА0000мин."i $g(^SpravUsl(62,50,1))="" s ^SpravUsl(62,50,1)="ОМС0020мин."i $g(^SpravUsl(62,50,2))="" s ^SpravUsl(62,50,2)="НВЛ0020мин."i $g(^SpravUsl(62,50,3))="" s ^SpravUsl(62,50,3)="NoНО0020мин."i $g(^SpravUsl(62,50,4))="" s ^SpravUsl(62,50,4)="ПВ0000мин."i $g(^SpravUsl(62,50,5))="" s ^SpravUsl(62,50,5)="ПС0000мин."i $g(^SpravUsl(62,50,6))="" s ^SpravUsl(62,50,6)="ТИ0000мин."i $g(^SpravUsl(62,50,7))="" s ^SpravUsl(62,50,7)="СО0000мин."i $g(^SpravUsl(62,50,8))="" s ^SpravUsl(62,50,8)="РВ0000мин."i $g(^SpravUsl(62,50,9))="" s ^SpravUsl(62,50,9)="ВК0000мин."i $g(^SpravUsl(62,50,10))="" s ^SpravUsl(62,50,10)="ОДС0020мин."i $g(^SpravUsl(62,50,11))="" s ^SpravUsl(62,50,11)="ЗНЯ666020мин."i $g(^SpravUsl(62,51))="" s ^SpravUsl(62,51)="СНЯТИЕ С ПРИГЛАШЕНИЯ0000мин."i $g(^SpravUsl(62,51,1))="" s ^SpravUsl(62,51,1)="ОМС0010мин."i $g(^SpravUsl(62,51,2))="" s ^SpravUsl(62,51,2)="НВЛ0000мин."i $g(^SpravUsl(62,51,3))="" s ^SpravUsl(62,51,3)="NoНО0000мин."i $g(^SpravUsl(62,51,4))="" s ^SpravUsl(62,51,4)="ПВ0000мин."i $g(^SpravUsl(62,51,5))="" s ^SpravUsl(62,51,5)="ПС0000мин."i $g(^SpravUsl(62,51,6))="" s ^SpravUsl(62,51,6)="ТИ0000мин."i $g(^SpravUsl(62,51,7))="" s ^SpravUsl(62,51,7)="СО0000мин."i $g(^SpravUsl(62,51,8))="" s ^SpravUsl(62,51,8)="РВ0000мин."i $g(^SpravUsl(62,51,9))="" s ^SpravUsl(62,51,9)="ВК0000мин."i $g(^SpravUsl(62,51,10))="" s ^SpravUsl(62,51,10)="ОДС0000мин."i $g(^SpravUsl(62,51,11))="" s ^SpravUsl(62,51,11)="ЗНЯ666010мин." qПРИЛОЖЕНИЕ 5
217. Автоматизированные банки данных
Другое Компьютеры, программирование
218. Автоматизированные информационные системы
Другое Компьютеры, программирование
- анализ деятельности предприятия на основе данных и информации, поступающей из систем класса B;
- планирование деятельности предприятия;
- регулирование глобальных параметров работы предприятия;
- планирование и распределение ресурсов предприятия;
- подготовку производственных заданий и контроль их исполнения.
- наличие взаимодействия с управляющим субъектом (персоналом), при выполнении стоящих перед ними задач;
- интерактивность обработки информации;
- повышенной длительностью обработки данных, колеблющейся от нескольких минут до несколько часов или суток;
- длительным периодом принятия управляющего решения;
- наличием существенных временной и параметрической зависимостей (корреляций) между обрабатываемыми данными;
- система оказывает влияние на деятельность предприятия в целом;
- система оказывает влияние на значительный период работы предприятия (от полугода до нескольких лет);
- наличием непосредственного сопряжения с системами класса B.
219. Автоматизированные обучающие системы
Другое Компьютеры, программирование

В обучающих играх можно отметить целый ряд психолого-педагогических достоинств: во-первых, активность их участников - обучаемые увлеченные игрой, не замечают, что учатся, они познают, запоминают новое, ориентируются в необычных ситуациях, пополняют запас представлений и понятий, развивают фантазию, приобретают умения и навыки и применяют их в процессе игры; во-вторых, динамичность, которая выражает влияние фактора времени на игровую деятельность человека - время приобретает такое же первостепенное значение, как и в жизни; в-третьих, занимательность , которая отражает увлекательное проявление человеческой деятельности и потому оказывает сильное эмоциональное воздействие на человека, побуждая его к участию в игре или заинтересованному наблюдению за ее ходом и усиливая тем самым познавательные интерес и активность; в-четвертых, своеобразие субъект-объектных отношений, когда обучаемы! выступает и как объект педагогического воздействия, и как субъект игровой деятельности, полностью вовлеченный в ее процесс. Основным элементом обучающей игры является выполнение ею дидактической задачи. Она определяется общей целью обучения и тесно связана с целью и задачами занятий. Все остальные элементы (содержание, правила, игровые действия) подчинены дидактической задаче и обеспечивают ее реализацию».
220. Автоматизированные рабочие места и их оснащение информационными средствами
Другое Компьютеры, программирование

Внешне противоположный подход “человек в мире объектов” - отсутствуют команды и человек в процессе работы “движется” по своему объекту с помощью клавиш управления курсором, специальных указывающих устройств (мышь, перо), функциональных комбинаций клавиш. Диалог в форме меню “меню” представляет пользователю множества альтернативных действий, из которых он выбирает нужные. В настоящее время наиболее широкое распространение получил пользовательский интерфейс, сочетающий в себе свойства двух последних. В нем все рабочее пространство экрана делится на три части (объекта). Первая (обычно располагающаяся вверху) называется строкой или полосой меню. С ее помощью пользователь может задействовать различные меню, составляющие “скелет” программы, с их помощью производится доступ к другим объектам (в т.ч. управляющим). Вторая часть (обычно располагается внизу или в небольших программах может вообще отсутствовать) называется строкой состояния. С ее помощью могут быстро вызываться наиболее часто используемые объекты или же отображаться какая-либо текущая информация. Третья часть называется рабочей поверхностью (поверхностью стола) - самая большая. На ней отображаются все те объекты, которые вызываются из меню или строки состояния. Такая форма организации диалога человека и машины наиболее удобна (по крайней мере на сегодняшний день ничего лучшего не придумано) и все современные программы в той или иной мере используют ее. В любом случае она должна соответствовать стандарту СUA (Common User Access) фирмы IBM.

Blog

Информация по предмету Компьютеры, программирование