Имя: Пароль:
1C
1С v8
Помогите пожалуйста с СКД
0 GreenDay1986
 
03.07.12
09:17
Собственно с ней ни разу не сталкивался. Есть обработка написанная франчем. Код
ИначеЕсли ВидРеестра = "Поступление08031" Тогда
СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС0803");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Значение = Справочники.ОбъектыСтроительства.НайтиПоКоду("000000037");
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Значение = "Реестр поступивших ОС на 08.03 счет (тех. присоединения)";
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Использование = Истина;
       
   ИначеЕсли ВидРеестра = "Поступление08032" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС0803");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Значение = Справочники.ОбъектыСтроительства.НайтиПоКоду("000000036");
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Значение = "Реестр поступивших ОС на 08.03 счет (общие)";
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Использование = Истина;

Собственно хотелось бы узнать где создаются, хранятся ВидРеестра = "Поступление08031" и идРеестра = "Поступление08032" Макеты на форме есть виды реестров не нашел
1 gosn1ck
 
03.07.12
09:22
реквизит формы\отчета?
2 GreenDay1986
 
03.07.12
09:22
В схеме компоновки данных ничего такого тоже не нашел
3 ЧашкаЧая
 
03.07.12
09:24
Это переменные или реквизиты формы, ищи в коде где им присваиваются значения.
4 GreenDay1986
 
03.07.12
09:24
(1) вид реестра - реквизит формы, выпадающий список. Тип произвольный. Как туда добавить/удалить виды реестра?
5 gosn1ck
 
03.07.12
09:24
свойство состав. иди во франч :)
6 GreenDay1986
 
03.07.12
09:25
(5) поподробнее
(3) вот весь код, ничего не присваивается

Процедура ВыбПериодНажатие(Элемент)
   НастройкаПериода = Новый НастройкаПериода;
   НастройкаПериода.УстановитьПериод(НачПериода, ?(КонПериода='0001-01-01', КонПериода, КонецДня(КонПериода)));
   НастройкаПериода.РедактироватьКакИнтервал = Истина;
   НастройкаПериода.РедактироватьКакПериод = Истина;
   НастройкаПериода.ВариантНастройки = ВариантНастройкиПериода.Период;
   Если НастройкаПериода.Редактировать() Тогда
       НачПериода = НастройкаПериода.ПолучитьДатуНачала();
       КонПериода = НастройкаПериода.ПолучитьДатуОкончания();
       
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[0].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[0].Значение = НачПериода;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[1].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[1].Значение = КонецДня(КонПериода);
   КонецЕсли;
КонецПроцедуры

Процедура ПриОткрытии()
   
   ВидРеестра = "Поступление0804";
   СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС0804");
   КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
   
КонецПроцедуры

Процедура ВидРеестраПриИзменении(Элемент)
   
   Если ВидРеестра = "Поступление0804" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС0804");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       
   ИначеЕсли ВидРеестра = "Поступление0801" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС0801");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       
   ИначеЕсли ВидРеестра = "Поступление08031" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС0803");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Значение = Справочники.ОбъектыСтроительства.НайтиПоКоду("000000037");
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Значение = "Реестр поступивших ОС на 08.03 счет (тех. присоединения)";
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Использование = Истина;
       
   ИначеЕсли ВидРеестра = "Поступление08032" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС0803");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Значение = Справочники.ОбъектыСтроительства.НайтиПоКоду("000000036");
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Значение = "Реестр поступивших ОС на 08.03 счет (общие)";
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Использование = Истина;
       
   ИначеЕсли ВидРеестра = "Поступление08033" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС08031");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[3].Значение = Справочники.ОбъектыСтроительства.НайтиПоКоду("000000409");
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Значение = "Реестр поступивших ОС на 08.03 счет (выпадающие доходы)";
       КомпоновщикНастроек.Настройки.ПараметрыВывода.Элементы[11].Использование = Истина;
   
   ИначеЕсли ВидРеестра = "Поступление07" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПоступившихОС07");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       
   ИначеЕсли ВидРеестра = "Введение" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрВведенныхВЭксплуатациюОС");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       
   ИначеЕсли ВидРеестра = "Перемещение" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрПеремещенныхОС");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       
   ИначеЕсли ВидРеестра = "Реализация" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрРеализованныхОС");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
       
   ИначеЕсли ВидРеестра = "Списание" Тогда
       СхемаКомпоновкиДанных = ПолучитьМакет("РеестрСписанныхОС");
       КомпоновщикНастроек.ЗагрузитьНастройки(СхемаКомпоновкиДанных.НастройкиПоУмолчанию);
   КонецЕсли;
   
   Если Не ЗначениеЗаполнено(НачПериода) Тогда
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[0].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[0].Значение = '20000101000000';
   Иначе
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[0].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[0].Значение = НачПериода;
   КонецЕсли;
   Если Не ЗначениеЗаполнено(КонПериода) Тогда
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[1].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[1].Значение = ТекущаяДата();
   Иначе
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[1].Использование = Истина;
       КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[1].Значение = КонПериода;
   КонецЕсли;
       
КонецПроцедуры

Процедура НачПериодаПриИзменении(Элемент)
   КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[0].Использование = Истина;
   КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[0].Значение = НачПериода;
КонецПроцедуры

Процедура КонПериодаПриИзменении(Элемент)
   КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[1].Использование = Истина;
   КомпоновщикНастроек.Настройки.ПараметрыДанных.Элементы[1].Значение = КонецДня(КонПериода);
КонецПроцедуры
7 GreenDay1986
 
03.07.12
09:27
Спасибо товарищи, нашел. У этого поля свойство СтрокиСпискаВыбора, там прописывались
8 ironkrab
 
03.07.12
09:27
(4) Обработка открывается сама по себе или из другой обработки, отчета ?
9 GreenDay1986
 
03.07.12
09:39
(8) вид реестра оказался строкой этого выпадающего списка. Свойство СтрокиСпискаВыбора/открыть. не заметил его просто, обработка - внешний отчет