Добрый день. Обычная база, всегда обновляю, НО после штатного обновления программист 1с, что то добавляет, так как организация не совсем обычная.
Сейчас программист не доступен. Может кто подскажет как он это делает?
Есть файлик "Общий модуль УчетНДФЛ_ Модуль.txt"
в файлике вот такое (первые 2 странички) как это добавить в базу
#Область ПрограммныйИнтерфейс
// Процедура переопределяет свойства объекта, с которыми он будет отображен в форме Отчетность.
// Параметры:
// СвойстваОбъектов - ТаблицаЗначений - (см. РегламентированнаяОтчетностьПереопределяемый.ОпределитьСвойстваОбъектовДляОтображенииВФормеОтчетность)
Процедура ОпределитьСвойстваОбъектовДляОтображенииВФормеОтчетность(СвойстваОбъектов) Экспорт
Документ2НДФЛ = Новый Массив;
ДокументыЗаявленияНаЗачетАвансов = Новый Массив;
СоответствиеСсылокСвойствам = Новый Соответствие;
Для Каждого ЗапрашиваемыеДанные Из СвойстваОбъектов Цикл
Если ТипЗнч(ЗапрашиваемыеДанные.Ссылка) = Тип("ДокументСсылка.СправкиНДФЛДляПередачиВНалоговыйОрган") Тогда
Документ2НДФЛ.Добавить(ЗапрашиваемыеДанные.Ссылка);
СоответствиеСсылокСвойствам.Вставить(ЗапрашиваемыеДанные.Ссылка, ЗапрашиваемыеДанные);
ИначеЕсли ТипЗнч(ЗапрашиваемыеДанные.Ссылка) = Тип("ДокументСсылка.ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ") Тогда
ДокументыЗаявленияНаЗачетАвансов.Добавить(ЗапрашиваемыеДанные.Ссылка);
СоответствиеСсылокСвойствам.Вставить(ЗапрашиваемыеДанные.Ссылка, ЗапрашиваемыеДанные);
КонецЕсли;
КонецЦикла;
Если Документ2НДФЛ.Количество() = 0
И ДокументыЗаявленияНаЗачетАвансов.Количество() = 0 Тогда
Возврат;
КонецЕсли;
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("Документ2НДФЛ", Документ2НДФЛ);
Запрос.УстановитьПараметр("ДокументыЗаявленияНаЗачетАвансов", ДокументыЗаявленияНаЗачетАвансов);
Запрос.Текст =
"ВЫБРАТЬ
| СправкиНДФЛДляПередачиВНалоговыйОрган.Ссылка КАК Ссылка,
| СправкиНДФЛДляПередачиВНалоговыйОрган.Дата КАК ДатаСоздания,
| СправкиНДФЛДляПередачиВНалоговыйОрган.Организация КАК Организация,
| СправкиНДФЛДляПередачиВНалоговыйОрган.РегистрацияВНалоговомОргане.Код КАК КодКонтролирующегоОргана,
| СправкиНДФЛДляПередачиВНалоговыйОрган.ПометкаУдаления КАК ПометкаУдаления,
| НАЧАЛОПЕРИОДА(СправкиНДФЛДляПередачиВНалоговыйОрган.НалоговыйПериодДата, ГОД) КАК ДатаНачала,
| КОНЕЦПЕРИОДА(СправкиНДФЛДляПередачиВНалоговыйОрган.НалоговыйПериодДата, ГОД) КАК ДатаОкончания,
| СправкиНДФЛДляПередачиВНалоговыйОрган.Комментарий КАК Комментарий,
| СправкиНДФЛДляПередачиВНалоговыйОрган.НомерКорректировки КАК ВариантОтчета
|ИЗ
| Документ.СправкиНДФЛДляПередачиВНалоговыйОрган КАК СправкиНДФЛДляПередачиВНалоговыйОрган
|ГДЕ
| СправкиНДФЛДляПередачиВНалоговыйОрган.Ссылка В(&Документ2НДФЛ)
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Ссылка,
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Дата,
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Организация,
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.КодИФНС,
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.ПометкаУдаления,
| НАЧАЛОПЕРИОДА(ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.НалоговыйПериодДата, ГОД),
| КОНЕЦПЕРИОДА(ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.НалоговыйПериодДата, ГОД),
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Комментарий,
| ""-""
|ИЗ
| Документ.ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ КАК ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ
|ГДЕ
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Ссылка В(&ДокументыЗаявленияНаЗачетАвансов)";
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
ЗапрашиваемыеДанные = СоответствиеСсылокСвойствам[Выборка.Ссылка];
ЗаполнитьЗначенияСвойств(ЗапрашиваемыеДанные, Выборка);
КонецЦикла;
КонецПроцедуры
// Определяет свойства, касающиеся общих свойств объектов конфигураций-потребителей для отображения в форме Отчетность
// и возможности создания новый объектов из формы Отчетность.
//
// Параметры:
// ТаблицаОписания - ТаблицаЗначений - (см. РегламентированнаяОтчетностьПереопределяемый.ОпределитьТаблицуОписанияОбъектовРегламентированнойОтчетности)
//
Процедура ОпределитьТаблицуОписанияОбъектовРегламентированнойОтчетности(ТаблицаОписания) Экспорт
ОписаниеДокументаОтчетности = ТаблицаОписания.Добавить();
ОписаниеДокументаОтчетности.ТипОбъекта = Тип("ДокументСсылка.СправкиНДФЛДляПередачиВНалоговыйОрган");
ОписаниеДокументаОтчетности.ВидКонтролирующегоОргана = Перечисления.ТипыКонтролирующихОрганов.ФНС;
ОписаниеДокументаОтчетности.ГруппаВДереве = НСтр("ru = 'Отчетность по физлицам'");
ОписаниеДокументаОтчетности.ВидДокумента = Перечисления.СтраницыЖурналаОтчетность.Отчеты;
ОписаниеДокументаОтчетности.НеОтправляетсяВКонтролирующийОрган = Ложь;
ОписаниеДокументаОтчетности.ЯвляетсяАктуальным = Истина;
ОписаниеДокументаОтчетности.ИмяОсновногоМакетаДляПечати = "Форма2НДФЛ";
ОписаниеДокументаОтчетности.ВидЭлектронногоПредставления = Справочники.ВидыОтправляемыхДокументов.СправкаПоНДФЛВНалоговыйОрган;
ОписаниеДокументаОтчетности = ТаблицаОписания.Добавить();
ОписаниеДокументаОтчетности.ТипОбъекта = Тип("ДокументСсылка.ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ");
ОписаниеДокументаОтчетности.ВидКонтролирующегоОргана = Перечисления.ТипыКонтролирующихОрганов.ФНС;
ОписаниеДокументаОтчетности.ГруппаВДереве = НСтр("ru = 'Отчетность по физлицам'");
ОписаниеДокументаОтчетности.ВидДокумента = Перечисления.СтраницыЖурналаОтчетность.Отчеты;
ОписаниеДокументаОтчетности.НеОтправляетсяВКонтролирующийОрган = Ложь;
ОписаниеДокументаОтчетности.ЯвляетсяАктуальным = Истина;
ОписаниеДокументаОтчетности.ИмяОсновногоМакетаДляПечати = "Заявление";
ОписаниеДокументаОтчетности.ВидЭлектронногоПредставления = Справочники.ВидыОтправляемыхДокументов.ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ;
Сейчас программист не доступен. Может кто подскажет как он это делает?
Есть файлик "Общий модуль УчетНДФЛ_ Модуль.txt"
в файлике вот такое (первые 2 странички) как это добавить в базу
#Область ПрограммныйИнтерфейс
// Процедура переопределяет свойства объекта, с которыми он будет отображен в форме Отчетность.
// Параметры:
// СвойстваОбъектов - ТаблицаЗначений - (см. РегламентированнаяОтчетностьПереопределяемый.ОпределитьСвойстваОбъектовДляОтображенииВФормеОтчетность)
Процедура ОпределитьСвойстваОбъектовДляОтображенииВФормеОтчетность(СвойстваОбъектов) Экспорт
Документ2НДФЛ = Новый Массив;
ДокументыЗаявленияНаЗачетАвансов = Новый Массив;
СоответствиеСсылокСвойствам = Новый Соответствие;
Для Каждого ЗапрашиваемыеДанные Из СвойстваОбъектов Цикл
Если ТипЗнч(ЗапрашиваемыеДанные.Ссылка) = Тип("ДокументСсылка.СправкиНДФЛДляПередачиВНалоговыйОрган") Тогда
Документ2НДФЛ.Добавить(ЗапрашиваемыеДанные.Ссылка);
СоответствиеСсылокСвойствам.Вставить(ЗапрашиваемыеДанные.Ссылка, ЗапрашиваемыеДанные);
ИначеЕсли ТипЗнч(ЗапрашиваемыеДанные.Ссылка) = Тип("ДокументСсылка.ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ") Тогда
ДокументыЗаявленияНаЗачетАвансов.Добавить(ЗапрашиваемыеДанные.Ссылка);
СоответствиеСсылокСвойствам.Вставить(ЗапрашиваемыеДанные.Ссылка, ЗапрашиваемыеДанные);
КонецЕсли;
КонецЦикла;
Если Документ2НДФЛ.Количество() = 0
И ДокументыЗаявленияНаЗачетАвансов.Количество() = 0 Тогда
Возврат;
КонецЕсли;
Запрос = Новый Запрос;
Запрос.УстановитьПараметр("Документ2НДФЛ", Документ2НДФЛ);
Запрос.УстановитьПараметр("ДокументыЗаявленияНаЗачетАвансов", ДокументыЗаявленияНаЗачетАвансов);
Запрос.Текст =
"ВЫБРАТЬ
| СправкиНДФЛДляПередачиВНалоговыйОрган.Ссылка КАК Ссылка,
| СправкиНДФЛДляПередачиВНалоговыйОрган.Дата КАК ДатаСоздания,
| СправкиНДФЛДляПередачиВНалоговыйОрган.Организация КАК Организация,
| СправкиНДФЛДляПередачиВНалоговыйОрган.РегистрацияВНалоговомОргане.Код КАК КодКонтролирующегоОргана,
| СправкиНДФЛДляПередачиВНалоговыйОрган.ПометкаУдаления КАК ПометкаУдаления,
| НАЧАЛОПЕРИОДА(СправкиНДФЛДляПередачиВНалоговыйОрган.НалоговыйПериодДата, ГОД) КАК ДатаНачала,
| КОНЕЦПЕРИОДА(СправкиНДФЛДляПередачиВНалоговыйОрган.НалоговыйПериодДата, ГОД) КАК ДатаОкончания,
| СправкиНДФЛДляПередачиВНалоговыйОрган.Комментарий КАК Комментарий,
| СправкиНДФЛДляПередачиВНалоговыйОрган.НомерКорректировки КАК ВариантОтчета
|ИЗ
| Документ.СправкиНДФЛДляПередачиВНалоговыйОрган КАК СправкиНДФЛДляПередачиВНалоговыйОрган
|ГДЕ
| СправкиНДФЛДляПередачиВНалоговыйОрган.Ссылка В(&Документ2НДФЛ)
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Ссылка,
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Дата,
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Организация,
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.КодИФНС,
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.ПометкаУдаления,
| НАЧАЛОПЕРИОДА(ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.НалоговыйПериодДата, ГОД),
| КОНЕЦПЕРИОДА(ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.НалоговыйПериодДата, ГОД),
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Комментарий,
| ""-""
|ИЗ
| Документ.ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ КАК ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ
|ГДЕ
| ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ.Ссылка В(&ДокументыЗаявленияНаЗачетАвансов)";
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
ЗапрашиваемыеДанные = СоответствиеСсылокСвойствам[Выборка.Ссылка];
ЗаполнитьЗначенияСвойств(ЗапрашиваемыеДанные, Выборка);
КонецЦикла;
КонецПроцедуры
// Определяет свойства, касающиеся общих свойств объектов конфигураций-потребителей для отображения в форме Отчетность
// и возможности создания новый объектов из формы Отчетность.
//
// Параметры:
// ТаблицаОписания - ТаблицаЗначений - (см. РегламентированнаяОтчетностьПереопределяемый.ОпределитьТаблицуОписанияОбъектовРегламентированнойОтчетности)
//
Процедура ОпределитьТаблицуОписанияОбъектовРегламентированнойОтчетности(ТаблицаОписания) Экспорт
ОписаниеДокументаОтчетности = ТаблицаОписания.Добавить();
ОписаниеДокументаОтчетности.ТипОбъекта = Тип("ДокументСсылка.СправкиНДФЛДляПередачиВНалоговыйОрган");
ОписаниеДокументаОтчетности.ВидКонтролирующегоОргана = Перечисления.ТипыКонтролирующихОрганов.ФНС;
ОписаниеДокументаОтчетности.ГруппаВДереве = НСтр("ru = 'Отчетность по физлицам'");
ОписаниеДокументаОтчетности.ВидДокумента = Перечисления.СтраницыЖурналаОтчетность.Отчеты;
ОписаниеДокументаОтчетности.НеОтправляетсяВКонтролирующийОрган = Ложь;
ОписаниеДокументаОтчетности.ЯвляетсяАктуальным = Истина;
ОписаниеДокументаОтчетности.ИмяОсновногоМакетаДляПечати = "Форма2НДФЛ";
ОписаниеДокументаОтчетности.ВидЭлектронногоПредставления = Справочники.ВидыОтправляемыхДокументов.СправкаПоНДФЛВНалоговыйОрган;
ОписаниеДокументаОтчетности = ТаблицаОписания.Добавить();
ОписаниеДокументаОтчетности.ТипОбъекта = Тип("ДокументСсылка.ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ");
ОписаниеДокументаОтчетности.ВидКонтролирующегоОргана = Перечисления.ТипыКонтролирующихОрганов.ФНС;
ОписаниеДокументаОтчетности.ГруппаВДереве = НСтр("ru = 'Отчетность по физлицам'");
ОписаниеДокументаОтчетности.ВидДокумента = Перечисления.СтраницыЖурналаОтчетность.Отчеты;
ОписаниеДокументаОтчетности.НеОтправляетсяВКонтролирующийОрган = Ложь;
ОписаниеДокументаОтчетности.ЯвляетсяАктуальным = Истина;
ОписаниеДокументаОтчетности.ИмяОсновногоМакетаДляПечати = "Заявление";
ОписаниеДокументаОтчетности.ВидЭлектронногоПредставления = Справочники.ВидыОтправляемыхДокументов.ЗаявлениеОПодтвержденииПраваНаЗачетАвансовПоНДФЛ;