v8: Глюк по Поиску в Таблице Значений?!

1С v8

16.11.11

✎

22:08

Есть ТаблЗначений(ТабМосква),и есть ТаблЗначений(ТабЗагрузка)
В ТабМосква Номенклатура"Репетитор по химии"=38,после Поиска в ТабЗагрузка "Репетитор по химии" как то становится = 7
Отладчик ТабМосква:
http://clip2net.com/s/1k7R9
Отладчик ТабЗагрузка :
http://clip2net.com/s/1k7Qf

Для Каждого СтрКонт Из ТабМосква Цикл
Поиск = ТабЗагрузка.Найти(СтрКонт.Код,"Код");
Если Поиск = Неопределено Тогда Продолжить;КонецЕсли;
//Для Каждого СтрТаб Из ТабЗагрузка Цикл
// Если СтрКонт.Код <> СтрТаб.Код Тогда Продолжить;КонецЕсли;
НайденСтр = Найденные.Добавить();
НайденСтр.Номенклатура = СтрКонт.Номенклатура;
НайденСтр.Автор = "";//СтрТаб.Автор;
НайденСтр.Год = "";//СтрТаб.Год;
НайденСтр.Цена = "";//СтрТаб.Цена;
НайденСтр.Ст = "";//СтрТаб.Ст;
НайденСтр.Переп = "";//СтрТаб.Переп;
НайденСтр.Гриф = "";//СтрТаб.Гриф;
НайденСтр.Дата = "";//СтрТаб.Дата;
НайденСтр.ISBN = "";//СтрТаб.ISBN;
НайденСтр.Код = "";//СтрТаб.Код;
НайденСтр.Раздел = "";//СтрТаб.Раздел;
НайденСтр.допечатка = "";//СтрТаб.допечатка;
НайденСтр.Формат = "";//СтрТаб.Формат;
НайденСтр.Бумага = "";//СтрТаб.Бумага;
НайденСтр.EAN = "";//СтрТаб.EAN;
НайденСтр.ТорМосква = СтрКонт.Номер;
НайденСтр.Продажи = СтрКонт.КоличествоПродаж;
// Найденные.Свернуть("Номенклатура,Автор,Год,Цена,Ст,Переп,Гриф,Дата,ISBN,Код,Раздел,допечатка,Формат,Бумага,EAN,ТорМосква","Продажи");
// КонецЦикла;
КонецЦикла;

1 Grusswelle

16.11.11

✎

22:10

всё правильно

2 Popkorm

16.11.11

✎

22:11

(1)а что именно?!Где касяк?

3 Popkorm

16.11.11

✎

22:15

(1)Что именно правильно?

4 ll13

16.11.11

✎

22:26

А что неправильно то ?

5 ОбычныйЧеловек

16.11.11

✎

22:38

вот нравится мне подобный код, вроде и все правильно, но ощущение того, что смотришь на код ребенка не пропадает.
По вопросу - чего то ты не договариваешь, показывай весь код целиком.

6 DrShad

16.11.11

✎

23:05

(5) +100500
(0) весь код в топку

7 ll13

16.11.11

✎

23:11

автор перебирает строки одной ТЗ, ищет по коду во второй, а строку добавляет в третью(!), которую нам не показывает )
ловкость рук и никакого мошейничества )

8 Popkorm

17.11.11

✎

08:28

(7)

ТабДанных = Новый ТаблицаЗначений;
ТабДанных.Колонки.Добавить("Номенклатура");
ТабДанных.Колонки.Добавить("Автор");
ТабДанных.Колонки.Добавить("Год");
ТабДанных.Колонки.Добавить("Цена");
ТабДанных.Колонки.Добавить("Ст");
ТабДанных.Колонки.Добавить("Переп");
ТабДанных.Колонки.Добавить("Гриф");
ТабДанных.Колонки.Добавить("Дата");
ТабДанных.Колонки.Добавить("ISBN");
ТабДанных.Колонки.Добавить("Код");
ТабДанных.Колонки.Добавить("Раздел");
ТабДанных.Колонки.Добавить("допечатка");
ТабДанных.Колонки.Добавить("Формат");
ТабДанных.Колонки.Добавить("Бумага");
ТабДанных.Колонки.Добавить("EAN");
ТабДанных.Колонки.Добавить("ТорМосква");
ТабДанных.Колонки.Добавить("Продажи");

Найденные = Новый ТаблицаЗначений;
Найденные.Колонки.Добавить("Номенклатура");
Найденные.Колонки.Добавить("Автор");
Найденные.Колонки.Добавить("Год");
Найденные.Колонки.Добавить("Цена");
Найденные.Колонки.Добавить("Ст");
Найденные.Колонки.Добавить("Переп");
Найденные.Колонки.Добавить("Гриф");
Найденные.Колонки.Добавить("Дата");
Найденные.Колонки.Добавить("ISBN");
Найденные.Колонки.Добавить("Код");
Найденные.Колонки.Добавить("Раздел");
Найденные.Колонки.Добавить("допечатка");
Найденные.Колонки.Добавить("Формат");
Найденные.Колонки.Добавить("Бумага");
Найденные.Колонки.Добавить("EAN");
Найденные.Колонки.Добавить("ТорМосква");
Найденные.Колонки.Добавить("Продажи");

Для Каждого СтрКонт Из ТабМосква Цикл
Поиск = ТабЗагрузка.Найти(СтрКонт.Код,"Код");
Если Поиск = Неопределено Тогда Продолжить;КонецЕсли;
//Для Каждого СтрТаб Из ТабЗагрузка Цикл
// Если СтрКонт.Код <> СтрТаб.Код Тогда Продолжить;КонецЕсли;
НайденСтр = Найденные.Добавить();
НайденСтр.Номенклатура = СтрКонт.Номенклатура;
НайденСтр.Продажи = СтрКонт.КоличествоПродаж;
НайденСтр.ТорМосква = СтрКонт.Номер;
НайденСтр.Автор = "";//СтрТаб.Автор;
НайденСтр.Год = "";//СтрТаб.Год;
НайденСтр.Цена = "";//СтрТаб.Цена;
НайденСтр.Ст = "";//СтрТаб.Ст;
НайденСтр.Переп = "";//СтрТаб.Переп;
НайденСтр.Гриф = "";//СтрТаб.Гриф;
НайденСтр.Дата = "";//СтрТаб.Дата;
НайденСтр.ISBN = "";//СтрТаб.ISBN;
НайденСтр.Код = "";//СтрТаб.Код;
НайденСтр.Раздел = "";//СтрТаб.Раздел;
НайденСтр.допечатка = "";//СтрТаб.допечатка;
НайденСтр.Формат = "";//СтрТаб.Формат;
НайденСтр.Бумага = "";//СтрТаб.Бумага;
НайденСтр.EAN = "";//СтрТаб.EAN;
// Найденные.Свернуть("Номенклатура,Автор,Год,Цена,Ст,Переп,Гриф,Дата,ISBN,Код,Раздел,допечатка,Формат,Бумага,EAN,ТорМосква","Продажи");
// КонецЦикла;
КонецЦикла;
Для Каждого СтрНайденных Из Найденные Цикл
НСДанные = ТабДанных.Добавить();
ЗаполнитьЗначенияСвойств(НСДанные,СтрНайденных);
КонецЦикла;

9 Popkorm

17.11.11

✎

08:31

ТабМосква=

ТабМосква = Новый ТаблицаЗначений;
ТабМосква.Колонки.Добавить("Номенклатура");
ТабМосква.Колонки.Добавить("Контрагент");
ТабМосква.Колонки.Добавить("ISBN");
ТабМосква.Колонки.Добавить("EAN13");
ТабМосква.Колонки.Добавить("Цена");
ТабМосква.Колонки.Добавить("Код");
ТабМосква.Колонки.Добавить("Номер");
ТабМосква.Колонки.Добавить("КоличествоПродаж");

Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ РАЗРЕШЕННЫЕ
| Продажа1.Контрагент,
| Продажа1.Номенклатура,
| Продажа1.КоличествоПродаж КАК КоличествоПродаж,
| 0 КАК КоличествоПродаж2,
| 0 КАК КоличествоПродаж3,
| 0 КАК КоличествоПродаж4
|ПОМЕСТИТЬ ВТ
|ИЗ
| (ВЫБРАТЬ
| ДвиженияТовараУКонтрагентовОбороты.Контрагент КАК Контрагент,
| ДвиженияТовараУКонтрагентовОбороты.Номенклатура КАК Номенклатура,
| МАКСИМУМ(ЦеныНоменклатурыСрезПоследних.Цена) КАК Цена,
| СУММА(ДвиженияТовараУКонтрагентовОбороты.КоличествоОборот) КАК КоличествоПродаж,
| СУММА(ДвиженияТовараУКонтрагентовОбороты.КоличествоОборот * ЦеныНоменклатурыСрезПоследних.Цена) КАК СуммаПродаж
| ИЗ
| РегистрНакопления.ДвиженияТовараУКонтрагентов.Обороты(&ДатаНачало, &ДатаКонца, Запись, ) КАК ДвиженияТовараУКонтрагентовОбороты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
| ПО ДвиженияТовараУКонтрагентовОбороты.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
| И (ЦеныНоменклатурыСрезПоследних.ТипЦен = &ТипЦен)
| ГДЕ
| ДвиженияТовараУКонтрагентовОбороты.ВидДвиженияПриходРасход = &Расход
| И ДвиженияТовараУКонтрагентовОбороты.ВидОперацииСТоваром = &КупляПродажи
| И ДвиженияТовараУКонтрагентовОбороты.Контрагент = &Контрагент1
|
| СГРУППИРОВАТЬ ПО
| ДвиженияТовараУКонтрагентовОбороты.Номенклатура,
| ДвиженияТовараУКонтрагентовОбороты.Контрагент) КАК Продажа1
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| Продажа2.Контрагент,
| Продажа2.Номенклатура,
| Продажа2.КоличествоПродаж,
| 0,
| 0,
| 0
|ИЗ
| (ВЫБРАТЬ
| ДвиженияТовараУКонтрагентовОбороты.Контрагент КАК Контрагент,
| ДвиженияТовараУКонтрагентовОбороты.Номенклатура КАК Номенклатура,
| МАКСИМУМ(ЦеныНоменклатурыСрезПоследних.Цена) КАК Цена,
| СУММА(ДвиженияТовараУКонтрагентовОбороты.КоличествоОборот) КАК КоличествоПродаж,
| СУММА(ДвиженияТовараУКонтрагентовОбороты.КоличествоОборот * ЦеныНоменклатурыСрезПоследних.Цена) КАК СуммаПродаж
| ИЗ
| РегистрНакопления.ДвиженияТовараУКонтрагентов.Обороты(&ДатаНачало, &ДатаКонца, Запись, ) КАК ДвиженияТовараУКонтрагентовОбороты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
| ПО ДвиженияТовараУКонтрагентовОбороты.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
| И (ЦеныНоменклатурыСрезПоследних.ТипЦен = &ТипЦен)
| ГДЕ
| ДвиженияТовараУКонтрагентовОбороты.ВидДвиженияПриходРасход = &Расход
| И ДвиженияТовараУКонтрагентовОбороты.ВидОперацииСТоваром = &КупляПродажи
| И ДвиженияТовараУКонтрагентовОбороты.Контрагент = &Контрагент2
|
| СГРУППИРОВАТЬ ПО
| ДвиженияТовараУКонтрагентовОбороты.Номенклатура,
| ДвиженияТовараУКонтрагентовОбороты.Контрагент) КАК Продажа2
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| Продажа3.Контрагент,
| Продажа3.Номенклатура,
| Продажа3.КоличествоПродаж,
| 0,
| 0,
| 0
|ИЗ
| (ВЫБРАТЬ
| ДвиженияТовараУКонтрагентовОбороты.Контрагент КАК Контрагент,
| ДвиженияТовараУКонтрагентовОбороты.Номенклатура КАК Номенклатура,
| МАКСИМУМ(ЦеныНоменклатурыСрезПоследних.Цена) КАК Цена,
| СУММА(ДвиженияТовараУКонтрагентовОбороты.КоличествоОборот) КАК КоличествоПродаж,
| СУММА(ДвиженияТовараУКонтрагентовОбороты.КоличествоОборот * ЦеныНоменклатурыСрезПоследних.Цена) КАК СуммаПродаж
| ИЗ
| РегистрНакопления.ДвиженияТовараУКонтрагентов.Обороты(&ДатаНачало, &ДатаКонца, Запись, ) КАК ДвиженияТовараУКонтрагентовОбороты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
| ПО ДвиженияТовараУКонтрагентовОбороты.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
| И (ЦеныНоменклатурыСрезПоследних.ТипЦен = &ТипЦен)
| ГДЕ
| ДвиженияТовараУКонтрагентовОбороты.ВидДвиженияПриходРасход = &Расход
| И ДвиженияТовараУКонтрагентовОбороты.ВидОперацииСТоваром = &КупляПродажи
| И ДвиженияТовараУКонтрагентовОбороты.Контрагент = &Контрагент3
|
| СГРУППИРОВАТЬ ПО
| ДвиженияТовараУКонтрагентовОбороты.Номенклатура,
| ДвиженияТовараУКонтрагентовОбороты.Контрагент) КАК Продажа3
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| Продажа4.Контрагент,
| Продажа4.Номенклатура,
| Продажа4.КоличествоПродаж,
| 0,
| 0,
| 0
|ИЗ
| (ВЫБРАТЬ
| ДвиженияТовараУКонтрагентовОбороты.Контрагент КАК Контрагент,
| ДвиженияТовараУКонтрагентовОбороты.Номенклатура КАК Номенклатура,
| МАКСИМУМ(ЦеныНоменклатурыСрезПоследних.Цена) КАК Цена,
| СУММА(ДвиженияТовараУКонтрагентовОбороты.КоличествоОборот) КАК КоличествоПродаж,
| СУММА(ДвиженияТовараУКонтрагентовОбороты.КоличествоОборот * ЦеныНоменклатурыСрезПоследних.Цена) КАК СуммаПродаж
| ИЗ
| РегистрНакопления.ДвиженияТовараУКонтрагентов.Обороты(&ДатаНачало, &ДатаКонца, Запись, ) КАК ДвиженияТовараУКонтрагентовОбороты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
| ПО ДвиженияТовараУКонтрагентовОбороты.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
| И (ЦеныНоменклатурыСрезПоследних.ТипЦен = &ТипЦен)
| ГДЕ
| ДвиженияТовараУКонтрагентовОбороты.ВидДвиженияПриходРасход = &Расход
| И ДвиженияТовараУКонтрагентовОбороты.ВидОперацииСТоваром = &КупляПродажи
| И ДвиженияТовараУКонтрагентовОбороты.Контрагент = &Контрагент4
|
| СГРУППИРОВАТЬ ПО
| ДвиженияТовараУКонтрагентовОбороты.Номенклатура,
| ДвиженияТовараУКонтрагентовОбороты.Контрагент) КАК Продажа4
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ РАЗРЕШЕННЫЕ ПЕРВЫЕ 1000
| ВТ.Номенклатура КАК Номенклатура,
| СУММА(ВТ.КоличествоПродаж) КАК КоличествоПродаж,
| Штрихкоды.Штрихкод КАК ISBN,
| Штрихкоды1.Штрихкод КАК EAN13,
| МАКСИМУМ(ЦеныНоменклатурыСрезПоследних.Цена) КАК Цена,
| ВТ.Номенклатура.Код КАК Код,
| СУММА(1) КАК Номер
|ИЗ
| ВТ КАК ВТ
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.Штрихкоды КАК Штрихкоды
| ПО ВТ.Номенклатура = Штрихкоды.Владелец
| И (Штрихкоды.ТипШтрихкода = &ПараметрISBN)
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.Штрихкоды КАК Штрихкоды1
| ПО ВТ.Номенклатура = Штрихкоды1.Владелец
| И (Штрихкоды1.ТипШтрихкода = &ПараметрEAN13)
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних КАК ЦеныНоменклатурыСрезПоследних
| ПО ВТ.Номенклатура = ЦеныНоменклатурыСрезПоследних.Номенклатура
| И (ЦеныНоменклатурыСрезПоследних.ТипЦен = &ТипЦен)
|
|СГРУППИРОВАТЬ ПО
| ВТ.Номенклатура,
| Штрихкоды.Штрихкод,
| Штрихкоды1.Штрихкод,
| ВТ.Номенклатура.Код
|
|УПОРЯДОЧИТЬ ПО
| КоличествоПродаж УБЫВ
|ИТОГИ ПО
| Номенклатура" ;
Запрос.УстановитьПараметр("ДатаНачало",ДатаНачало);
Запрос.УстановитьПараметр("ДатаКонца",ДатаКонца);
Запрос.УстановитьПараметр("Контрагент1",Справочники.Контрагенты.НайтиПоКоду("TD_000060"));
Запрос.УстановитьПараметр("Контрагент2",Справочники.Контрагенты.НайтиПоКоду("TD_001545"));
Запрос.УстановитьПараметр("Контрагент3",Справочники.Контрагенты.НайтиПоКоду("TD_000203"));
Запрос.УстановитьПараметр("Контрагент4",Справочники.Контрагенты.НайтиПоКоду("TD_002764"));
Запрос.УстановитьПараметр("ПараметрISBN",ПланыВидовХарактеристик.ТипыШтрихкодов.НайтиПоКоду("FKO00000001"));
Запрос.УстановитьПараметр("ПараметрEAN13",ПланыВидовХарактеристик.ТипыШтрихкодов.EAN13);
Запрос.УстановитьПараметр("Расход",Перечисления.ВидыДвиженийПриходРасход.Расход);
Запрос.УстановитьПараметр("КупляПродажи",Перечисления.ВидыОперацийСТоваром.КупляПродажа);
Запрос.УстановитьПараметр("ТипЦен",Справочники.ТипыЦенНоменклатуры.НайтиПоКоду("TD_000002"));
ЗапросМосква = Запрос.Выполнить().Выгрузить(ОбходРезультатаЗапроса.ПоГруппировкам);

Номер = 0;
Для Каждого Стр Из ЗапросМосква.Строки Цикл
Для Каждого СтрТор Из Стр.Строки Цикл
Номер = Номер+1;
НС = ТабМосква.Добавить();
НС.Номенклатура = СтрТор.Номенклатура;
НС.КоличествоПродаж = СтрТор.КоличествоПродаж;
НС.Цена = СтрТор.Цена;
НС.ISBN = СтрТор.ISBN;
НС.Код = СтрТор.Код;
НС.EAN13 = СтрТор.EAN13;
НС.Номер = (СтрТор.Номер-1)+Номер;
НС.Номер = Номер;
КонецЦикла;
КонецЦикла;

10 Нуф-Нуф

17.11.11

✎

08:33

ватафак???

11 LAAry

17.11.11

✎

08:33

ТабЗагрузка.Найти(СтрКонт.Код,"Код")
Здесь идет поиск 1-й строки, подходящий по условиям. и не важно сколько подходящих строк во 2-й таблице, твой код перепишет в 3-ю таблицу все строки из 1-й, найденные во 2-й.

12 aleks-id

17.11.11

✎

08:36

код даже не смотрел, но сразу посоветую воспользоваться запросом

13 Popkorm

17.11.11

✎

08:36

по Запросу все четко,если посмотреть я в Цикле добавляю номер позиции строк:
Номер = 0;
Для Каждого Стр Из ЗапросМосква.Строки Цикл
Для Каждого СтрТор Из Стр.Строки Цикл
Номер = Номер+1;
НС = ТабМосква.Добавить();
НС.Номенклатура = СтрТор.Номенклатура;
НС.КоличествоПродаж = СтрТор.КоличествоПродаж;
НС.Цена = СтрТор.Цена;
НС.ISBN = СтрТор.ISBN;
НС.Код = СтрТор.Код;
НС.EAN13 = СтрТор.EAN13;
НС.Номер = (СтрТор.Номер-1)+Номер;
НС.Номер = Номер;
КонецЦикла;
КонецЦикла;
и после поиска этот номер так же меняется...Можно посмотреть в отладчике (0)

14 Popkorm

17.11.11

✎

08:38

(12)это через менеджер Временных и потом Левым соединением

15 Popkorm

17.11.11

✎

08:41

(11)так то в 3-ю таблицу я беру из 1-й таблицы,в (8) посмотри

16 andrewks

17.11.11

✎

08:42

что такое клюк?

17 LAAry

17.11.11

✎

08:45

(15) я вижу что ты берешь строку из 1-й, ищешь похожую в во 2-й, если нашел, создаешь в 3-й. А нужно свернуть 1-ю по колонкам поиска, искать из 1-й во 2-й с помощью НайтиСтроки(...) и результат поиска писать в 3-ю.

18 Popkorm

17.11.11

✎

08:54

(17)в 1-й у меня номеклатура и так свернута,получил через ДеревоЗначений,в (9):
Для Каждого Стр Из ЗапросМосква.Строки Цикл
Для Каждого СтрТор Из Стр.Строки Цикл

19 Popkorm

17.11.11

✎

09:11

(17)через найти НайтиСтроки(...) надо структура создавать,а у меня ТабЗагрузка это из Екселя,

20 LAAry

17.11.11

✎

09:14

Поиск = ТабЗагрузка.НайтиСтроки(Новый Структура("Код",СтрКонт.Код));

21 Popkorm

17.11.11

✎

09:20

(20)что то не алле
Значение не является значением объектного типа (НайтиСтроки)
Поиск = ТабЗагрузка.НайтиСтроки(Новый Структура("Код",СтрКонт.Код));

22 LAAry

17.11.11

✎

09:22

ТабЗагрузка - это объект excel? или сформирована из excel.

23 Popkorm

17.11.11

✎

09:23

(22)
ТабЗагрузка=Новый ТаблицаЗначений;
ТабЗагрузка.Колонки.Добавить("Номенклатура");
ТабЗагрузка.Колонки.Добавить("Автор");
ТабЗагрузка.Колонки.Добавить("Год");
ТабЗагрузка.Колонки.Добавить("Цена");
ТабЗагрузка.Колонки.Добавить("Ст");
ТабЗагрузка.Колонки.Добавить("Переп");
ТабЗагрузка.Колонки.Добавить("Гриф");
ТабЗагрузка.Колонки.Добавить("Дата");
ТабЗагрузка.Колонки.Добавить("ISBN");
ТабЗагрузка.Колонки.Добавить("Код");
ТабЗагрузка.Колонки.Добавить("Раздел");
ТабЗагрузка.Колонки.Добавить("допечатка");
ТабЗагрузка.Колонки.Добавить("Формат");
ТабЗагрузка.Колонки.Добавить("Бумага");
ТабЗагрузка.Колонки.Добавить("EAN");

НомерПервойСтроки = 4;
Для Row = НомерПервойСтроки По RowCount Цикл
Если ЗначениеЗаполнено(СокрЛП(ExcelЛист.Cells(Row,3).Text)) Тогда
ОфигенныйКод = СтрЗаменить((ExcelЛист.Cells(Row,17).Text)," ","");
НС = ТабЗагрузка.Добавить();
НС.Номенклатура = СокрЛП(ExcelЛист.Cells(Row,3).Text);
НС.Автор = СтрЗаменить((ExcelЛист.Cells(Row,4).Text)," ","");
НС.Год = СтрЗаменить((ExcelЛист.Cells(Row,6).Text)," ","");
НС.Цена = СтрЗаменить((ExcelЛист.Cells(Row,7).Text)," ","");
НС.Ст = СтрЗаменить((ExcelЛист.Cells(Row,8).Text)," ","");
НС.Переп = СтрЗаменить((ExcelЛист.Cells(Row,10).Text)," ","");
НС.Гриф = СтрЗаменить((ExcelЛист.Cells(Row,13).Text)," ","");
НС.Дата = СтрЗаменить((ExcelЛист.Cells(Row,15).Text)," ","");
НС.ISBN = СтрЗаменить((ExcelЛист.Cells(Row,16).Text)," ","");
НС.Код = "TD_"+ОфигенныйКод;
НС.Раздел = СокрЛП(ExcelЛист.Cells(Row,18).Text);
НС.допечатка = СокрЛП(ExcelЛист.Cells(Row,23).Text);
НС.Формат = СокрЛП(ExcelЛист.Cells(Row,24).Text);
НС.Бумага = СокрЛП(ExcelЛист.Cells(Row,25).Text);
НС.EAN = СокрЛП(ExcelЛист.Cells(Row,26).Text);

КонецЕсли;
КонецЦикла;

24 aleks-id

17.11.11

✎

09:23

млин. 2 копрокодера гляжу нашли друг друга. (0) хватит ерундой заниматься! делай всё запросом!

25 LAAry

17.11.11

✎

09:26

(24) без личностей.

26 Buster007

17.11.11

✎

09:27

что-то мало как-то ТЗ насоздавал ))
делай больше! ))

27 Popkorm

17.11.11

✎

09:27

(24)я тебе задавал вопрос в (14)..Сказал "А",говори "Б"

28 Buster007

17.11.11

✎

09:29

(27) ТЗ типизируй и потом хоть менеджером, хоть еще чем )

29 Popkorm

17.11.11

✎

09:32

(28)это как это "типизируй"

30 Popkorm

17.11.11

✎

09:33

тип

31 LAAry

17.11.11

✎

09:34

ТабЗагрузка.Колонки.Добавить("Номенклатура",ЗдесьЗадатьТипСправочникСсылкаНоменклатура);

32 Popkorm

17.11.11

✎

10:03

а как Массив = Неопределенно проверить

33 Popkorm

17.11.11

✎

10:42

(31) ТабЗагрузка.Колонки.Добавить("Код",Новый ОписаниеТипов("СправочникСсылка.Номенклатура"));
ТабЗагрузка.Колонки.Добавить("Номенклатура",Новый ОписаниеТипов("СправочникСсылка.Номенклатура"));

Поиск = ТабЗагрузка.НайтиСтроки(Новый Структура("Код",СтрКонт.Код));
Если Поиск.Количество <>0 Тогда Продолжить;КонецЕсли;

34 Popkorm

17.11.11

✎

10:43

Поиск неотрабатывает,всегда пустой

35 Popkorm

17.11.11

✎

10:45

т.е. тут Если Поиск.Количество <>0
Поле объекта не обнаружено Количество

36 LAAry

17.11.11

✎

11:02

а "код" у тебя имеет тип Справочник ссылка?

37 Popkorm

17.11.11

✎

11:02

Ребята Будут еще идеи ?!

38 hhhh

17.11.11

✎

11:05

(37) может Поиск.Количество() спасет гиганта мысли?

39 Popkorm

17.11.11

✎

11:31

(38)да нет,у меня Поиск = ТабЗагрузка.НайтиСтроки(Новый Структура("Код",СтрКонт.Код)) не отрабатывает,Поиск(Тип Массив) он пустой

40 hhhh

17.11.11

✎

11:36

(39) при предыдущем допросе вы говорили:
"Поле объекта не обнаружено Количество".
Путаетесь в показаниях.

41 Popkorm

17.11.11

✎

11:41

(40)ну это тоже было,а щас по этой схеме не отрабатывает
Для Каждого СтрКонт Из ТабМосква Цикл
Поиск = ТабЗагрузка.НайтиСтроки(Новый Структура("Код",СтрКонт.Код));
Если Поиск.Количество() = 0 Тогда Продолжить;КонецЕсли;

42 Popkorm

17.11.11

✎

12:12

(41)Вообщем по НайтиСтроки тоже самый результат что и через Найти,как в (0):
В ТабМосква "Репетитор по химии"=38,после Поиска в ТабЗагрузка "Репетитор по химии" как то становится = 7 "

43 DrShad

17.11.11

✎

13:44

(42) уже бы выложил куда-нить свою нетленку

44 LAAry

17.11.11

✎

14:00

ТабЗагрузка.Колонки.Добавить("Код",Новый ОписаниеТипов("СправочникСсылка.Номенклатура"));
у тебя Код действительно справочник а не строка?

45 Popkorm

17.11.11