Загрузка из Медка документов

[OlegBom]

По скрипту проверили, запись файл и чтение работают.
Сохраните, пожалуйста, текст программы в файл с расширением vbs и выполните еще раз.

Не могу, я работаю не с vbs.

Вот простой текст

Local oMedokApp,cSql,DocCode,oTablDocs,lT
oMedokApp := CreateObject("MEDOC.ZApplication")
cSql:="CharCode = 'J1201004' AND PerDate = '14.01.2014' and SENDSTT = 14 "
DocCode := 0
oTablDocs:= oMedokApp:DocumentsDataSet(cSql) //массив документов . Обьект создается. НО РАБОТАТЬ С НИМ НЕМОГУ.
oTablDocs:First() ---------------------------------У меня подозрение, что и это не работает!!!
IF .not. oTablDocs:Eof() --------------------------------- вот здесь ОШИБКА. НЕ ХОЧЕТ ВЫПОЛНЯТЬ ЭТОГО МЕТОДА.
DocCode := oTablDocs:getProperty("FldVal","Code")
......
ENDIF
return

Какие свойства доступны для этого обьекта DocumentsDataSet. Есть описание?
Я так понимаю, обьект DocumentsDataSet содержит курсор( таблицу) , а также имеет какие-то свойства и методы для работы с таблицей.

[aleksiychuk]

Попробуйте воспользоватся инструкцией, которая во вложении

[OlegBom]

Добрый день!
СПасибо! Такая инструкция у меня есть.

А может такую задачу решали в 1С.
Напомню, постановку.
Необходимо загрузить в учетную систему из Медка налоговые накладные, которые попали в Медок от других контрагентов(они нам их прислали по системе ЕДО).

Если такая задача была решена в 1С, выложите плиз исходный код, если можете. Или расскажите как?

[aleksiychuk]

В 1С документы совсем по-другому попадают из медка.
Исходных кодов таких нет.

Попробуйте для проверки все-таки использовать скрипт vbs,что писали выше

[OlegBom]

Я так понимаю, в 1С попадают из Медка те документы, которые сама 1С туда и отослала(указавши свой ID документа).
А 1С точно так же не может получить документы(в частности налоговые накладные), которые присылают контрагенты.

>Попробуйте для проверки все-таки использовать скрипт vbs,что писали выше.
Я уже перепробовал все что мог. Может в личку мне дадите телефон вашего программиста.

[Белокопытов Геннадий]

OlegBom
Вышлите пожалуйста в ЛС Ваш контактный номер телефона

[aleksiychuk]

"Bool Eof Признак конца таблицы является свойством, а не методом"

[OlegBom]

Всем огромное спасибо!

Получилось.

[kittenua]

Кто подскажет, как отобрать только входящие первичные документы в определенном диапазоне дат?
sDocs = App.DocumentsDataSet( "CharCode = 'J1201005' AND PerDate >= '01.10.2014' AND PerDate <= '10.10.2014' and SENDSTT = 14")
выдает документы за весь 10 месяц, а
sDocs = App.DocumentsDataSet( "CharCode = 'J1201005' AND PerDate >= '10.10.2014' AND PerDate <= '10.10.2014' and SENDSTT = 14")
вообще не выдает документов.
Есть ли возможность отбирать только налоговые или только акты или только счета?
Где можно посмотреть описание полей, по которым возможна выборка документов таким способом?

[OlegBom]

Я подозреваю , на этот вопрос даже разработчики НЕ ЗНАЮТ ОТВЕТА!!!

[Белокопытов Геннадий]

OlegBom
Здравствуйте!
Специалист направления технологии СОМ ответит на все вопросы заданные в теме, после выполнения основных рабочих задач.
Спасибо за понимание!

[vademchuk]

Кто подскажет, как отобрать только входящие первичные документы в определенном диапазоне дат?

PerDate - любая дата в периоде месяц, всегда будет возвращать документы за ВЕСЬ месяц независимо от <=>. Я еще с Родиным бодался на эту тему - сказали нельзя иначе. Есть еще параметр PERTYPE, но он переключает месяц-квартал-год

Есть ли возможность отбирать только налоговые или только акты или только счета?

Тип нужного документа определяется его шаблоном , т.е.
CharCode = 'J1201004' OR CharCode = 'J1201005' OR CharCode = 'J1201206' - это НН,
CharCode = 'J1201204' OR CharCode = 'J1201205' OR CharCode = 'J1201206' - это Додатки.

Где можно посмотреть описание полей, по которым возможна выборка документов таким способом?

Список с описанием было бы хорошо увидеть.... поддерживаю... вообще описание СОМ сделано с восприятием, что все интеграторы - мазохисты. Большинство задач удается решать "перебором" и "тыком"

[kote]

С помощью функции DocumentsDataSet выбрал документы. А как получить доступ к реквизитам самого документа? DataSets вываливается с ошибкой. Может кто-то уже поборол эту проблему.

[NeoN]

Код: Виділити все

DataSet = MeDoc.DocumentsDataSet(...);
doc   = MeDoc.OpenDocumentByCode(DataSet .Fields.Item("CODE").Value);
main = doc.DataSets("MAIN");
Firm = main.Item("Firm_Name").Value

[aleksiychuk]

Здравствуйте, если все использовать, как указано выше - ошибки не будет
DataSet = MeDoc.DocumentsDataSet(...);
doc = MeDoc.OpenDocumentByCode(DataSet .Fields.Item("CODE").Value);
main = doc.DataSets("MAIN");
Firm = main.Item("Firm_Name").Value

[Zvezda]

Здравствуйте, если все использовать, как указано выше - ошибки не будет
DataSet = MeDoc.DocumentsDataSet(...);
doc = MeDoc.OpenDocumentByCode(DataSet .Fields.Item("CODE").Value);
main = doc.DataSets("MAIN");
Firm = main.Item("Firm_Name").Value

В DataSet попадают абсолютно все документы, в том числе находящиеся в Архиве и Корзине.
Подскажите каким образом можно сузить область поиска: не отбирать документы из Архива и Корзины.
Если, к огромному сожалению, это невозможно (с точки зрения производительности это огромный минус), то подскажите, как можно проверить где находится текущий документ или как проверить не находится ли он в Корзине или Архиве.

[vademchuk]

Здравствуйте, если все использовать, как указано выше - ошибки не будет
DataSet = MeDoc.DocumentsDataSet(...);
doc = MeDoc.OpenDocumentByCode(DataSet .Fields.Item("CODE").Value);
main = doc.DataSets("MAIN");
Firm = main.Item("Firm_Name").Value

В DataSet попадают абсолютно все документы, в том числе находящиеся в Архиве и Корзине.
Подскажите каким образом можно сузить область поиска: не отбирать документы из Архива и Корзины.
Если, к огромному сожалению, это невозможно (с точки зрения производительности это огромный минус), то подскажите, как можно проверить где находится текущий документ или как проверить не находится ли он в Корзине или Архиве.

Вариант:
// пропускаем исходящие
Если main .FldVal("NAKL_TYPE") = 1 Тогда
DataSet .Next();
Продолжить;
КонецЕсли;

поле "удален" аналогично -main .FldVal("DELETED")

[Zvezda]

Как отличить входящие от исходящих и отсеять удаленные я знаю.
Как определить, что документ находится в Корзине или Архиве или как вообще не отбирать документы из Архива и Корзины ?

Возможно, Вы имели ввиду, что документ находящийся в Корзине должен иметь иметь статус DELETED <> 0, то это не так.

[Zvezda]

Господа, просьба все таки ответить на мой вопрос хотя бы тут.
А то в ответ на мое обращение в техподдержку с этим вопросом в четверг 4 дня назад меня отправили по адресу [email protected].
А с указанного адреса с пятницы нет ответа и что-то не уверен, что дождусь его.
Вопрос то не сложный.

[Zvezda]

Пока техподдержка 6-й день собирается с мыслями задам еще один убойный вопрос: как можно зная DocID узнать ExDocID ?
Поверьте, не праздного любопытства ради спрашиваю.