Имя: Пароль:
1C
1C 7.7
v7: ЗиК: Вставить новую запись в журнал расчетов
0 Валентинка
 
15.03.13
13:28
Здравствуйте! Помогите,пожалуйста))) Нужно вставить новую запись в журнал расчетов зарплата в прошлый период. Вот что пишу:

СтарыйПериод = жрнЗарплата.ТекущийПериод();
       
НачатьТранзакцию();  
   
жрнЗарплата.Новая();
жрнЗарплата.УстановитьТекущийПериод(жрнЗарплата.ПериодПоДате(ТДата),0);
   
жрнЗарплата.УстановитьРеквизит("Документ",Документ);
жрнЗарплата.УстановитьРеквизит("РодительскийДокумент",Документ);
жрнЗарплата.УстановитьРеквизит("Объект",ОбъектСотрудник);
жрнЗарплата.УстановитьРеквизит("ВидРасч",ВР);
жрнЗарплата.УстановитьРеквизит("ДатаНачала",ДатаНачала);
жрнЗарплата.УстановитьРеквизит("ДатаОкончания",ДатаОкончания);
жрнЗарплата.УстановитьРеквизит("Сторно",0);
жрнЗарплата.УстановитьРеквизит("Рассчитана",1);
жрнЗарплата.УстановитьРеквизит("Исправлена",1);
жрнЗарплата.УстановитьРеквизит("Фиксирована",0);
жрнЗарплата.УстановитьРеквизит("Результат",Результат);
жрнЗарплата.УстановитьРеквизит("Дни",Дни);
жрнЗарплата.УстановитьРеквизит("Часы",Часы);
жрнЗарплата.УстановитьРеквизит("ДниКал",КалендарныеДни);
жрнЗарплата.УстановитьРеквизит("Подразделение",Подразделение);
жрнЗарплата.УстановитьРеквизит("ВидПлатежа",ВидПлатежа);
жрнЗарплата.УстановитьРеквизит("НомерДок",НомерДокумента);
жрнЗарплата.УстановитьРеквизит("ДатаДок",ДатаДокумента);
   
Попытка
       жрнЗарплата.Записать();
Исключение  
       Сообщить("Не получилось!");
   Возврат;
КонецПопытки;    
   
жрнЗарплата.УстановитьТекущийПериод(СтарыйПериод,0);
   
ЗафиксироватьТранзакцию();

Но не получается, т.к. выдает вот такие сообщения:
Невозможно предустановить реквизит для записи: Документ
Невозможно предустановить реквизит для записи: РодительскийДокумент
Невозможно предустановить реквизит для записи: Объект
Невозможно предустановить реквизит для записи: ВидРасч
Невозможно предустановить реквизит для записи: ДатаНачала
Невозможно предустановить реквизит для записи: ДатаОкончания
1 ale-sarin
 
15.03.13
13:29
Может сначала жрнЗарплата.УстановитьТекущийПериод(жрнЗарплата.ПериодПоДате(ТДата),0);
А потом уже Новая()?
2 Валентинка
 
15.03.13
13:31
хм.. сейчас попробую
3 Валентинка
 
15.03.13
13:32
сработало!!!! ну надо же )))) Спасибо тебе большое
4 ale-sarin
 
15.03.13
13:37
(3) ОК. Пожалуйста)