Имя: Пароль:
1C
 
Помогите с элементом тч (1с 8.2 оф)
0 Nemirov
 
18.05.20
15:11
ИмяФайлаОстатков = "OstIs.DBF";
    ПолноеИмяФайлаОстатков= КаталогВременныхФайлов();
    ПолноеИмяФайла = СокрЛП(ПолноеИмяФайлаОстатков+ИмяФайлаОстатков);
    XBase = Новый XBase;     //создаем новый объект
    XBase.Кодировка = КодировкаXBase.OEM;
    XBase.Поля.Добавить("KONTR","S",80,);
    XBase.Поля.Добавить("NOMENKL","S",100,);
    XBase.Поля.Добавить("REMAINS","S",60,);
    XBase.Поля.Добавить("DATE","D",25);
    XBase.СоздатьФайл(ПолноеИмяФайла);
    XBase.ЗакрытьФайл();
    обФТП = Обработки.ftp.Создать();
    обФТП.Конструктор(Константы.FTPКодыПоставщиковАдрес.Получить(),Константы.FTPКодыПоставщиковПорт.Получить(),Константы.FTPКодыПоставщиковЛогин.Получить(),Константы.FTPКодыПоставщиковПароль.Получить());
    обФТП.Прочитать("OstNa.DBF",ПолноеИмяФайла );
    обФТП.Деструктор();
        
    XBase.ОткрытьФайл(ПолноеИмяФайла,,Истина);
    XBase.Первая();
    
    МассивDBF = Новый Массив;
    Пока НЕ XBase.ВКонце() Цикл    
    НомСсылкаXBase = Справочники.Номенклатура.НайтиПоНаименованию(XBase.NOMENKL, Истина);
    

//Вот тут загвоздка как сравнить НомСсылкаXbase с "элемент.Номенклатура" табличной части "Состав" (как вообще обходить все эти не объектные типы или сравнивать) ?

    Если НЕ НомСсылкаXBase = "тут сравнение " Тогда
       XBase.Следующая();
        Продолжить;
        Иначе
    СтрокаТабличнойЧастиСостав.Остаток = XBase.Remains;
    КонецЕсли;
    XBase.Следующая();
    КонецЦикла;
2 + 2 = 3.9999999999999999999999999999999...