Форумы Интермех - Обработка ИИ через API 1332 page 0

Форумы Интермех / Search, ImProject / Обработка ИИ через API

Автор	Сообщение
SnuppZone Участник Петрозаводск МАШ	Дата: 12 Апр 2013 11:00:29 Доброго времени суток! Тестирую функции по обработки извещение об изменениях, нужно вытащить обозначения документы включенного в ии и его версию, использую функции s4.GetChangedDocDesignation и s4.GetChangedDocVerID, не могу разобрать что же оно мне возвращает. Открываю ИИ для доступа к функциям s4.OpenECO(id), узнаю количество документов включенных в ИИ s4.GetNumberOfEcoChanges, далее циклом получаю обозначение и версию. В итоге получаю данные в виде: 0) : 0 1) АМ101.07.01.019 М1 ТП : 1 2) АМ101.07.01.021 М1 ТП : 1 3) АМ101.07.01.055 М1 ТП, АМ101.07.01.204 М1 ТП, АМ101.07.01.040 М2 ТП, АМ101.07.01.090 М2 ТП, ... , АМ101.07.01.321 М1 ТП : 1 (строки я получаю temp:=temp+IntToStr(ecoi)+') '+s4.GetChangedDocDesignation+' : '+inttostr(s4.GetChangedDocVerID)+#13+#10; temp хранилище, ecoi порядковый номер) Обозначений ТП в строках по разному, где то одно, где то двадцать, вот и проблема как понять к какому конкретно ТП идет цифра версии
Katenok-13 Участник ОАО "Бийский котельный завод"	Дата: 12 Апр 2013 12:24:20 Я сама с извещениями разобралась лишь несколько месяцев назад. Я получаю версии объектов (для работы мне нужны объекты), для техпроцессов по версии объекта получаю версии документа: vart_id_list.Data := s4app.GetArticlesByEco(doc_id); {Список объектов по ИИ} vart_id_list.First; while not vart_id_list.Eof do begin art_id := vart_id_list.FieldValues['art_id']; ver_id := vart_id_list.FieldValues['art_ver_id']; vart_id := vart_id_list.FieldValues['vart_id']; s4app.OpenArticle(art_id); if s4app.GetArticleKind = 1 then {Документы} begin if ((s4app.GetArticleTipDoc = 'ТП') or (s4app.GetArticleTipDoc = 'ТТП')) then begin s4app.GetDocVerID_byArtIDArtVerID(art_id, ver_id, tp_id, tp_ver); ...
LLirik Участник НПО "Автоматика"	Дата: 12 Апр 2013 12:37:55 Приятной работы Состав зарегистрированных документов включенных в ИИ достаем напрямую читая RC SELECT DOC_ID AS Идентификатор документа, VER_ID AS Версия документа FROM RC WHERE REVDOC_ID=Идентификатор ИИ AND REVDOC_ID<>DOC_ID
SnuppZone Участник Петрозаводск МАШ	Дата: 12 Апр 2013 14:04:01 Спасибо за ответы.
noku4 Участник Спб, "НИИЭФА-ЭНЕРГО"	Дата: 12 Апр 2013 14:39:43 var mas_sostav_ii = new Array(); //массив обозначений документов, включенных в ИИ var Att=Activity.Attachments.Items(i); DocID1 = Att.DocID; SApp.OpenECO(DocID1); var kol=SApp.GetNumberOfEcoChanges(); for (var ii=0;ii<kol;ii++) //Формирование массива обозначений документов, включенных в ИИ { SApp.OpenEcoChange(ii); desi=SApp.GetChangedDocDesignation(); var mas_hlp= new Array(); //массив обозначений документов, включенных в один раздел ИИ mas_hlp=desi.split(', '); mas_sostav_ii=mas_sostav_ii.concat(mas_hlp); }