|
v7: Перезапись Групп Справочников как?! | ☑ | ||
---|---|---|---|---|
0
tpudl_bases
29.03.13
✎
09:37
|
Не работает:
СпрНоменклатура = СоздатьОбъект("Справочник.Номенклатура"); СпрГруппаНоменк = СоздатьОбъект("Справочник.Номенклатура"); НомерСтр2 =1; СпрНоменклатура.ВыбратьЭлементы(); Пока СпрНоменклатура.ПолучитьЭлемент()=1 Цикл Если ПустоеЗначение(СпрНоменклатура.КодБух)=1 Тогда Если ПустоеЗначение(СпрНоменклатура.Код)=0 Тогда Если СпрНоменклатура.ЭтоГруппа()=1 Тогда Если СпрГруппаНоменк.НайтиЭлемент(СпрНоменклатура.ТекущийЭлемент())=1 Тогда СпрГруппаНоменк.КодБух = СпрГруппаНоменк.Код; СпрГруппаНоменк.Записать(); НомерСтр2 = НомерСтр2+1; КонецЕсли; Сообщить("Перезаписан Номенклатура "+СпрНоменклатура.Наименование); Иначе СпрНоменклатура.КодБух = СпрНоменклатура.Код; СпрНоменклатура.Записать(); НомерСтр2 = НомерСтр2+1; КонецЕсли; КонецЕсли; КонецЕсли; КонецЦикла; |
|||
1
chief accountant
29.03.13
✎
09:51
|
(0) Может я не догоняю, но зачем искать найденную группу второй раз?
|
|||
2
tpudl_bases
29.03.13
✎
09:53
|
(1)
просто так не работает: Если ПустоеЗначение(СпрНоменклатура.Код)=0 Тогда СпрНоменклатура.КодБух = СпрНоменклатура.Код; СпрНоменклатура.Записать(); КонецЕсли; Все справочники перезаписались,а группы нет |
|||
3
tpudl_bases
29.03.13
✎
10:14
|
КодБух(строка)общий реквизит для Справочник.Номенклатура
размещен на форме элемента,так же Форме группы Длина(КодБух)=9 индетичен Спр.коду В руками добавляю КодБух,так же не записывает.... |
|||
4
tpudl_bases
29.03.13
✎
10:16
|
перезаписать группы справочника
|
|||
5
tpudl_bases
29.03.13
✎
10:24
|
ап...
|
|||
6
1Сергей
29.03.13
✎
10:26
|
(2) в каком смысле не работает? ошибку говорит? Перед записью СпрНоменклатура.КодБух чему равен?
|
|||
7
chief accountant
29.03.13
✎
10:33
|
(5)
СпрНоменклатура = СоздатьОбъект("Справочник.Номенклатура"); //СпрГруппаНоменк = СоздатьОбъект("Справочник.Номенклатура"); //НомерСтр2 =1; СпрНоменклатура.ВыбратьЭлементы(); Пока СпрНоменклатура.ПолучитьЭлемент()=1 Цикл Если ПустоеЗначение(СпрНоменклатура.КодБух)=1 Тогда //Если ПустоеЗначение(СпрНоменклатура.Код)=0 Тогда Если СпрНоменклатура.ЭтоГруппа()=1 Тогда //Если СпрГруппаНоменк.НайтиЭлемент(СпрНоменклатура.ТекущийЭлемент())=1 Тогда СпрНоменклатура.КодБух ="Миста"; СпрНоменклатура.Записать(); //НомерСтр2 = НомерСтр2+1; //КонецЕсли; Сообщить("Перезаписан Номенклатура "+СпрНоменклатура.Наименование); //Иначе // СпрНоменклатура.КодБух = СпрНоменклатура.Код; // СпрНоменклатура.Записать(); // НомерСтр2 = НомерСтр2+1; КонецЕсли; //КонецЕсли; КонецЕсли; КонецЦикла; работает |
|||
8
vinogradъ
29.03.13
✎
10:33
|
(0) КодБух для элемента и группы определен?
|
|||
9
1Сергей
29.03.13
✎
10:36
|
(8) судя по "В руками добавляю КодБух,так же не записывает....", нет :)
|
|||
10
tpudl_bases
29.03.13
✎
10:37
|
(9) да,ручками тоже не записывает
вот для (6) http://clip2net.com/s/4Pffbh |
|||
11
tpudl_bases
29.03.13
✎
10:39
|
повторюсь,добавил новый реквизит,на форме + формеГруппы равно этиму реквизиту......
|
|||
12
1Сергей
29.03.13
✎
10:39
|
(10) в свойствах реквизита справочника на закладке дополнительно в Поле "Использовать" что указано?
|
|||
13
chief accountant
29.03.13
✎
10:39
|
(10) у тебя на форме группы КодБух есть?
|
|||
14
tpudl_bases
29.03.13
✎
10:42
|
||||
15
1Сергей
29.03.13
✎
10:43
|
(14) ну, как я и думал. Перечитай (12) внимательно
|
|||
16
chief accountant
29.03.13
✎
10:45
|
(14) в предприятии так-то, а вообще см (8)
|
|||
17
tpudl_bases
29.03.13
✎
10:46
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |