Имя: Пароль:
1C
1С v8
1с8 ЗУП заполнение таб части справочника должности
0 Uragan_a
 
28.07.14
08:40
Возможности добавить доп обработку таб части для справочника должности организаций нет, хочу сделать кнопку чтобы автоматически добавлялись строки.

Если получаю объект и добавляю строки.
Как то так
Объект = Ссылка.Получить(Объект);
ТЧ.Должности.ЕжегодныеОтпуска.Добавить();
ТЧ.Отпуск = Справочник.ВидыОтпусков.НайтиПонаименованию("Основной);
ТЧ.Количество = 20;
Объект.Записать();

Результата сразу не видно.

Как добавить строки в реальном времени?
1 Uragan_a
 
28.07.14
08:42
Через элементы формы, что - то тоже ничего не вышло
2 Cube
 
28.07.14
08:44
(0) Быдлокодишь?
1. Код не рабочий.
2. Находясь в объекте, полечать объект из ссылки... Извращенец?
(1) Ваще рукалицо...
3 Cube
 
28.07.14
08:44
(2) полечать = получать
4 Serg_1960
 
28.07.14
08:45
Вопрос из серии "обращение к форме из внешней обработки ТЧ" насколько я понял и характерные ошибки от туда же.
5 Uragan_a
 
28.07.14
08:45
(4) и все же как мне добавить строки?
6 Uragan_a
 
28.07.14
08:46
(2) на скорую руку написал на форум.
суть ведь ясна
7 Cube
 
28.07.14
08:47
(6) "суть ведь ясна"
Ясна. Больше так не делай. Не позорь профессию.
8 Uragan_a
 
28.07.14
08:48
(7) скажите как нужно плиииииииииз
9 Cube
 
28.07.14
08:51
(8) Вот так:

//Объект = Ссылка.Получить(Объект); - удалить этот позор.
НоваяСтрока = ТЧ.Должности.ЕжегодныеОтпуска.Добавить();
НоваяСтрока.Отпуск = Справочник.ВидыОтпусков.НайтиПонаименованию("Основной); //Ну кто так делает? Переименуют и привет! Для проверки пойдет, но для рабочей эксплуатации надо переделать.
НоваяСтрока.Количество = 20;
//Объект.Записать();
10 Cube
 
28.07.14
08:52
+(9) Упс...
Строку

НоваяСтрока = ТЧ.Должности.ЕжегодныеОтпуска.Добавить();

заменить на

НоваяСтрока = ЕжегодныеОтпуска.Добавить();
11 Uragan_a
 
28.07.14
08:54
ТЧ = ЕжегодныеОтпуска.Добавить();
    ТЧ.ВидЕжегодногоОтпуска = Справочники.ВидыЕжегодныхОтпусков.НайтиПоНаименованию("Основной ежегодный отпуск");
    ТЧ.КоличествоДнейОтпускаВГод = 28;
    ТЧ = ЕжегодныеОтпуска.Добавить();
    ТЧ.ВидЕжегодногоОтпуска = Справочники.ВидыЕжегодныхОтпусков.НайтиПоНаименованию("Дополнительный отпуск за работу в МКС");
    ТЧ.КоличествоДнейОтпускаВГод = 16;


поняяяяяял
12 Uragan_a
 
28.07.14
08:55
вот идиот
13 Uragan_a
 
28.07.14
08:55
спс