Имя: Пароль:
1C
1С v8
не могу найти субконто по коду
, ,
0 koketka
 
23.01.13
10:56
Загружаю остатки по счетам из другой базы
При загрузке субконто никак не могу найти по коду нужный элемент как то подругому надо а как не знаю Делала так
Суб2 = Пров.СчетДт.ВидыСубконто[1].ВидСубконто.НайтиПоКоду(Субконто2);
где субконто2 код элемента
1 1Сергей
 
23.01.13
10:59
Нужно Субконто или вид Субконто?
2 Schwonder
 
23.01.13
10:59
Месье знает толк в извращениях
3 Schwonder
 
23.01.13
11:00
Нахрена это всё?
4 koketka
 
23.01.13
11:01
короче подцепляю из файла счет и код субконта
а в проводке не могу присвоить код?
5 koketka
 
23.01.13
11:02
Суб2 = Пров.СчетДт.ВидыСубконто[1].ВидСубконто.НайтиПоКоду(Субконто2);
Пров.СубконтоДт[Пров.СчетДт.ВидыСубконто[1].ВидСубконто] = Суб1;
6 koketka
 
23.01.13
11:03
Суб2 = Пров.СчетДт.ВидыСубконто[1].ВидСубконто.НайтиПоКоду(Субконто2);
Пров.СубконтоДт[Пров.СчетДт.ВидыСубконто[1].ВидСубконто] = Суб2;
7 koketka
 
23.01.13
11:03
Суб2 = Пров.СчетДт.ВидыСубконто[1].ВидСубконто.НайтиПоКоду(Субконто2);
Пров.СубконтоДт[Пров.СчетДт.ВидыСубконто[1].ВидСубконто] = Суб2 ; - опечатка
8 DrShad
 
23.01.13
11:04
(4) а где гарантия что тип субконто одинаков?
9 Nzn
 
23.01.13
11:04
Код вида субконто?
10 Schwonder
 
23.01.13
11:04
По коду искать надо в соответствующем менеджере...
11 DrShad
 
23.01.13
11:04
имхо ТС не дорос до создания универсальной загрузки
12 koketka
 
23.01.13
11:04
Если Счет.ВидыСубконто.Количество()> 0 Тогда
               Если Справочники.ТипВсеСсылки().СодержитТип(Пров.СчетДт.ВидыСубконто[0].ВидСубконто.ТипЗначения.Типы()[0]) = Истина Тогда
                   Суб1 = Пров.СчетДт.ВидыСубконто[0].ВидСубконто.ПолучитьОбъект().Метаданные()..НайтиПоКоду(Субконто1);
               ИначеЕсли Перечисления.ТипВсеСсылки().СодержитТип(Пров.СчетДт.ВидыСубконто[0].ВидСубконто.ТипЗначения.Типы()[0]) = Истина  Тогда
                   Суб1 = ИмяПеречисленияПоСинониму(Субконто1,Пров.СчетДт.ВидыСубконто[0].ВидСубконто)
               КонецЕсли;
               Пров.СубконтоДт[Пров.СчетДт.ВидыСубконто[0].ВидСубконто] = Суб1;
           КонецЕсли;
13 Рэйв
 
23.01.13
11:05
Вид=Пров.СчетДт.ВидыСубконто[1].ВидСубконто;
Пров.СубконтоДт.Вставить(Вид,Суб1);
14 koketka
 
23.01.13
11:07
(13) а как я по коду нужный элемент найду?
15 Рэйв
 
23.01.13
11:08
(14)
Ссылка=Справочник.Какойто.Найтипокоду(Код);
Если ссылка.Пустая() Тгда
  Сообщить("Фиг вам. Нет такого.");
КонецЕсли;
16 koketka
 
23.01.13
11:11
(14) В том и дело что какойто я не знаю справочника
например для счетам 62.01 это контрагент для 10 склады
определяется в зависимости от счета!
17 koketka
 
23.01.13
11:11
я хотела универсальную обработку
18 DrShad
 
23.01.13
11:11
(17) подрасти еще годика два
19 Schwonder
 
23.01.13
11:12
Универсальные так не делаются))))
20 cw014
 
23.01.13
11:13
ВидСубконто = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.НайтиПоКоду(Субконто1);

Пров.СубконтоДт[ВидСубконто] = Суб1;
21 Рэйв
 
23.01.13
11:13
Ссылка=Справочники[Суб1.Метаданные().Имя].Найтипокоду(Код);
22 Schwonder
 
23.01.13
11:14
(0) А откуда данные в файле появились?
23 Schwonder
 
23.01.13
11:14
(21) А если составной тип %). Теоретически и такое может быть.
24 Schwonder
 
23.01.13
11:15
О типе надо задумываться на этапе формирования файла, если чё.
25 Рэйв
 
23.01.13
11:15
(23)Ну и что?...Главное чтобы тип содержался
26 Рэйв
 
23.01.13
11:16
Суб1 то уже определенного типа
27 DrShad
 
23.01.13
11:16
(21) так у нее нет еще Суб1
28 Рэйв
 
23.01.13
11:17
(27)Пусть делает, чтобы уже был:-) ...Ладно, я на обед
29 Nzn
 
23.01.13
11:18
(24) ++++
30 DrShad
 
23.01.13
11:19
(28) в (24) правильный совет, а по-сему дальнейшее наматывание соплей на кулак в этой ветке бесполезно

ТС - возвращайся к истокам, т.е. к формированию файла выгрузки
31 Schwonder
 
23.01.13
11:19
(0) Откуда, всё-таки, файл?
32 koketka
 
23.01.13
11:20
да из такойже базы
33 koketka
 
23.01.13
11:20
выгружаю в ексель
34 Schwonder
 
23.01.13
11:22
Получи данные, потом попробуй ЗначениеВФайл(), ЗначениеИзФайла(). И не парься.
35 koketka
 
23.01.13
11:22
ок
36 DrShad
 
23.01.13
11:23
(34) гы, не взлетит
37 DrShad
 
23.01.13
11:24
+(36) у нее только конфы одинаковы, а уиды объектов уже другие
38 Schwonder
 
23.01.13
11:25
(37) Может из вчерашнего бэкапа. Откуда ты значешь.. Попробовать стоит.
39 DrShad
 
23.01.13
11:26
(38) и как тогда новые объекты из Источника отразятся в Приемнике? :)))))
40 Schwonder
 
23.01.13
11:28
(39) Если это бэкап, то источник старше чем приемник, и объектов новых в нем нету.
41 Schwonder
 
23.01.13
11:29
+(40) Древнее имел ввиду))
42 DrShad
 
23.01.13
11:31
(40) вот уж не факт
43 Schwonder
 
23.01.13
11:32
(42) Ну а если есть, то всякие там "НайтиПоКоду()" тоже лажанут..
44 DrShad
 
23.01.13
11:34
(43) ну так вот и нужно в файл вывести всю необходимую инфу для однозначной идентификации объекта
45 Schwonder
 
23.01.13
11:36
(44) Ты перегибаешь))) См. (32).
46 DrShad
 
23.01.13
11:38
(45) она же хочет УНИВЕРСАЛЬНУЮ
47 Schwonder
 
23.01.13
11:40
(46) Универсальную она пока не осилит.
48 koketka
 
23.01.13
11:42
Да мальчики я тупая ничего у меня ничего не получается! Надо еще раз книгу по 1с прочитать! спасибо вам, что не прошли мимо!
49 DrShad
 
23.01.13
11:48
(48) в книгах такие плюшки не описаны - они приходят с опытом
50 DrShad
 
23.01.13
11:51
да и как бы уже не актуально такие обработки писать - почитай лучше мануал по КД
51 koketka
 
23.01.13
11:55
"мануал по КД" а это что такое
52 DrShad
 
23.01.13
11:59
КД - Конвертация данных
мануал - руководство пользователя, инструкция, справка
53 Nzn
 
23.01.13
11:59
(51) Конвертация данных
Существуют различные подходы к организации обмена данными между различными информационными базами. Один из таких подходов - организация обмена данными при помощи правил обмена. Для организации обмена данными достаточно разработать правила по которым необходимо переносить данные из одной информационной базы в другую. Когда правила обмена готовы, с их помощью из информационной базы источника можно выгрузить необходимую информацию в файл обмена из которого в свою очередь эти данные можно загрузить в информационную базу приемник
Компьютер — устройство, разработанное для ускорения и автоматизации человеческих ошибок.