Форумы Интермех - Сдача документов в архив по Workflow/ 1278 page 0

Форумы Интермех / Search, ImProject / Сдача документов в архив по Workflow/

Автор	Сообщение
enaumov Участник	Дата: 24 Окт 2012 12:58:00 Поскольку наша работа в Techcard-е ведется без АРМ-ов, регулярно возникает ситуация: технолог отправил в Search техпроцесс на согласование/нормирование/введение оснастки и забыл сдать его архив. В лучшем случае он сдает его "по звонку", в худшем - это приходится делать администраторам. Not good. Возникла мысль это дело упорядочить и автоматизировать. Мысль первая - создание промежуточного архива: технолог запускает процесс, система принудительно сдает документы в этот архив и запрещает технологу работать с техпроцессом до тех пор, пока в БМН/бюро оснащения его не "обработают". Но это равно что из пушки по воробьям. Мысль вторая - в маршруте перед каждым этапом, на котором техпроцесс может быть взят на редактирование, установить скрипт, который будет сдавать документы (ИИ+ТП) с рабочего стола технолога, а после него - проделывать аналогичную операцию, но уже у нормировщика/оснащенца. Как реализовать - честное слово, не знаю. Пока мыслей больше нет. Буду признателен за любую помощь.
freestyler Участник ОАО "Новая ЭРА", СПб	Дата: 24 Окт 2012 13:10:46 ° Поправил: freestyler Цитата: enaumov Мысль вторая - в маршруте перед каждым этапом, на котором техпроцесс может быть взят на редактирование, установить скрипт, который будет сдавать документы (ИИ+ТП) с рабочего стола технолога, а после него - проделывать аналогичную операцию, но уже у нормировщика/оснащенца. Как реализовать - честное слово, не знаю. С документами примерно такой скрипт работает, как поведет себя на извещениях - не знаю if sys_execside.asstring="SERVER" Then Set s4Ap = CreateObject("S4.TS4App") s4Ap.Login else s4Ap = S4App end if For i = 0 to Activity.Attachments.count-1 Set Att = Activity.Attachments.Items(i) if Att.AType=0 or Att.AType=1 then if clng(Att.DocType)=1000000 then 'Это извещение S4ap.OpenDocument(Att.DocID) S4ap.CheckIn S4ap.CloseDocument end if end if next Добавлено: а просто поставить действие "Возврат в архив" нельзя?
enaumov Участник	Дата: 24 Окт 2012 13:23:15 Попробовал Ваш скрипт - видимо, где-то я ошибаюсь, но эффекта ровным счетом никакого - документы пролетают к исполнителю, оставаясь на рабочем столе у сис_стартера. Пробовал устанавливать выполнение и на сервере, и на пользователе - толку никакого. По поводу "Возврата в архив" - я правильно понимаю, вы предлагаете заносить возвращать документы в те же архивы, где они зарегистрированны? Вариант, наверное...
Xabalov Участник ОАО "ЗМЗ" г.Заволжье Нижегородская обл.	Дата: 24 Окт 2012 15:03:09 Вы хотите сдать в архив ИИ+ТП? А как же вы их потом откроете? Если ТП создан по ИИ то согласование м.б. только с раб стола. Блокировать редактирование пока кто-то согласовывает можно с помощью сист.переменной SYS_BLOCKWORKCOPY. Значения от 0 до 3-х У нас так и сделано.
enaumov Участник	Дата: 24 Окт 2012 15:23:17 Здравствуйте, Андрей Михайлович. Вот именно, что приходится изворачиваться и разрешать то, что в принципе разрешать нельзя - открывать доступ на редактирование извещений и разрешать отдельным группам пользователей брать их на изменение, а за извещением, собственно, тянется техпроцесс, который открывается из извещения и редактируется... Такие танцы с бубном. За переменную спасибо, будет пробовать и пытаться. Кстати, вдогонку еще одна мысль - при создании по ИИ новой версии техпроцесса все имеющиеся подписи "транслируются" в рабочую копию этой самой новой версии документа. Наверняка это сделано для удобства, ибо пересогласовывать по всем инстанциям документ не всегда удобно (не зря же они по умолчанию неактуальны). Но например у нас все подписи из карточки документа попадают на бланки, без учета актуальности. Получается мы опять между сциллой и харибдой: с одной стороны контроль актуальности подписей, с другой - наличие этих самых подписей без самого факта согласования техпроцесса. Как разруливаете подобные ситуации, коллеги?
Xabalov Участник ОАО "ЗМЗ" г.Заволжье Нижегородская обл.	Дата: 24 Окт 2012 15:41:51 У нас Search v.10 Это у нас сдать ИИ нельзя. при создании по ИИ новой версии техпроцесса все имеющиеся подписи "транслируются" в рабочую копию [i][/i] В 10-й этого тоже не было. Наверняка настраивается это (транслировать ли их). А актуальность каждой подписи можно проверить скриптом.
enaumov Участник	Дата: 24 Окт 2012 15:46:18 У нас Search 11 sp1
freestyler Участник ОАО "Новая ЭРА", СПб	Дата: 24 Окт 2012 16:00:25 Цитата: enaumov Попробовал Ваш скрипт - видимо, где-то я ошибаюсь, но эффекта ровным счетом никакого - документы пролетают к исполнителю, оставаясь на рабочем столе у сис_стартера. Скрипт обрабатывает только извещения! Чтобы обрабатывал все документы, надо убрать if clng(Att.DocType)=1000000 then ... end if Ну и я его не тестировал, где-то вполне может быть опечатка Цитата: enaumov По поводу "Возврата в архив" - я правильно понимаю, вы предлагаете заносить возвращать документы в те же архивы, где они зарегистрированны? Да в общем-то в любой, в действии "возврат в архив" это можно настроить. Также можно сразу после старта поставить скрипт, проверяющий возвращены ли в архив документы, и если нет то просто возвращающий starter'у. Все осложняется извещениями, без них было бы легко и просто
Олег Участник Intermech, Минск	Дата: 26 Окт 2012 10:53:18 ° Поправил: Олег По поводу копирования подписей - читаем руководство администратора или admin.chm: Приложение 1. Параметры настройки Search4.ini - Подписи и ЭЦП [COMMON] CopySignsForNewDocVersion Если включено, то при создании новой версии документа (по извещению или без него), в нее будут скопированы все подписи из версии, на основе которой она создается. Если выключить, то у новой версии не будет никаких подписей. По умолчанию: CopySignsForNewDocVersion=1
enaumov Участник	Дата: 2 Ноя 2012 08:41:08 Цитата: Олег Приложение 1. Параметры настройки Search4.ini - Подписи и ЭЦП Руководство администратора. admin.pdf. Приложение 1. Типы параметров в архивах Search В любом случае, спасибо. Нашел и разобрался.