Имя: Пароль:
1C
1С v8
Непонятная проблема с выгрузкой в DBF
0 Босечка
 
28.04.18
14:25
Значение записывается в поле, хотя я это не делаю:

Запись идет в поле FactAddr, а в поле Address записи информации нет. Непонятно...

    НоваяТаблица = Новый XBase;
    НоваяТаблица.Кодировка = КодировкаXBase.OEM;
    // Описываем колонки таблицы.
    НоваяТаблица.Поля.Добавить("DATA","D",,);
    НоваяТаблица.Поля.Добавить("NumDoc","S",20,);
    НоваяТаблица.Поля.Добавить("ID_SY","S",20,);
    НоваяТаблица.Поля.Добавить("ID","S",20,);
    НоваяТаблица.Поля.Добавить("INN","S",12,);
    НоваяТаблица.Поля.Добавить("KPP","S",12,);
    НоваяТаблица.Поля.Добавить("Name","S",150,);
    НоваяТаблица.Поля.Добавить("FullName","S",500,);
    НоваяТаблица.Поля.Добавить("Address","S",500,);
    НоваяТаблица.Поля.Добавить("FactAddr","S",500,);
    НоваяТаблица.Поля.Добавить("Phone","S",20,);    
    НоваяТаблица.Поля.Добавить("TT_ID_SY","S",20,);    
    НоваяТаблица.Поля.Добавить("TT_ID","S",20,);    
    НоваяТаблица.Поля.Добавить("TT_Name","S",150,);    
    НоваяТаблица.Поля.Добавить("TT_Address","S",500,);    
    НоваяТаблица.Поля.Добавить("TT_Kind","S",10,);    
    НоваяТаблица.Поля.Добавить("SKU_ID_SY","S",20,); //- CRM КОД СИНЕРГИИ    
    НоваяТаблица.Поля.Добавить("SKU_ID","S",20,);    
    НоваяТаблица.Поля.Добавить("SKU_Name","S",500,);    
    НоваяТаблица.Поля.Добавить("Cap","N",5,3);    
    НоваяТаблица.Поля.Добавить("IsReturn","N",1,0);    
    НоваяТаблица.Поля.Добавить("Kol","N",20,0);        
    НоваяТаблица.Поля.Добавить("Total","N",20,2);        
    НоваяТаблица.Поля.Добавить("ETK","N",1,0);        
    НоваяТаблица.Поля.Добавить("TICKER","S",20,0);        
    НоваяТаблица.Поля.Добавить("ID_TRACK","S",30,0);        
    НоваяТаблица.Поля.Добавить("TRACK","S",150,0);        
    НоваяТаблица.Поля.Добавить("AGENT","S",50,0);        
    НоваяТаблица.СоздатьФайл(
        СтрФайл1, // путь к базе
        // путь к индексу
    );

    НоваяТаблица.ЗакрытьФайл();
    Сообщить("Новый файл создан в '" + СтрФайл1 + "'.");
    Таблица = Новый XBase;
    Таблица.Кодировка = КодировкаXBase.OEM;
    Таблица.ОткрытьФайл(СтрФайл1,,Ложь);
    АдресДок = ЗагрузитьФайлДокументовНаСервере();
    Т = ПолучитьИзВременногоХранилища(АдресДок);
    Для каждого стр из Т цикл
    Таблица.Добавить();    
    Таблица.DATA=стр.Дата;
    Таблица.NumDoc=стр.Номер;
    Таблица.ID_SY=стр.ПартнерРодительКодДляПоиска;
    Таблица.ID=стр.ПартнерРодительКодДляПоиска;;
    Таблица.INN=стр.КонтрагентИНН;
    Таблица.KPP=стр.КонтрагентKPP;
    Таблица.Name=СокрЛП(стр.ПартнерРодительНаименование);
    Таблица.FullName=СокрЛП(стр.ПартнерРодительНаименованиеПолное);
    Таблица.УстановитьЗначениеПоля("Address",СокрЛП(стр.ЮрАдрес));
    //Таблица.УстановитьЗначениеПоля("FactAddr",СокрЛП(стр.ЮрАдрес));
    Таблица.Phone="";    
    Таблица.TT_ID_SY=стр.ПартнерКод;    
    Таблица.TT_ID=стр.ПартнерКод;    
    Таблица.TT_Name=стр.ПартнерНаименование;    
    Таблица.TT_Address=СокрЛП(стр.АдресДоставки);    
    Таблица.TT_Kind="Розница";    // тип торговой точки Розница, Хорека,Опт
    Таблица.УстановитьЗначениеПоля("SKU_ID_SY",стр.НоменклатураКодДляПоиска); //- CRM КОД СИНЕРГИИ    
    Таблица.SKU_ID=стр.НоменклатураКодДляПоиска;    
    Таблица.SKU_Name=стр.НоменклатураНаименование;      ;    
    Кап=стр.НоменклатураалкЕмкость*стр.Количество;
    Таблица.Cap=Кап;    
    Таблица.IsReturn=0;
    Таблица.Kol=стр.Количество;        
    Таблица.Total=стр.Сумма;        
    Таблица.ETK=1;        
    Таблица.TICKER="F39";
    Таблица.AGENT=стр.МенеджерНаименование;        
    Таблица.Записать();    
Конеццикла;
Таблица.ЗакрытьФайл();
1 Сияющий в темноте
 
28.04.18
17:21
Я вижу запись в Adres и TtAdres,а фактический закавычен,что тут непонятного?