Имя: Пароль:
1C
1С v8
v8: ЗУП
,
0 Эльфийка1
 
29.08.12
13:04
Здравствуйте! Подскажите, пож-та!!!!
Есть значение из справочника "Номенклатурные группы". Надо организовать поиск этого значения среди 2-го субконта ДТ (СубконтоДт2) в справочнике СпособыОтраженияЗарплатыВРеглУчете и выбор проводки с данным субконто. Если же проводка с таким субконто не найдена, нужно создать новую проводку. Далее эту проводку надо будет вставить в соответствующее поле в документе.
1 Эльфийка1
 
29.08.12
13:05
Как это будет выглядеть в коде?
2 Мимохожий Однако
 
29.08.12
13:05
Из бухгалтерии выгрузку сделай сначала
3 rbcvg
 
29.08.12
13:06
фотку сначала вставь нормальную.
4 Эльфийка1
 
29.08.12
13:12
(2) Мне не нужна выгрузка из бухгалтерии. В базе есть уже и номенклатурные группы, загруженные из БП , и проводки созданные в Способах отражения зп в регл учете. Мне нужно создать поиск и выбор,
Т.е. в модуле обработки Анализ неявок пишу            РасчетныйДокумент.ШаблонПроводки.СубконтоДт2 = СтрокаТаблицы.КадровыйДокумент.ПаспортЗаказ;
(где ПаспортЗаказ - СправочникСсылка.НоменклатурныеГруппы).
Соответственно, надо данную запись довести до ума)))).
5 Эльфийка1
 
29.08.12
13:26
Так будет правильно?

           спр=Справочники.СпособыОтраженияЗарплатыВРеглУчете.НайтиПоКоду(СтрокаТаблицы.КадровыйДокумент.ПаспортЗаказ.Код);
           Если НЕ спр.Пустая() Тогда
               РасчетныйДокумент.ШаблонПроводки = спр;
               ТекДанные.Расстояние = спр.Расстояние;
               //УстановитьФильтр();
           КонецЕсли;
6 Strogg
 
29.08.12
13:27
Нет нормальной фотки - нет ответа.)
7 Эльфийка1
 
29.08.12
13:39
кто действительно знает, тот и без фото ответит))))
8 Strogg
 
29.08.12
13:48
Ну жди тогда :)
Кстати, а что за адовая строчка в коде?
    ТекДанные.Расстояние = спр.Расстояние;
9 Эльфийка1
 
29.08.12
13:48
Не то, (((( кто-нибудь, подскажите, плиз!!!!!!!!!!!!!!!!!!!!!
10 Эльфийка1
 
29.08.12
13:49
(5)(8) упс, должно быть вот, так

           спр=Справочники.СпособыОтраженияЗарплатыВРеглУчете.НайтиПоКоду(СтрокаТаблицы.КадровыйДокумент.ПаспортЗаказ.Код);
           Если НЕ спр.Пустая() Тогда
               РасчетныйДокумент.ШаблонПроводки = спр;
               //УстановитьФильтр();
           КонецЕсли;
11 Эльфийка1
 
29.08.12
13:54
видимо обращение к справочнику должно быть организовано как-то по другому?
12 Strogg
 
29.08.12
13:59
(10)
   Запрос = Новый Запрос;
   Запрос.Текст = "ВЫБРАТЬ
                  |    СпособыОтраженияЗарплатыВРеглУчете.Ссылка
                  |ИЗ
                  |    Справочник.СпособыОтраженияЗарплатыВРеглУчете КАК СпособыОтраженияЗарплатыВРеглУчете
                  |ГДЕ
                  |    СпособыОтраженияЗарплатыВРеглУчете.СубконтоДт2 = &ВыбСубконто"
   ;
   Запрос.УстановитьПараметр("ВыбСубконто", элемент.Значение);
   Рез = Запрос.Выполнить().Выгрузить();
   Если Рез.Количество() = 0 тогда
       Сообщить("Все ок, бро, вводи новый элемент")
   иначе
       //здесь получили таблицу ссылок - дальше ее надо обрабатывать самой
   КонецЕсли;
------
соотв-но - процедура ПриИзменении(). Ну, теперь фото.
13 Эльфийка1
 
29.08.12
14:02
(12) Спасибо, а фото есть, см.)))))
14 EvgenPS
 
29.08.12
14:04
(13)Красивая