"> КонецЕсли;
СпрСотр = СоздатьОб'ект ("Справочник.Сотрудники");
Звільнені = СпрСотр.ТекущійЕлемент ();
СпрСотр.ИспользоватьРодителя (Звільнені);
СпрСотр.НайтіЕлемент (Співробітник);
СпрСотр.Родітель = Звільнені;
СпрСотр.ДатаУвольненія = ДатаДок;
СпрСотр.Запісать ();
КонецПроцедури
Документ В«РегистрационныеДанныеФирмыВ» модуль форми:
Процедура відкриття ()
ПріЗапісіПерепроводіть (1);
НазваніеФірми = Константа.НазваніеФірми;
ІмяДіректора = Константа.ІмяДіректора;
ІмяГлавБуха = Константа.ІмяГлавБуха;
ІмяСпецаПоКадрам = Константа.СпецПоКадрам;
АдресФірми = Константа.АдресФірми;
Телефон = Константа.Телефон;
КонецПроцедури
Документ В«РегистрационныеДанныеФирмыВ» модуль документа:
Процедура ОбработкаПроведенія ()
Константа.ІмяДіректора = ІмяДіректора;
Константа.НазваніеФірми = НазваніеФірми;
Константа.ІмяГлавБуха = ІмяГлавБуха;
Константа.СпецПоКадрам = ІмяСпецаПоКадрам;
Константа.АдресФірми = АдресФірми;
Константа.Телефон = Телефон;
КонецПроцедури
Документ В«ПриобретениеОсновныхСредствВ» модуль форми:
Процедура відкриття ()
ПріЗапісіПерепроводіть (1);
КонецПроцедури
Процедура ПріЗапісі ()
Якщо ПустоеЗначеніе (Назва) = 1 Тоді
Попередження ("Не заповнено поле: Назва");
СтатусВозврата (0);
Повернення;
КонецЕсли;
Якщо ПустоеЗначеніе (ПеріодІсчісленія) = 1 Тоді
Попередження ("Не заповнено поле: Період обчислення");
СтатусВозврата (0);
Повернення;
КонецЕсли;
Якщо ПустоеЗначеніе (Кількість) = 1 Тоді
Попередження ("Не заповнено поле: Кількість");
СтатусВозврата (0);
Повернення;
КонецЕсли;
Якщо ПустоеЗначеніе (ЕдІзмеренія) = 1 Тоді
Попередження ("Не заповнено поле: Од. виміру");
СтатусВозврата (0);
Повернення;
КонецЕсли;
Як...
