Имя: Пароль:
1C
 
заполнение субконто
0 Adilgeriy
 
30.04.19
21:37
документ ввод начальных остатков
хочу заполнить субконтно документы расчетов
Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.ДокументыРасчетов]    = Регистратор.Ссылка;
также делал
Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.ДокументыРасчетов]    = Регистратор;
поле регистратор элемент формы обработки
используется:
Проводки = РегистрыБухгалтерии.ЖурналПроводокЕПСБУ.СоздатьНаборЗаписей();
Проводки.Отбор.Регистратор.Установить(Регистратор);
Проводки.Прочитать();

поле точно не пустое
почему не заполняется не понятно. эти субконто заполняются
Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Контрагенты]        = Контрагент;
Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Договоры]            = Договор;
нужно явно указать из какого вида документов берется ссылка?
1 Cyberhawk
 
30.04.19
21:54
Посмотри как это делается в ОМ БухгалтерскийУчет.УстановитьСубконто
2 Adilgeriy
 
30.04.19
22:14
Процедура УстановитьСубконто(Проводка, ДтКт, ИмяСубконто, ЗначениеСубконто) Экспорт

    Если НЕ ЗначениеЗаполнено(ИмяСубконто) Тогда
        Возврат;
    КонецЕсли;
    
    СвойстваСчета = БухгалтерскийУчетПовтИсп.ПолучитьСвойстваСчета(Проводка["Счет"+ДтКт]);
    
    Если ТипЗнч(ИмяСубконто) = Тип("ПланВидовХарактеристикСсылка.ВидыСубконто") Тогда
        
        ВидСубконто = ИмяСубконто;
        
    ИначеЕсли ТипЗнч(ИмяСубконто) = Тип("Число") Тогда

        Если ИмяСубконто > СвойстваСчета.КоличествоСубконто Тогда
            Возврат;
        КонецЕсли;

        ВидСубконто = СвойстваСчета["ВидСубконто" + ИмяСубконто];

    Иначе

        ВидСубконто = ПланыВидовХарактеристик.ВидыСубконто[ИмяСубконто];

    КонецЕсли;
    
    Если СвойстваСчета.ВидСубконто1 = ВидСубконто Тогда
        НомерСубконто = 1;
    ИначеЕсли СвойстваСчета.ВидСубконто2 = ВидСубконто Тогда
        НомерСубконто = 2;
    ИначеЕсли СвойстваСчета.ВидСубконто3 = ВидСубконто Тогда
        НомерСубконто = 3;
    Иначе
        Возврат;
    КонецЕсли;
    Если ВидСубконто.ТипЗначения.СодержитТип(ТипЗнч(ЗначениеСубконто)) Тогда
        Проводка["ВидСубконто"+ДтКт+НомерСубконто] = ВидСубконто;
        Проводка["Субконто"+ДтКт+НомерСубконто]    = ЗначениеСубконто;
    КонецЕсли;
КонецПроцедуры // УстановитьСубконто()
3 Adilgeriy
 
30.04.19
22:17
не вижу как работать с составным типом субконто
4 Adilgeriy
 
01.05.19
03:31
Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.ДокументыРасчетов]    = Документы.ВводНачальныхОстатков;
    Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.ДокументыРасчетов]    = Регистратор.Ссылка;
5 Adilgeriy
 
01.05.19
03:32
(4) так заполняется
6 Adilgeriy
 
01.05.19
03:36
странно. первая строчка стала не обязательной. я походу какой то глюк поймал:(
Пользователь не знает, чего он хочет, пока не увидит то, что он получил. Эдвард Йодан