1С8 Бухгалтерия Предприятия 3 » История » Версия 5
Версия 4 (Всеволод Дорофеев, 03.07.2019 19:54) → Версия 5/7 (Всеволод Дорофеев, 11.10.2021 10:44)
h1. 1С8 Бухгалтерия Предприятия 3
h3. "Новости законодательства от 1С":http://v8.1c.ru/lawmonitor/lawchanges.jsp
h3. Обновление КБК 2017
Справочники - Налоги и взносы - кнопка "Еще" - Обновить из классификатора 2017
Доступно с релиза 1С:Бухгалтерия 8.3.0.34
h3. Получение контактной информации Контрагента
<pre>
КонтактноеЛицо = Справочники.КонтактныеЛица.КонтактноеЛицоПоУмолчанию(СведенияОДокументе.Поставщик);
Если ЗначениеЗаполнено(КонтактноеЛицо) Тогда
РеквизитыКонтактногоЛица = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(
КонтактноеЛицо, "Фамилия, Имя, Отчество, Должность");
РуководительКонтрагента = ОбщегоНазначенияБПВызовСервера.ПолучитьФамилиюИмяОтчество(
РеквизитыКонтактногоЛица.Фамилия,
РеквизитыКонтактногоЛица.Имя,
РеквизитыКонтактногоЛица.Отчество,
истина);
ДолжностьРуководителяКонтрагента = РеквизитыКонтактногоЛица.Должность;
КонецЕсли;
</pre>
h3. БСП. ФИО в родительном падеже
<pre>
//ДанныеОтветственныхЛиц = ЗарплатаКадры.ОтветственныеЛицаОрганизации(Заказчик, "Руководитель,ДолжностьРуководителя,ГлавныйБухгалтер", РезультатШапкаДокументов.Дата);
СтруктураОтветственных = ОтветственныеЛицаСервер.ПолучитьОтветственныеЛицаОрганизации(Заказчик, РезультатШапкаДокументов.Дата);
Запрос.УстановитьПараметр("Руководитель", СтруктураОтветственных.Руководитель);
Запрос.УстановитьПараметр("ДолжностьРуководителя", СтруктураОтветственных.РуководительДолжность);
Запрос.УстановитьПараметр("ГлавныйБухгалтер", СтруктураОтветственных.ГлавныйБухгалтер);
ФИОРуководителяЗаказчикаВРодительномПадеже = СклонениеПредставленийОбъектов.ПросклонятьФИО(СтруктураОтветственных.Руководитель.ФИО, 2,, 1);
</pre>
h3. "Новости законодательства от 1С":http://v8.1c.ru/lawmonitor/lawchanges.jsp
h3. Обновление КБК 2017
Справочники - Налоги и взносы - кнопка "Еще" - Обновить из классификатора 2017
Доступно с релиза 1С:Бухгалтерия 8.3.0.34
h3. Получение контактной информации Контрагента
<pre>
КонтактноеЛицо = Справочники.КонтактныеЛица.КонтактноеЛицоПоУмолчанию(СведенияОДокументе.Поставщик);
Если ЗначениеЗаполнено(КонтактноеЛицо) Тогда
РеквизитыКонтактногоЛица = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(
КонтактноеЛицо, "Фамилия, Имя, Отчество, Должность");
РуководительКонтрагента = ОбщегоНазначенияБПВызовСервера.ПолучитьФамилиюИмяОтчество(
РеквизитыКонтактногоЛица.Фамилия,
РеквизитыКонтактногоЛица.Имя,
РеквизитыКонтактногоЛица.Отчество,
истина);
ДолжностьРуководителяКонтрагента = РеквизитыКонтактногоЛица.Должность;
КонецЕсли;
</pre>
h3. БСП. ФИО в родительном падеже
<pre>
//ДанныеОтветственныхЛиц = ЗарплатаКадры.ОтветственныеЛицаОрганизации(Заказчик, "Руководитель,ДолжностьРуководителя,ГлавныйБухгалтер", РезультатШапкаДокументов.Дата);
СтруктураОтветственных = ОтветственныеЛицаСервер.ПолучитьОтветственныеЛицаОрганизации(Заказчик, РезультатШапкаДокументов.Дата);
Запрос.УстановитьПараметр("Руководитель", СтруктураОтветственных.Руководитель);
Запрос.УстановитьПараметр("ДолжностьРуководителя", СтруктураОтветственных.РуководительДолжность);
Запрос.УстановитьПараметр("ГлавныйБухгалтер", СтруктураОтветственных.ГлавныйБухгалтер);
ФИОРуководителяЗаказчикаВРодительномПадеже = СклонениеПредставленийОбъектов.ПросклонятьФИО(СтруктураОтветственных.Руководитель.ФИО, 2,, 1);
</pre>