diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/AccumulationRegisters/ПС_ОборотыРодительскойПлатыПрошлыхПериодов/ПС_ОборотыРодительскойПлатыПрошлыхПериодов.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/AccumulationRegisters/ПС_ОборотыРодительскойПлатыПрошлыхПериодов/ПС_ОборотыРодительскойПлатыПрошлыхПериодов.mdo deleted file mode 100644 index f986892..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/AccumulationRegisters/ПС_ОборотыРодительскойПлатыПрошлыхПериодов/ПС_ОборотыРодительскойПлатыПрошлыхПериодов.mdo +++ /dev/null @@ -1,157 +0,0 @@ - - - - - - - - - - - ПС_ОборотыРодительскойПлатыПрошлыхПериодов - - ru - Обороты родительской платы прошлых периодов - - true - Turnovers - - Use - Active - - Use - - - - - Use - LineNumber - - Use - - - - - Use - Recorder - - Use - - - - - Use - Period - - ShowError - Use - - - - Managed - true - - СуммаОборотДт - - ru - Сумма оборот ДТ - - - Number - - 15 - 2 - - - - - Use - - - СуммаОборотКт - - ru - Сумма оборот КТ - - - Number - - 15 - 2 - - - - - Use - - - Организация - - ru - Организация - - - CatalogRef.Организации - - - - Use - true - - - Контрагент - - ru - Контрагент - - - CatalogRef.Контрагенты - - - - Use - true - - - Договор - - ru - Договор - - - CatalogRef.Договоры - - - - Use - true - - - КФО - - ru - КФО - - - EnumRef.КВД - - - - Use - true - - - КПС - - ru - КПС - - - CatalogRef.КлассификационныеПризнакиСчетов - - - - Use - true - - diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_РаботаСКонтрагентами/Module.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_РаботаСКонтрагентами/Module.bsl index 8bd2655..8ad524a 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_РаботаСКонтрагентами/Module.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_РаботаСКонтрагентами/Module.bsl @@ -18,6 +18,8 @@ // контрагента / найдено несколько). При этом пользователю // выводится сообщение с описанием причины. // +#Область ПрограммныйИнтерфейс + Функция КонтрагентПоОрганизации(Организация, ИмяПоляПодсказки = "") Экспорт ПустойКонтрагент = Справочники.Контрагенты.ПустаяСсылка(); @@ -100,3 +102,5 @@ Возврат КонтрагентПоОрганизации(ОрганизацияЦБ, ИмяПоляПодсказки); КонецФункции + +#КонецОбласти diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_РаботаСКонтрагентами/ПС_РаботаСКонтрагентами.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_РаботаСКонтрагентами/ПС_РаботаСКонтрагентами.mdo index aa3bc5e..896612e 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_РаботаСКонтрагентами/ПС_РаботаСКонтрагентами.mdo +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_РаботаСКонтрагентами/ПС_РаботаСКонтрагентами.mdo @@ -6,4 +6,6 @@ ПС Работа с контрагентами true + true + true diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_УчетРодительскойПлаты/Module.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_УчетРодительскойПлаты/Module.bsl new file mode 100644 index 0000000..6397413 --- /dev/null +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_УчетРодительскойПлаты/Module.bsl @@ -0,0 +1,436 @@ +// ПС_УчетРодительскойПлаты: общая логика учёта родительской платы +// для документов ПС_ПередачаЗадолженностиВЦБ и ПС_ПринятиеЗадолженностиОтУчреждения. +#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда + +#Область ПрограммныйИнтерфейс + +// Заполняет КФО документа и КПС строк табличной части "Задолженность" реквизитами учёта, +// определёнными по проводкам документа-источника. +// +// КПС берётся со стороны счёта расчётов по доходам (205.31) - он переносится вместе +// с задолженностью, поэтому одинаков для дебета и кредита проводки передачи. +// +// Параметры: +// ДокументОбъект - ДокументОбъект.ПС_ПередачаЗадолженностиВЦБ, ДокументОбъект.ПС_ПринятиеЗадолженностиОтУчреждения - документ, реквизиты учёта которого заполняются. +// ДокументИсточник - ДокументСсылка.НачислениеРодительскойПлаты, ДокументСсылка.ПС_ПередачаЗадолженностиВЦБ - проведённый документ, проводки которого используются как источник данных. +// +// Возвращаемое значение: +// Булево - Истина, если реквизиты заполнены; Ложь, если у документа-источника нет проводок по счёту расчётов по доходам. +// +Функция ЗаполнитьРеквизитыУчетаПоПроводкам(ДокументОбъект, ДокументИсточник) Экспорт + + Если НЕ ЗначениеЗаполнено(ДокументИсточник) Тогда + Возврат Ложь; + КонецЕсли; + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ ПЕРВЫЕ 1 + | Проводки.КФО КАК КФО, + | ВЫБОР + | КОГДА Проводки.СчетДт.Код = ""205.31"" + | ТОГДА Проводки.КПСДт + | ИНАЧЕ Проводки.КПСКт + | КОНЕЦ КАК КПС + |ИЗ + | РегистрБухгалтерии.ЖурналПроводокЕПСБУ.ДвиженияССубконто КАК Проводки + |ГДЕ + | Проводки.Регистратор = &ДокументИсточник + | И (Проводки.СчетДт.Код = ""205.31"" + | ИЛИ Проводки.СчетКт.Код = ""205.31"") + | + |УПОРЯДОЧИТЬ ПО + | Проводки.НомерСтроки"; + Запрос.УстановитьПараметр("ДокументИсточник", ДокументИсточник); + + Выборка = Запрос.Выполнить().Выбрать(); + Если НЕ Выборка.Следующий() Тогда + Возврат Ложь; + КонецЕсли; + + ДокументОбъект.КФО = Выборка.КФО; + Для Каждого СтрокаЗадолженности Из ДокументОбъект.Задолженность Цикл + СтрокаЗадолженности.КПС = Выборка.КПС; + КонецЦикла; + + Возврат Истина; + +КонецФункции + +// Возвращает КЭК, определяющий экономический смысл операции по счёту 304.04 +// ("Внутриведомственные расчеты"): для доходной операции это КЭК счёта 401.10 +// проводок документа-основания. Если проводок по 401.10 в основании нет +// (например, основание - документ передачи задолженности), берётся КЭК счёта 304.04. +// Автоматически такой КЭК не определяется - соответствующих сопоставлений в справочниках нет. +// +// Параметры: +// ДокументИсточник - ДокументСсылка.НачислениеРодительскойПлаты, ДокументСсылка.ПС_ПередачаЗадолженностиВЦБ - проведённый документ, проводки которого используются как источник данных. +// +// Возвращаемое значение: +// СправочникСсылка.КОСГУ - КЭК счёта 401.10 (или 304.04) проводок документа-источника; пустая ссылка, если проводок нет. +// +Функция КЭКПоЭкономическомуСмыслу(ДокументИсточник) Экспорт + + Если НЕ ЗначениеЗаполнено(ДокументИсточник) Тогда + Возврат Справочники.КОСГУ.ПустаяСсылка(); + КонецЕсли; + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ ПЕРВЫЕ 1 + | ВЫБОР + | КОГДА Проводки.СчетДт.Код = ""401.10"" ИЛИ Проводки.СчетКт.Код = ""401.10"" + | ТОГДА 0 + | ИНАЧЕ 1 + | КОНЕЦ КАК Приоритет, + | ВЫБОР + | КОГДА Проводки.СчетДт.Код В (""401.10"", ""304.04"") + | ТОГДА Проводки.КЭКДт + | ИНАЧЕ Проводки.КЭККт + | КОНЕЦ КАК КЭК + |ИЗ + | РегистрБухгалтерии.ЖурналПроводокЕПСБУ.ДвиженияССубконто КАК Проводки + |ГДЕ + | Проводки.Регистратор = &ДокументИсточник + | И (Проводки.СчетДт.Код В (""401.10"", ""304.04"") + | ИЛИ Проводки.СчетКт.Код В (""401.10"", ""304.04"")) + | + |УПОРЯДОЧИТЬ ПО + | Приоритет, + | Проводки.НомерСтроки"; + Запрос.УстановитьПараметр("ДокументИсточник", ДокументИсточник); + + Выборка = Запрос.Выполнить().Выбрать(); + Если НЕ Выборка.Следующий() Тогда + Возврат Справочники.КОСГУ.ПустаяСсылка(); + КонецЕсли; + + Возврат Выборка.КЭК; + +КонецФункции + +// Формирует печатную форму извещения (ф. 0504805, ред. 103н) по документу подсистемы. +// +// Вёрстка и набор областей повторяют типовую печатную форму документа ИзвещениеИсходящее. +// Заполняется та сторона, от которой печатается извещение: для передачи задолженности - +// отправитель (учреждение), для принятия - получатель (централизованная бухгалтерия). +// Суммы и счета берутся из проводок документа, поэтому печатается только проведённый документ. +// +// Параметры: +// ДокументСсылка - ДокументСсылка.ПС_ПередачаЗадолженностиВЦБ, ДокументСсылка.ПС_ПринятиеЗадолженностиОтУчреждения - печатаемый документ. +// +// Возвращаемое значение: +// ТабличныйДокумент - печатная форма; пустой табличный документ, если документ не проведён или макет не найден. +// +Функция ПечатьИзвещения0504805(ДокументСсылка) Экспорт + + ТабличныйДокумент = Новый ТабличныйДокумент; + ТабличныйДокумент.АвтоМасштаб = Истина; + + ДокументОбъект = ДокументСсылка.ПолучитьОбъект(); + Если ДокументОбъект = Неопределено Тогда + Возврат ТабличныйДокумент; + КонецЕсли; + + Если ТипЗнч(ДокументСсылка) = Тип("ДокументСсылка.ПС_ПередачаЗадолженностиВЦБ") Тогда + ТабличныйДокумент.КлючПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПС_ПередачаЗадолженностиВЦБ_Извещение0504805"; + Макет = Документы.ПС_ПередачаЗадолженностиВЦБ.ПолучитьМакет("ПФ_MXL_Извещение0504805_103н_ПС_РП"); + СторонаПечати = "Отправитель"; + Отправитель = ДокументОбъект.Организация; + Получатель = ДокументОбъект.ЦБ; + Пояснение = "Передача задолженности по родительской плате за " + + Формат(ДокументОбъект.Период, "ДФ=MMMM yyyy") + + ". Основание: " + Строка(ДокументОбъект.ДокументНачисления) + "."; + Иначе + ТабличныйДокумент.КлючПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПС_ПринятиеЗадолженности_Извещение0504805"; + Макет = Документы.ПС_ПринятиеЗадолженностиОтУчреждения.ПолучитьМакет("ПФ_MXL_Извещение0504805_103н_ПС_РП_Получатель"); + СторонаПечати = "Получатель"; + Отправитель = ДокументОбъект.Учреждение; + Получатель = ДокументОбъект.Организация; + Пояснение = "Принятие задолженности по родительской плате за " + + Формат(ДокументОбъект.Период, "ДФ=MMMM yyyy") + + ". Основание: " + Строка(ДокументОбъект.ДокументПередачи) + "."; + КонецЕсли; + + Если Макет = Неопределено ИЛИ НЕ ДокументОбъект.Проведен Тогда + Возврат ТабличныйДокумент; + КонецЕсли; + + ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок"); + ОбластьЗаголовок.Параметры.Номер = РегистрыСведений.НастройкиПечатиПрефиксаНомера + .ПолучитьНомерДляПечатиПоСсылкеИдентификаторуДокумента(ДокументСсылка, ДокументОбъект.Номер); + ОбластьЗаголовок.Параметры.Дата = ДокументОбъект.Дата; + ЗаполнитьРеквизитыСтороны(ОбластьЗаголовок.Параметры, "Отправитель", Отправитель); + ЗаполнитьРеквизитыСтороны(ОбластьЗаголовок.Параметры, "Получатель", Получатель); + ТабличныйДокумент.Вывести(ОбластьЗаголовок); + + ОбластьПояснение = Макет.ПолучитьОбласть("ПояснениеМБТ"); + ОбластьПояснение.Параметры.ПояснениеМБТ = Пояснение; + ТабличныйДокумент.Вывести(ОбластьПояснение); + + ТабличныйДокумент.Вывести(Макет.ПолучитьОбласть("Шапка")); + + Проводки = ПроводкиИзвещения(ДокументСсылка); + ИтогоСумма = 0; + + Для Каждого Проводка Из Проводки Цикл + ОбластьСтрока = Макет.ПолучитьОбласть("Строка"); + ОбластьСтрока.Параметры.пСодержание = Проводка.Содержание; + ЗаполнитьОборотыСтроки(ОбластьСтрока.Параметры, Проводка, СторонаПечати); + ТабличныйДокумент.Вывести(ОбластьСтрока); + ИтогоСумма = ИтогоСумма + Проводка.Сумма; + КонецЦикла; + + ОбластьИтого = Макет.ПолучитьОбласть("Итого"); + ОбластьИтого.Параметры["пИтогоСумма" + СторонаПечати] = ИтогоСумма; + ТабличныйДокумент.Вывести(ОбластьИтого); + + ТабличныйДокумент.Вывести(Макет.ПолучитьОбласть("Верх")); + Для Каждого Оборот Из СвернутьОбороты(Проводки) Цикл + ОбластьОборот = Макет.ПолучитьОбласть("Строка1"); + ЗаполнитьОборотыСтроки(ОбластьОборот.Параметры, Оборот, СторонаПечати); + ТабличныйДокумент.Вывести(ОбластьОборот); + КонецЦикла; + ТабличныйДокумент.Вывести(Макет.ПолучитьОбласть("Низ")); + + ОбластьПодвал = Макет.ПолучитьОбласть("Подвал"); + ЗаполнитьПодписиСтороны(ОбластьПодвал.Параметры, СторонаПечати, ДокументОбъект); + ТабличныйДокумент.Вывести(ОбластьПодвал); + + УправлениеПечатью.ЗадатьОбластьПечатиДокумента(ТабличныйДокумент, 1, Новый Соответствие, ДокументСсылка); + + Возврат ТабличныйДокумент; + +КонецФункции + +#КонецОбласти + +#Область СлужебныеПроцедурыИФункции + +// Заполняет реквизиты стороны извещения (отправителя или получателя) для области "Заголовок". +// +// Параметры: +// Параметры - Структура - параметры области макета. +// Суффикс - Строка - "Отправитель" или "Получатель". +// Сторона - СправочникСсылка.Организации, СправочникСсылка.Контрагенты - сторона извещения. +// +Процедура ЗаполнитьРеквизитыСтороны(Параметры, Суффикс, Сторона) + + Если НЕ ЗначениеЗаполнено(Сторона) Тогда + Возврат; + КонецЕсли; + + Наименование = ""; + КодОКПО = ""; + КодГлавы = ""; + ИНН = ""; + КПП = ""; + + Если ТипЗнч(Сторона) = Тип("СправочникСсылка.Организации") Тогда + Реквизиты = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Сторона, + "НаименованиеПолное, КодОКПО, ИНН, КПП, КодПоППП"); + Наименование = Реквизиты.НаименованиеПолное; + КодОКПО = Реквизиты.КодОКПО; + КодГлавы = КодГлавыПоБК(Реквизиты.КодПоППП); + ИНН = Реквизиты.ИНН; + КПП = Реквизиты.КПП; + Иначе + РеквизитыКонтрагента = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(Сторона, + "ИНН, КПП, ЮридическоеФизическоеЛицо"); + ИНН = РеквизитыКонтрагента.ИНН; + КПП = РеквизитыКонтрагента.КПП; + ЮрЛицо = РеквизитыКонтрагента.ЮридическоеФизическоеЛицо; + Если ЗначениеЗаполнено(ЮрЛицо) Тогда + РеквизитыЮрЛица = ОбщегоНазначения.ЗначенияРеквизитовОбъекта(ЮрЛицо, + "НаименованиеПолное, КодОКПО, КодПоППП"); + Наименование = РеквизитыЮрЛица.НаименованиеПолное; + КодОКПО = РеквизитыЮрЛица.КодОКПО; + КодГлавы = КодГлавыПоБК(РеквизитыЮрЛица.КодПоППП); + Иначе + Наименование = Строка(Сторона); + КонецЕсли; + КонецЕсли; + + Параметры["пНаименование" + Суффикс] = Наименование; + Параметры["пКодОКПО" + Суффикс] = КодОКПО; + Параметры["пКодГлавы" + Суффикс] = КодГлавы; + Параметры["ИНН" + Суффикс] = ИНН; + Параметры["КПП" + Суффикс] = КПП; + +КонецПроцедуры + +// Возвращает код главы по бюджетной классификации по ссылке на ППП. +// +// Параметры: +// КодПоППП - СправочникСсылка - реквизит "Код по ППП" организации или юридического лица. +// +// Возвращаемое значение: +// Строка +// +Функция КодГлавыПоБК(КодПоППП) + + Если НЕ ЗначениеЗаполнено(КодПоППП) Тогда + Возврат ""; + КонецЕсли; + + Возврат ОбщегоНазначения.ЗначенияРеквизитовОбъекта(КодПоППП, "Код").Код; + +КонецФункции + +// Заполняет счета и сумму проводки для стороны, от которой печатается извещение. +// +// Параметры: +// Параметры - Структура - параметры области макета. +// Проводка - СтрокаТаблицыЗначений - проводка с колонками КПСДт, КФО, СчетДт, КЭКДт, КПСКт, СчетКт, КЭККт, Сумма. +// СторонаПечати - Строка - "Отправитель" или "Получатель". +// +Процедура ЗаполнитьОборотыСтроки(Параметры, Проводка, СторонаПечати) + + Параметры["пСумма" + СторонаПечати] = Проводка.Сумма; + Параметры["пДебетСчет" + СторонаПечати] = УправлениеПечатьюБГУ.ПредставлениеРабочегоСчета( + Проводка.КПСДт, Проводка.КФО, Проводка.СчетДт, Проводка.КЭКДт); + Параметры["пКредитСчет" + СторонаПечати] = УправлениеПечатьюБГУ.ПредставлениеРабочегоСчета( + Проводка.КПСКт, Проводка.КФО, Проводка.СчетКт, Проводка.КЭККт); + +КонецПроцедуры + +// Заполняет подписи руководителя, главного бухгалтера и сведения об исполнителе +// для стороны, от которой печатается извещение. +// +// Параметры: +// Параметры - Структура - параметры области макета. +// СторонаПечати - Строка - "Отправитель" или "Получатель". +// ДокументОбъект - ДокументОбъект - печатаемый документ. +// +Процедура ЗаполнитьПодписиСтороны(Параметры, СторонаПечати, ДокументОбъект) + + Организация = ДокументОбъект.Организация; + + Руководитель = ОтветственноеЛицоОрганизации(Организация, ДокументОбъект.Дата, + Перечисления.ОтветственныеЛицаОрганизаций.Руководитель); + ГлавныйБухгалтер = ОтветственноеЛицоОрганизации(Организация, ДокументОбъект.Дата, + Перечисления.ОтветственныеЛицаОрганизаций.ГлавныйБухгалтер); + + Параметры["пФИОРуководитель" + СторонаПечати] = ФИОСотрудника(Руководитель, ДокументОбъект.Дата); + Параметры["пФИОБухгалтер" + СторонаПечати] = ФИОСотрудника(ГлавныйБухгалтер, ДокументОбъект.Дата); + + ДанныеИсполнителя = УправлениеПечатьюБГУ.СведенияИсполнителяПоОтветственному( + ДокументОбъект.Ответственный, Организация, ДокументОбъект.Дата, Истина); + Параметры["ДолжностьИсполнитель" + СторонаПечати] = ДанныеИсполнителя.ДолжностьНаименование; + Параметры["ФИОИсполнитель" + СторонаПечати] = ДанныеИсполнителя.ФИО; + Параметры["ТелефонИсполнитель" + СторонаПечати] = ДанныеИсполнителя.НомерТелефона; + Параметры["ЭлАдресИсполнитель" + СторонаПечати] = ДанныеИсполнителя.ЭлектроннаяПочта; + +КонецПроцедуры + +// Возвращает ответственное лицо организации на дату. +// +// Параметры: +// Организация - СправочникСсылка.Организации - организация. +// Дата - Дата - дата, на которую определяется ответственное лицо. +// ВидОтветственногоЛица - ПеречислениеСсылка.ОтветственныеЛицаОрганизаций - исполняемая функция. +// +// Возвращаемое значение: +// СправочникСсылка.Сотрудники - ответственное лицо; пустая ссылка, если сведения не заполнены. +// +Функция ОтветственноеЛицоОрганизации(Организация, Дата, ВидОтветственногоЛица) + + Если НЕ ЗначениеЗаполнено(Организация) Тогда + Возврат Справочники.Сотрудники.ПустаяСсылка(); + КонецЕсли; + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ ПЕРВЫЕ 1 + | ОтветственныеЛица.ОтветственноеЛицо КАК ОтветственноеЛицо + |ИЗ + | РегистрСведений.ОтветственныеЛицаОрганизаций.СрезПоследних(&Дата, Организация = &Организация + | И ВидОтветственногоЛица = &ВидОтветственногоЛица) КАК ОтветственныеЛица + | + |УПОРЯДОЧИТЬ ПО + | ОтветственныеЛица.Подразделение"; + Запрос.УстановитьПараметр("Дата", Дата); + Запрос.УстановитьПараметр("Организация", Организация); + Запрос.УстановитьПараметр("ВидОтветственногоЛица", ВидОтветственногоЛица); + + Выборка = Запрос.Выполнить().Выбрать(); + Если Выборка.Следующий() Тогда + Возврат Выборка.ОтветственноеЛицо; + КонецЕсли; + + Возврат Справочники.Сотрудники.ПустаяСсылка(); + +КонецФункции + +// Возвращает фамилию с инициалами сотрудника. +// +// Параметры: +// Сотрудник - СправочникСсылка.Сотрудники - сотрудник. +// Дата - Дата - дата получения периодических сведений о сотруднике. +// +// Возвращаемое значение: +// Строка +// +Функция ФИОСотрудника(Сотрудник, Дата) + + Если НЕ ЗначениеЗаполнено(Сотрудник) Тогда + Возврат ""; + КонецЕсли; + + Возврат Справочники.Сотрудники.ФамилияИО(Сотрудник, Истина, Дата); + +КонецФункции + +// Возвращает проводки документа по данным регистра бухгалтерии. +// +// Параметры: +// ДокументСсылка - ДокументСсылка - печатаемый документ. +// +// Возвращаемое значение: +// ТаблицаЗначений - колонки: СчетДт, КПСДт, КЭКДт, СчетКт, КПСКт, КЭККт, КФО, Сумма, Содержание. +// +Функция ПроводкиИзвещения(ДокументСсылка) + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | Проводки.СчетДт КАК СчетДт, + | Проводки.КПСДт КАК КПСДт, + | Проводки.КЭКДт КАК КЭКДт, + | Проводки.СчетКт КАК СчетКт, + | Проводки.КПСКт КАК КПСКт, + | Проводки.КЭККт КАК КЭККт, + | Проводки.КФО КАК КФО, + | Проводки.Сумма КАК Сумма, + | Проводки.Содержание КАК Содержание + |ИЗ + | РегистрБухгалтерии.ЖурналПроводокЕПСБУ.ДвиженияССубконто(, , Регистратор = &ДокументСсылка) КАК Проводки + | + |УПОРЯДОЧИТЬ ПО + | Проводки.НомерСтроки"; + Запрос.УстановитьПараметр("ДокументСсылка", ДокументСсылка); + + Возврат Запрос.Выполнить().Выгрузить(); + +КонецФункции + +// Сворачивает проводки по счетам для раздела "Обороты в журнал операций". +// +// Параметры: +// Проводки - ТаблицаЗначений - проводки документа, см. ПроводкиИзвещения. +// +// Возвращаемое значение: +// ТаблицаЗначений - колонки: СчетДт, КПСДт, КЭКДт, СчетКт, КПСКт, КЭККт, КФО, Сумма. +// +Функция СвернутьОбороты(Проводки) + + Обороты = Проводки.Скопировать(); + Обороты.Свернуть("СчетДт, КПСДт, КЭКДт, СчетКт, КПСКт, КЭККт, КФО", "Сумма"); + + Возврат Обороты; + +КонецФункции + +#КонецОбласти + +#КонецЕсли diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_УчетРодительскойПлаты/ПС_УчетРодительскойПлаты.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_УчетРодительскойПлаты/ПС_УчетРодительскойПлаты.mdo new file mode 100644 index 0000000..4ab6b55 --- /dev/null +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/CommonModules/ПС_УчетРодительскойПлаты/ПС_УчетРодительскойПлаты.mdo @@ -0,0 +1,7 @@ + + + ПС_УчетРодительскойПлаты + true + true + true + diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Configuration/Configuration.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Configuration/Configuration.mdo index 6d2f638..a2b6c66 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Configuration/Configuration.mdo +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Configuration/Configuration.mdo @@ -47,6 +47,7 @@ Role.ПС_ОсновнаяРоль Role.БазовыеПраваБГУ CommonModule.ПС_РаботаСКонтрагентами + CommonModule.ПС_УчетРодительскойПлаты CommonForm.УстановкаСтатусаПлатежноРасчетногоДокумента Catalog.Контрагенты Catalog.Договоры @@ -60,18 +61,14 @@ Catalog.ИсточникиФинансовогоОбеспечения Catalog.Пользователи Catalog.КОСГУ - Document.ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов Document.НачислениеРодительскойПлаты Document.ПС_ПередачаЗадолженностиВЦБ Document.ПС_ПринятиеЗадолженностиОтУчреждения Enum.КВД - Report.ПС_Отчет1 - DataProcessor.ПС_Обработка1 - DataProcessor.ПС_Обработка2 + DataProcessor.ПС_УправлениеРасчетамиПоРодительскойПлате InformationRegister.ПлательщикиПоУслугамДДУ InformationRegister.ФИОФизическихЛиц InformationRegister.ДокументыФизическихЛиц - AccumulationRegister.ПС_ОборотыРодительскойПлатыПрошлыхПериодов AccumulationRegister.ТабельУчетаПосещаемостиДетей AccountingRegister.ЖурналПроводокЕПСБУ diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка1/ObjectModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка1/ObjectModule.bsl deleted file mode 100644 index ace5dbd..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка1/ObjectModule.bsl +++ /dev/null @@ -1,115 +0,0 @@ - - МенеджерВТ = Новый МенеджерВременныхТаблиц; - - Запрос = Новый Запрос; - Запрос.МенеджерВременныхТаблиц = МенеджерВТ; - Запрос.Текст = - "ВЫБРАТЬ - | ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.Период КАК Период, - | ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.СуммаОборотДтОборот КАК Начислено - |ПОМЕСТИТЬ СтарыеОбороты - |ИЗ - | РегистрНакопления.ПС_ОборотыРодительскойПлатыПрошлыхПериодов.Обороты(, &ДатаОстатков, Месяц, Контрагент = &Ребенок) КАК ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты - |ГДЕ - | ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.СуммаОборотДтОборот <> 0"; - - Запрос.УстановитьПараметр("ДатаОстатков", ДатаОстатков); - Запрос.УстановитьПараметр("Ребенок", Ребенок); - Запрос.Выполнить(); - - Запрос2 = Новый Запрос; - Запрос2.МенеджерВременныхТаблиц = МенеджерВТ; - Запрос2.Текст = - "ВЫБРАТЬ - | СтарыеОбороты.Период КАК Период, - | СтарыеОбороты.Начислено КАК Начислено - |ПОМЕСТИТЬ СтарыеОбороты2 - |ИЗ - | СтарыеОбороты КАК СтарыеОбороты - |; - | - |//////////////////////////////////////////////////////////////////////////////// - |ВЫБРАТЬ - | ЖурналПроводокЕПСБУОбороты.Период КАК Период - |ПОМЕСТИТЬ ЕПСБУ - |ИЗ - | РегистрБухгалтерии.ЖурналПроводокЕПСБУ.Обороты(&ДатаОстатков, &КонецПериода, Месяц, ) КАК ЖурналПроводокЕПСБУОбороты - |; - | - |//////////////////////////////////////////////////////////////////////////////// - |ВЫБРАТЬ - | СтарыеОбороты2.Период КАК Период, - | СтарыеОбороты2.Начислено КАК Начислено - |ИЗ - | СтарыеОбороты2 КАК СтарыеОбороты2, - | ЕПСБУ КАК ЕПСБУ - | - |ОБЪЕДИНИТЬ ВСЕ - | - |ВЫБРАТЬ - | ЕПСБУ.Период, - | NULL - |ИЗ - | ЕПСБУ КАК ЕПСБУ"; - - Запрос.УстановитьПараметр("ДатаОстатков", ДатаОстатков); - Запрос.УстановитьПараметр("КонецПериода", КонецПериода); - - РезультатЗапроса = Запрос.Выполнить(); - - ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); - - Пока ВыборкаДетальныеЗаписи.Следующий() Цикл - // Вставить обработку выборки ВыборкаДетальныеЗаписи - КонецЦикла; - - //}}КОНСТРУКТОР_ЗАПРОСА_С_ОБРАБОТКОЙ_РЕЗУЛЬТАТА - - - - -"ВЫБРАТЬ -| ПС_ОборотыРодительскойПлатыПрошлыхПериодов.Период КАК Период -|ПОМЕСТИТЬ ЕПСБУ -|ИЗ -| РегистрНакопления.ПС_ОборотыРодительскойПлатыПрошлыхПериодов КАК ПС_ОборотыРодительскойПлатыПрошлыхПериодов -|; -| -|//////////////////////////////////////////////////////////////////////////////// -|ВЫБРАТЬ -| ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.Период КАК Период, -| ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.СуммаОборотДтОборот - ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.СуммаОборотКтОборот КАК Поле1 -|ПОМЕСТИТЬ СтарыеОбороты -|ИЗ -| РегистрНакопления.ПС_ОборотыРодительскойПлатыПрошлыхПериодов.Обороты(, &НачалоПериода, Месяц, Контрагент = &Ребенок) КАК ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты -|; -| -|//////////////////////////////////////////////////////////////////////////////// -|ВЫБРАТЬ -| ЕПСБУ.Период КАК Период -|ИЗ -| ЕПСБУ КАК ЕПСБУ -| -|ОБЪЕДИНИТЬ ВСЕ -| -|ВЫБРАТЬ -| СтарыеОбороты.Период -|ИЗ -| СтарыеОбороты КАК СтарыеОбороты -| -|УПОРЯДОЧИТЬ ПО -| Период -|АВТОУПОРЯДОЧИВАНИЕ" - - - - -|//////////////////////////////////////////////////////////////////////////////// -|ВЫБРАТЬ -| ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.Период КАК Период, -| ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.СуммаОборотДтОборот КАК Начислено -|ПОМЕСТИТЬ СтарыеОбороты -|ИЗ -| РегистрНакопления.ПС_ОборотыРодительскойПлатыПрошлыхПериодов.Обороты(, &ДатаОстатков, Месяц, Контрагент = &Ребенок) КАК ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты -|ГДЕ -| ПС_ОборотыРодительскойПлатыПрошлыхПериодовОбороты.СуммаОборотДтОборот <> 0" \ No newline at end of file diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка1/ПС_Обработка1.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка1/ПС_Обработка1.mdo deleted file mode 100644 index 4dbf784..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка1/ПС_Обработка1.mdo +++ /dev/null @@ -1,9 +0,0 @@ - - - - - - - ПС_Обработка1 - true - diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка2/ObjectModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка2/ObjectModule.bsl deleted file mode 100644 index e69de29..0000000 diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка2/ПС_Обработка2.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка2/ПС_Обработка2.mdo deleted file mode 100644 index 75f42f8..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_Обработка2/ПС_Обработка2.mdo +++ /dev/null @@ -1,9 +0,0 @@ - - - - - - - ПС_Обработка2 - true - diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Form.form b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Form.form new file mode 100644 index 0000000..25bb2b4 --- /dev/null +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Form.form @@ -0,0 +1,3734 @@ + + + + ГруппаФильтры + 9 + + ПолеПериод + 11 + + <key>ru</key> + <value>Период</value> + + true + true + + true + + + Объект.Период + + + ПолеПериодРасширеннаяПодсказка + 13 + Label + true + true + + Left + + + + ПолеПериодКонтекстноеМеню + 12 + true + + InputField + Enter + true + Left + true + + true + true + true + true + true + true + Normal + + + + ПолеОрганизация + 14 + + <key>ru</key> + <value>Организация</value> + + true + true + + true + + + Объект.Организация + + + ПолеОрганизацияРасширеннаяПодсказка + 16 + Label + true + true + + Left + + + + ПолеОрганизацияКонтекстноеМеню + 15 + true + + InputField + Enter + true + Left + true + + true + true + true + true + true + true + Normal + + + + ПолеИФО + 17 + + <key>ru</key> + <value>ИФО</value> + + true + true + + true + + + Объект.ИФО + + + ПолеИФОРасширеннаяПодсказка + 19 + Label + true + true + + Left + + + + ПолеИФОКонтекстноеМеню + 18 + true + + InputField + Enter + true + Left + true + + true + true + true + true + true + true + Normal + + + + ПолеЦБ + 20 + + <key>ru</key> + <value>ЦБ</value> + + true + true + + true + + + Объект.ЦБ + + + ПолеЦБРасширеннаяПодсказка + 22 + Label + true + true + + Left + + + + ПолеЦБКонтекстноеМеню + 21 + true + + InputField + Enter + true + Left + true + + true + true + true + true + true + true + Normal + + + + КнопкаОбновить + 23 + + <key>ru</key> + <value>Обновить</value> + + true + true + + true + + + ОбновитьРасширеннаяПодсказка + 24 + Label + true + true + + Left + + + UsualButton + Form.Command.Обновить + Normal + Auto + true + true + UserCmds + Auto + + true + true + + true + + + <key>ru</key> + <value>Параметры периода</value> + + + ГруппаФильтрыРасширеннаяПодсказка + 10 + Label + true + true + + Left + + + UsualGroup + + Auto + Auto + Auto + true + true + auto + Auto + Auto + + + + Страницы + 1 + + СтраницаДокументы + 5 + + ТаблицаДокументыПринятия + 104 + true + true + + true + + + ДокументыПринятия + + None + + ТаблицаДокументыПринятияТаблицаДокументыПринятия + 117 + true + true + + true + + + ДокументыПринятия.Ссылка + + + ТаблицаДокументыПринятияТаблицаДокументыПринятияРасширеннаяПодсказка + 119 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятияКонтекстноеМеню + 118 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия1 + 120 + true + true + + true + + + ДокументыПринятия.Дата + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия1РасширеннаяПодсказка + 122 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия1КонтекстноеМеню + 121 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия2 + 123 + true + true + + true + + + ДокументыПринятия.Номер + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия2РасширеннаяПодсказка + 125 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия2КонтекстноеМеню + 124 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия3 + 126 + true + true + + true + + + ДокументыПринятия.Организация + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия3РасширеннаяПодсказка + 128 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия3КонтекстноеМеню + 127 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия4 + 129 + true + true + + true + + + ДокументыПринятия.Учреждение + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия4РасширеннаяПодсказка + 131 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия4КонтекстноеМеню + 130 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия5 + 132 + true + true + + true + + + ДокументыПринятия.ИФО + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия5РасширеннаяПодсказка + 134 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия5КонтекстноеМеню + 133 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия6 + 135 + true + true + + true + + + ДокументыПринятия.Период + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия6РасширеннаяПодсказка + 137 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия6КонтекстноеМеню + 136 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия7 + 138 + true + true + + true + + + ДокументыПринятия.Проведен + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия7РасширеннаяПодсказка + 140 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия7КонтекстноеМеню + 139 + true + + CheckBoxField + Auto + true + Left + true + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия8 + 141 + true + true + + true + + + ДокументыПринятия.ПометкаУдаления + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия8РасширеннаяПодсказка + 143 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия8КонтекстноеМеню + 142 + true + + CheckBoxField + Auto + true + Left + true + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия9 + 144 + true + true + + true + + + ДокументыПринятия.СуммаДокумента + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия9РасширеннаяПодсказка + 146 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияТаблицаДокументыПринятия9КонтекстноеМеню + 145 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПринятияКоманднаяПанель + 105 + Left + true + + + ТаблицаДокументыПринятияСтрокаПоиска + 108 + + ТаблицаДокументыПринятияСтрокаПоискаРасширеннаяПодсказка + 110 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияСтрокаПоискаКонтекстноеМеню + 109 + true + + ТаблицаДокументыПринятия + + true + + + + ТаблицаДокументыПринятияСостояниеПросмотра + 114 + + ТаблицаДокументыПринятияСостояниеПросмотраРасширеннаяПодсказка + 116 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияСостояниеПросмотраКонтекстноеМеню + 115 + true + + ViewStatusAddition + ТаблицаДокументыПринятия + + true + + + + ТаблицаДокументыПринятияУправлениеПоиском + 111 + + ТаблицаДокументыПринятияУправлениеПоискомРасширеннаяПодсказка + 113 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияУправлениеПоискомКонтекстноеМеню + 112 + true + + SearchControlAddition + ТаблицаДокументыПринятия + + true + + + + ТаблицаДокументыПринятияРасширеннаяПодсказка + 107 + Label + true + true + + Left + + + + ТаблицаДокументыПринятияКонтекстноеМеню + 106 + true + + true + true + true + true + true + MultiRow + Auto +
true
+ 1 + 1 + AutoUse + AutoUse + true + true + true + true + Auto + Auto + true + true + true + true + AsFileRef + true + + true + + + ТаблицаДокументыПередачи + 61 + true + true + + true + + + ДокументыПередачи + + None + + ТаблицаДокументыПередачиТаблицаДокументыПередачи + 74 + true + true + + true + + + ДокументыПередачи.Ссылка + + + ТаблицаДокументыПередачиТаблицаДокументыПередачиРасширеннаяПодсказка + 76 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачиКонтекстноеМеню + 75 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи1 + 77 + true + true + + true + + + ДокументыПередачи.Дата + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи1РасширеннаяПодсказка + 79 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи1КонтекстноеМеню + 78 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи2 + 80 + true + true + + true + + + ДокументыПередачи.Номер + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи2РасширеннаяПодсказка + 82 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи2КонтекстноеМеню + 81 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи3 + 83 + true + true + + true + + + ДокументыПередачи.Организация + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи3РасширеннаяПодсказка + 85 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи3КонтекстноеМеню + 84 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи4 + 86 + true + true + + true + + + ДокументыПередачи.ЦБ + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи4РасширеннаяПодсказка + 88 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи4КонтекстноеМеню + 87 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи5 + 89 + true + true + + true + + + ДокументыПередачи.ИФО + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи5РасширеннаяПодсказка + 91 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи5КонтекстноеМеню + 90 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи6 + 92 + true + true + + true + + + ДокументыПередачи.Период + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи6РасширеннаяПодсказка + 94 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи6КонтекстноеМеню + 93 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи7 + 95 + true + true + + true + + + ДокументыПередачи.СуммаДокумента + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи7РасширеннаяПодсказка + 97 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи7КонтекстноеМеню + 96 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи8 + 98 + true + true + + true + + + ДокументыПередачи.Проведен + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи8РасширеннаяПодсказка + 100 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи8КонтекстноеМеню + 99 + true + + CheckBoxField + Auto + true + Left + true + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи9 + 101 + true + true + + true + + + ДокументыПередачи.ПометкаУдаления + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи9РасширеннаяПодсказка + 103 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиТаблицаДокументыПередачи9КонтекстноеМеню + 102 + true + + CheckBoxField + Auto + true + Left + true + + + + ТаблицаДокументыПередачиКоманднаяПанель + 62 + Left + true + + + ТаблицаДокументыПередачиСтрокаПоиска + 65 + + ТаблицаДокументыПередачиСтрокаПоискаРасширеннаяПодсказка + 67 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиСтрокаПоискаКонтекстноеМеню + 66 + true + + ТаблицаДокументыПередачи + + true + + + + ТаблицаДокументыПередачиСостояниеПросмотра + 71 + + ТаблицаДокументыПередачиСостояниеПросмотраРасширеннаяПодсказка + 73 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиСостояниеПросмотраКонтекстноеМеню + 72 + true + + ViewStatusAddition + ТаблицаДокументыПередачи + + true + + + + ТаблицаДокументыПередачиУправлениеПоиском + 68 + + ТаблицаДокументыПередачиУправлениеПоискомРасширеннаяПодсказка + 70 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиУправлениеПоискомКонтекстноеМеню + 69 + true + + SearchControlAddition + ТаблицаДокументыПередачи + + true + + + + ТаблицаДокументыПередачиРасширеннаяПодсказка + 64 + Label + true + true + + Left + + + + ТаблицаДокументыПередачиКонтекстноеМеню + 63 + true + + true + true + true + true + true + MultiRow + Auto +
true
+ 1 + 1 + AutoUse + AutoUse + true + true + true + true + Auto + Auto + true + true + true + true + AsFileRef + true + + true + + true + true + + true + + + <key>ru</key> + <value>Документы</value> + + + СтраницаДокументыРасширеннаяПодсказка + 6 + Label + true + true + + Left + + + Page + + Auto + auto + + + + СтраницаНачисления + 147 + + ТаблицаНачисления + 228 + true + true + + true + + + Начисления + + None + + ТаблицаНачисленияТаблицаНачисления + 241 + true + true + + true + + + Начисления.Ссылка + + + ТаблицаНачисленияТаблицаНачисленияРасширеннаяПодсказка + 243 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисленияКонтекстноеМеню + 242 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаНачисленияТаблицаНачисления1 + 244 + true + true + + true + + + Начисления.Дата + + + ТаблицаНачисленияТаблицаНачисления1РасширеннаяПодсказка + 246 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисления1КонтекстноеМеню + 245 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаНачисленияТаблицаНачисления2 + 247 + true + true + + true + + + Начисления.Номер + + + ТаблицаНачисленияТаблицаНачисления2РасширеннаяПодсказка + 249 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисления2КонтекстноеМеню + 248 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаНачисленияТаблицаНачисления3 + 250 + true + true + + true + + + Начисления.Организация + + + ТаблицаНачисленияТаблицаНачисления3РасширеннаяПодсказка + 252 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисления3КонтекстноеМеню + 251 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаНачисленияТаблицаНачисления4 + 253 + true + true + + true + + + Начисления.ИФО + + + ТаблицаНачисленияТаблицаНачисления4РасширеннаяПодсказка + 255 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисления4КонтекстноеМеню + 254 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаНачисленияТаблицаНачисления5 + 256 + true + true + + true + + + Начисления.Период + + + ТаблицаНачисленияТаблицаНачисления5РасширеннаяПодсказка + 258 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисления5КонтекстноеМеню + 257 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаНачисленияТаблицаНачисления6 + 259 + true + true + + true + + + Начисления.СуммаДокумента + + + ТаблицаНачисленияТаблицаНачисления6РасширеннаяПодсказка + 261 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисления6КонтекстноеМеню + 260 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаНачисленияТаблицаНачисления7 + 262 + true + true + + true + + + Начисления.Проведен + + + ТаблицаНачисленияТаблицаНачисления7РасширеннаяПодсказка + 264 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисления7КонтекстноеМеню + 263 + true + + CheckBoxField + Auto + true + Left + true + + + + ТаблицаНачисленияТаблицаНачисления8 + 265 + true + true + + true + + + Начисления.ПометкаУдаления + + + ТаблицаНачисленияТаблицаНачисления8РасширеннаяПодсказка + 267 + Label + true + true + + Left + + + + ТаблицаНачисленияТаблицаНачисления8КонтекстноеМеню + 266 + true + + CheckBoxField + Auto + true + Left + true + + + + ТаблицаНачисленияКоманднаяПанель + 229 + Left + true + + + ТаблицаНачисленияСтрокаПоиска + 232 + + ТаблицаНачисленияСтрокаПоискаРасширеннаяПодсказка + 234 + Label + true + true + + Left + + + + ТаблицаНачисленияСтрокаПоискаКонтекстноеМеню + 233 + true + + ТаблицаНачисления + + true + + + + ТаблицаНачисленияСостояниеПросмотра + 238 + + ТаблицаНачисленияСостояниеПросмотраРасширеннаяПодсказка + 240 + Label + true + true + + Left + + + + ТаблицаНачисленияСостояниеПросмотраКонтекстноеМеню + 239 + true + + ViewStatusAddition + ТаблицаНачисления + + true + + + + ТаблицаНачисленияУправлениеПоиском + 235 + + ТаблицаНачисленияУправлениеПоискомРасширеннаяПодсказка + 237 + Label + true + true + + Left + + + + ТаблицаНачисленияУправлениеПоискомКонтекстноеМеню + 236 + true + + SearchControlAddition + ТаблицаНачисления + + true + + + + ТаблицаНачисленияРасширеннаяПодсказка + 231 + Label + true + true + + Left + + + + ТаблицаНачисленияКонтекстноеМеню + 230 + true + + true + true + true + true + true + MultiRow + Auto +
true
+ 1 + 1 + AutoUse + AutoUse + true + true + true + true + Auto + Auto + true + true + true + true + AsFileRef + true + + true + + true + true + + true + + + <key>ru</key> + <value>Начисления</value> + + + СтраницаНачисленияРасширеннаяПодсказка + 148 + Label + true + true + + Left + + + Page + + Auto + auto + + + + СтраницаСверка + 149 + + ТаблицаСверка + 268 + true + true + + true + + + Сверка + + None + + ТаблицаСверкаТаблицаСверка + 281 + true + true + + true + + + Сверка.ДокументПередачи + + + ТаблицаСверкаТаблицаСверкаРасширеннаяПодсказка + 283 + Label + true + true + + Left + + + + ТаблицаСверкаТаблицаСверкаКонтекстноеМеню + 282 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаСверкаТаблицаСверка1 + 284 + true + true + + true + + + Сверка.Период + + + ТаблицаСверкаТаблицаСверка1РасширеннаяПодсказка + 286 + Label + true + true + + Left + + + + ТаблицаСверкаТаблицаСверка1КонтекстноеМеню + 285 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаСверкаТаблицаСверка2 + 287 + true + true + + true + + + Сверка.Сад + + + ТаблицаСверкаТаблицаСверка2РасширеннаяПодсказка + 289 + Label + true + true + + Left + + + + ТаблицаСверкаТаблицаСверка2КонтекстноеМеню + 288 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаСверкаТаблицаСверка3 + 290 + true + true + + true + + + Сверка.ЦБ + + + ТаблицаСверкаТаблицаСверка3РасширеннаяПодсказка + 292 + Label + true + true + + Left + + + + ТаблицаСверкаТаблицаСверка3КонтекстноеМеню + 291 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаСверкаТаблицаСверка4 + 293 + true + true + + true + + + Сверка.СуммаПередано + + + ТаблицаСверкаТаблицаСверка4РасширеннаяПодсказка + 295 + Label + true + true + + Left + + + + ТаблицаСверкаТаблицаСверка4КонтекстноеМеню + 294 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаСверкаТаблицаСверка5 + 296 + true + true + + true + + + Сверка.СуммаПринято + + + ТаблицаСверкаТаблицаСверка5РасширеннаяПодсказка + 298 + Label + true + true + + Left + + + + ТаблицаСверкаТаблицаСверка5КонтекстноеМеню + 297 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаСверкаТаблицаСверка6 + 299 + true + true + + true + + + Сверка.Расхождение + + + ТаблицаСверкаТаблицаСверка6РасширеннаяПодсказка + 301 + Label + true + true + + Left + + + + ТаблицаСверкаТаблицаСверка6КонтекстноеМеню + 300 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаСверкаТаблицаСверка7 + 302 + true + true + + true + + + Сверка.ПередачаПроведена + + + ТаблицаСверкаТаблицаСверка7РасширеннаяПодсказка + 304 + Label + true + true + + Left + + + + ТаблицаСверкаТаблицаСверка7КонтекстноеМеню + 303 + true + + CheckBoxField + Auto + true + Left + true + + + + ТаблицаСверкаКоманднаяПанель + 269 + Left + true + + + ТаблицаСверкаСтрокаПоиска + 272 + + ТаблицаСверкаСтрокаПоискаРасширеннаяПодсказка + 274 + Label + true + true + + Left + + + + ТаблицаСверкаСтрокаПоискаКонтекстноеМеню + 273 + true + + ТаблицаСверка + + true + + + + ТаблицаСверкаСостояниеПросмотра + 278 + + ТаблицаСверкаСостояниеПросмотраРасширеннаяПодсказка + 280 + Label + true + true + + Left + + + + ТаблицаСверкаСостояниеПросмотраКонтекстноеМеню + 279 + true + + ViewStatusAddition + ТаблицаСверка + + true + + + + ТаблицаСверкаУправлениеПоиском + 275 + + ТаблицаСверкаУправлениеПоискомРасширеннаяПодсказка + 277 + Label + true + true + + Left + + + + ТаблицаСверкаУправлениеПоискомКонтекстноеМеню + 276 + true + + SearchControlAddition + ТаблицаСверка + + true + + + + ТаблицаСверкаРасширеннаяПодсказка + 271 + Label + true + true + + Left + + + + ТаблицаСверкаКонтекстноеМеню + 270 + true + + true + true + true + true + true + MultiRow + Auto +
true
+ 1 + 1 + AutoUse + AutoUse + true + true + true + true + Auto + Auto + true + true + true + true + AsFileRef + true + + true + + true + true + + true + + + <key>ru</key> + <value>Сверка «передано / принято»</value> + + + СтраницаСверкаРасширеннаяПодсказка + 150 + Label + true + true + + Left + + + Page + + Auto + auto + + + + СтраницаОстатки + 7 + + ТаблицаОстатковВывод + 27 + true + true + + true + + + ТаблицаОстатков + + None + + ТаблицаОстатковВыводТаблицаОстатковВывод + 40 + true + true + + true + + + ТаблицаОстатков.ИФО + + + ТаблицаОстатковВыводТаблицаОстатковВыводРасширеннаяПодсказка + 42 + Label + true + true + + Left + + + + ТаблицаОстатковВыводТаблицаОстатковВыводКонтекстноеМеню + 41 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаОстатковВыводТаблицаОстатковВывод1 + 43 + true + true + + true + + + ТаблицаОстатков.Организация + + + ТаблицаОстатковВыводТаблицаОстатковВывод1РасширеннаяПодсказка + 45 + Label + true + true + + Left + + + + ТаблицаОстатковВыводТаблицаОстатковВывод1КонтекстноеМеню + 44 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаОстатковВыводТаблицаОстатковВывод2 + 46 + true + true + + true + + + ТаблицаОстатков.СуммаНачальныйОстаток + + + ТаблицаОстатковВыводТаблицаОстатковВывод2РасширеннаяПодсказка + 48 + Label + true + true + + Left + + + + ТаблицаОстатковВыводТаблицаОстатковВывод2КонтекстноеМеню + 47 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаОстатковВыводТаблицаОстатковВывод3 + 49 + true + true + + true + + + ТаблицаОстатков.СуммаОборотДт + + + ТаблицаОстатковВыводТаблицаОстатковВывод3РасширеннаяПодсказка + 51 + Label + true + true + + Left + + + + ТаблицаОстатковВыводТаблицаОстатковВывод3КонтекстноеМеню + 50 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаОстатковВыводТаблицаОстатковВывод4 + 52 + true + true + + true + + + ТаблицаОстатков.СуммаОборотКт + + + ТаблицаОстатковВыводТаблицаОстатковВывод4РасширеннаяПодсказка + 54 + Label + true + true + + Left + + + + ТаблицаОстатковВыводТаблицаОстатковВывод4КонтекстноеМеню + 53 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаОстатковВыводТаблицаОстатковВывод5 + 55 + true + true + + true + + + ТаблицаОстатков.СуммаКонечныйОстаток + + + ТаблицаОстатковВыводТаблицаОстатковВывод5РасширеннаяПодсказка + 57 + Label + true + true + + Left + + + + ТаблицаОстатковВыводТаблицаОстатковВывод5КонтекстноеМеню + 56 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаОстатковВыводТаблицаОстатковВывод6 + 58 + true + true + + true + + + ТаблицаОстатков.Счет + + + ТаблицаОстатковВыводТаблицаОстатковВывод6РасширеннаяПодсказка + 60 + Label + true + true + + Left + + + + ТаблицаОстатковВыводТаблицаОстатковВывод6КонтекстноеМеню + 59 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаОстатковВыводКоманднаяПанель + 28 + Left + true + + + ТаблицаОстатковВыводСтрокаПоиска + 31 + + ТаблицаОстатковВыводСтрокаПоискаРасширеннаяПодсказка + 33 + Label + true + true + + Left + + + + ТаблицаОстатковВыводСтрокаПоискаКонтекстноеМеню + 32 + true + + ТаблицаОстатковВывод + + true + + + + ТаблицаОстатковВыводСостояниеПросмотра + 37 + + ТаблицаОстатковВыводСостояниеПросмотраРасширеннаяПодсказка + 39 + Label + true + true + + Left + + + + ТаблицаОстатковВыводСостояниеПросмотраКонтекстноеМеню + 38 + true + + ViewStatusAddition + ТаблицаОстатковВывод + + true + + + + ТаблицаОстатковВыводУправлениеПоиском + 34 + + ТаблицаОстатковВыводУправлениеПоискомРасширеннаяПодсказка + 36 + Label + true + true + + Left + + + + ТаблицаОстатковВыводУправлениеПоискомКонтекстноеМеню + 35 + true + + SearchControlAddition + ТаблицаОстатковВывод + + true + + + + ТаблицаОстатковВыводРасширеннаяПодсказка + 30 + Label + true + true + + Left + + + + ТаблицаОстатковВыводКонтекстноеМеню + 29 + true + + true + true + true + true + true + MultiRow + Auto +
true
+ 1 + 1 + AutoUse + AutoUse + true + true + true + true + Auto + Auto + true + true + true + true + AsFileRef + true + + true + + true + true + + true + + + <key>ru</key> + <value>Остатки и обороты</value> + + + СтраницаОстаткиРасширеннаяПодсказка + 8 + Label + true + true + + Left + + + Page + + Auto + auto + + + true + true + + true + + + СтраницыРасширеннаяПодсказка + 2 + Label + true + true + + Left + + + Pages + + Auto + Auto + + + + ФормаКоманднаяПанель + -1 + + + OnCreateAtServer + ПриСозданииНаСервере + + true + + Объект + + <key>ru</key> + <value>Объект</value> + + 1 + + DataProcessorObject.ПС_УправлениеРасчетамиПоРодительскойПлате + + + true + + + true + +
true
+ + + ТаблицаОстатков + + <key>ru</key> + <value>Остатки и обороты по счетам</value> + + 4 + + ValueTable + + + true + + + true + + + ИФО + + <key>ru</key> + <value>ИФО</value> + + 5 + + CatalogRef.ИсточникиФинансовогоОбеспечения + + + true + + + true + + + + Организация + + <key>ru</key> + <value>Организация</value> + + 6 + + CatalogRef.Организации + + + true + + + true + + + + СуммаНачальныйОстаток + + <key>ru</key> + <value>Начальный остаток</value> + + 7 + + Number + + 15 + 2 + + + + true + + + true + + + + СуммаОборотДт + + <key>ru</key> + <value>Оборот Дт</value> + + 8 + + Number + + 15 + 2 + + + + true + + + true + + + + СуммаОборотКт + + <key>ru</key> + <value>Оборот Кт</value> + + 9 + + Number + + 15 + 2 + + + + true + + + true + + + + СуммаКонечныйОстаток + + <key>ru</key> + <value>Конечный остаток</value> + + 10 + + Number + + 15 + 2 + + + + true + + + true + + + + Счет + + <key>ru</key> + <value>Счет</value> + + 11 + + String + + 20 + + + + true + + + true + + + + + ДокументыПередачи + + <key>ru</key> + <value>Документы передачи</value> + + 12 + + ValueTable + + + true + + + true + + + Ссылка + + <key>ru</key> + <value>Документ</value> + + 14 + + DocumentRef.ПС_ПередачаЗадолженностиВЦБ + + + true + + + true + + + + Дата + + <key>ru</key> + <value>Дата</value> + + 15 + + Date + + Date + + + + true + + + true + + + + Номер + + <key>ru</key> + <value>Номер</value> + + 16 + + String + + 11 + + + + true + + + true + + + + Организация + + <key>ru</key> + <value>Организация</value> + + 17 + + CatalogRef.Организации + + + true + + + true + + + + ЦБ + + <key>ru</key> + <value>ЦБ</value> + + 18 + + CatalogRef.Контрагенты + + + true + + + true + + + + ИФО + + <key>ru</key> + <value>ИФО</value> + + 19 + + CatalogRef.ИсточникиФинансовогоОбеспечения + + + true + + + true + + + + Период + + <key>ru</key> + <value>Период</value> + + 20 + + Date + + Date + + + + true + + + true + + + + СуммаДокумента + + <key>ru</key> + <value>Сумма</value> + + 21 + + Number + + 15 + 2 + + + + true + + + true + + + + Проведен + + <key>ru</key> + <value>Проведён</value> + + 22 + + Boolean + + + true + + + true + + + + ПометкаУдаления + + <key>ru</key> + <value>Пометка удаления</value> + + 23 + + Boolean + + + true + + + true + + + + + ДокументыПринятия + + <key>ru</key> + <value>Документы принятия</value> + + 13 + + ValueTable + + + true + + + true + + + Ссылка + + <key>ru</key> + <value>Документ</value> + + 24 + + DocumentRef.ПС_ПринятиеЗадолженностиОтУчреждения + + + true + + + true + + + + Дата + + <key>ru</key> + <value>Дата</value> + + 25 + + Date + + Date + + + + true + + + true + + + + Номер + + <key>ru</key> + <value>Номер</value> + + 26 + + String + + 11 + + + + true + + + true + + + + Организация + + <key>ru</key> + <value>Организация (ЦБ)</value> + + 27 + + CatalogRef.Организации + + + true + + + true + + + + Учреждение + + <key>ru</key> + <value>Учреждение</value> + + 28 + + CatalogRef.Контрагенты + + + true + + + true + + + + ИФО + + <key>ru</key> + <value>ИФО</value> + + 29 + + CatalogRef.ИсточникиФинансовогоОбеспечения + + + true + + + true + + + + Период + + <key>ru</key> + <value>Период</value> + + 30 + + Date + + Date + + + + true + + + true + + + + Проведен + + <key>ru</key> + <value>Проведён</value> + + 31 + + Boolean + + + true + + + true + + + + ПометкаУдаления + + <key>ru</key> + <value>Пометка удаления</value> + + 32 + + Boolean + + + true + + + true + + + + СуммаДокумента + + <key>ru</key> + <value>Сумма</value> + + 33 + + Number + + 15 + 2 + + + + true + + + true + + + + + Начисления + + <key>ru</key> + <value>Начисления</value> + + 34 + + ValueTable + + + true + + + true + + + Ссылка + + <key>ru</key> + <value>Ссылка</value> + + 36 + + DocumentRef.НачислениеРодительскойПлаты + + + true + + + true + + + + Дата + + <key>ru</key> + <value>Дата</value> + + 37 + + Date + + + + true + + + true + + + + Номер + + <key>ru</key> + <value>Номер</value> + + 38 + + String + + 20 + + + + true + + + true + + + + Организация + + <key>ru</key> + <value>Организация</value> + + 39 + + CatalogRef.Организации + + + true + + + true + + + + ИФО + + <key>ru</key> + <value>ИФО</value> + + 40 + + CatalogRef.ИсточникиФинансовогоОбеспечения + + + true + + + true + + + + Период + + <key>ru</key> + <value>Период</value> + + 41 + + Date + + + + true + + + true + + + + СуммаДокумента + + <key>ru</key> + <value>СуммаДокумента</value> + + 42 + + Number + + 15 + 2 + + + + true + + + true + + + + Проведен + + <key>ru</key> + <value>Проведен</value> + + 43 + + Boolean + + + true + + + true + + + + ПометкаУдаления + + <key>ru</key> + <value>ПометкаУдаления</value> + + 44 + + Boolean + + + true + + + true + + + + + Сверка + + <key>ru</key> + <value>Сверка</value> + + 35 + + ValueTable + + + true + + + true + + + ДокументПередачи + + <key>ru</key> + <value>ДокументПередачи</value> + + 45 + + DocumentRef.ПС_ПередачаЗадолженностиВЦБ + + + true + + + true + + + + Период + + <key>ru</key> + <value>Период</value> + + 46 + + Date + + + + true + + + true + + + + Сад + + <key>ru</key> + <value>Сад</value> + + 47 + + CatalogRef.Организации + + + true + + + true + + + + ЦБ + + <key>ru</key> + <value>ЦБ</value> + + 48 + + CatalogRef.Контрагенты + + + true + + + true + + + + СуммаПередано + + <key>ru</key> + <value>СуммаПередано</value> + + 49 + + Number + + 15 + 2 + + + + true + + + true + + + + СуммаПринято + + <key>ru</key> + <value>СуммаПринято</value> + + 50 + + Number + + 15 + 2 + + + + true + + + true + + + + Расхождение + + <key>ru</key> + <value>Расхождение</value> + + 51 + + Number + + 15 + 2 + + + + true + + + true + + + + ПередачаПроведена + + <key>ru</key> + <value>ПередачаПроведена</value> + + 52 + + Boolean + + + true + + + true + + + + + Обновить + + <key>ru</key> + <value>Обновить</value> + + 2 + + true + + + + Обновить + + + + + + + + diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Module.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Module.bsl new file mode 100644 index 0000000..68806c3 --- /dev/null +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Module.bsl @@ -0,0 +1,310 @@ +#Область ОбработчикиСобытийФормы + +// Обработчик события ПриСозданииНаСервере формы. +// Заполняет значения фильтров по умолчанию и обновляет таблицы. +// +&НаСервере +Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) + + Если НЕ ЗначениеЗаполнено(Объект.Период) Тогда + Объект.Период = НачалоМесяца(ТекущаяДатаСеанса()); + КонецЕсли; + + ОбновитьТаблицыНаСервере(); + +КонецПроцедуры + +#КонецОбласти + +#Область ОбработчикиКомандФормы + +// Обновляет данные таблиц формы по установленным фильтрам. +// +&НаКлиенте +Процедура Обновить(Команда) + + ОбновитьТаблицыНаСервере(); + +КонецПроцедуры + +#КонецОбласти + +#Область СлужебныеПроцедурыИФункции + +// Заполняет таблицы формы (начисления, документы передачи/принятия, сверка, +// остатки по счетам) на основании фильтров формы. +// +&НаСервере +Процедура ОбновитьТаблицыНаСервере() + + ЗаполнитьНачисления(); + ЗаполнитьДокументыПередачи(); + ЗаполнитьДокументыПринятия(); + ЗаполнитьСверку(); + ЗаполнитьТаблицуОстатков(); + +КонецПроцедуры + +// Заполняет таблицу формы Начисления по установленным фильтрам. +// +&НаСервере +Процедура ЗаполнитьНачисления() + + Начисления.Очистить(); + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | Документы.Ссылка КАК Ссылка, + | Документы.Дата КАК Дата, + | Документы.Номер КАК Номер, + | Документы.Организация КАК Организация, + | Документы.ИФО КАК ИФО, + | Документы.Период КАК Период, + | Документы.СуммаДокумента КАК СуммаДокумента, + | Документы.Проведен КАК Проведен, + | Документы.ПометкаУдаления КАК ПометкаУдаления + |ИЗ + | Документ.НачислениеРодительскойПлаты КАК Документы + |ГДЕ + | (&Период = ДАТАВРЕМЯ(1, 1, 1) + | ИЛИ Документы.Период >= &Период) + | И (&Организация = НЕОПРЕДЕЛЕНО + | ИЛИ Документы.Организация = &Организация) + | И (&ИФО = НЕОПРЕДЕЛЕНО + | ИЛИ Документы.ИФО = &ИФО) + |УПОРЯДОЧИТЬ ПО + | Документы.Дата УБЫВ"; + + Запрос.УстановитьПараметр("Период", Объект.Период); + Запрос.УстановитьПараметр("Организация", ?(ЗначениеЗаполнено(Объект.Организация), Объект.Организация, Неопределено)); + Запрос.УстановитьПараметр("ИФО", ?(ЗначениеЗаполнено(Объект.ИФО), Объект.ИФО, Неопределено)); + + Выборка = Запрос.Выполнить().Выбрать(); + Пока Выборка.Следующий() Цикл + ЗаполнитьЗначенияСвойств(Начисления.Добавить(), Выборка); + КонецЦикла; + +КонецПроцедуры + +// Заполняет таблицу формы ДокументыПередачи по установленным фильтрам. +// +&НаСервере +Процедура ЗаполнитьДокументыПередачи() + + ДокументыПередачи.Очистить(); + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | Документы.Ссылка КАК Ссылка, + | Документы.Дата КАК Дата, + | Документы.Номер КАК Номер, + | Документы.Организация КАК Организация, + | Документы.ЦБ КАК ЦБ, + | Документы.ИФО КАК ИФО, + | Документы.Период КАК Период, + | Документы.СуммаДокумента КАК СуммаДокумента, + | Документы.Проведен КАК Проведен, + | Документы.ПометкаУдаления КАК ПометкаУдаления + |ИЗ + | Документ.ПС_ПередачаЗадолженностиВЦБ КАК Документы + |ГДЕ + | (&Период = ДАТАВРЕМЯ(1, 1, 1) + | ИЛИ Документы.Период >= &Период) + | И (&Организация = НЕОПРЕДЕЛЕНО + | ИЛИ Документы.Организация = &Организация) + | И (&ИФО = НЕОПРЕДЕЛЕНО + | ИЛИ Документы.ИФО = &ИФО) + | И (&ЦБ = НЕОПРЕДЕЛЕНО + | ИЛИ Документы.ЦБ = &ЦБ) + |УПОРЯДОЧИТЬ ПО + | Документы.Дата УБЫВ"; + + Запрос.УстановитьПараметр("Период", Объект.Период); + Запрос.УстановитьПараметр("Организация", ?(ЗначениеЗаполнено(Объект.Организация), Объект.Организация, Неопределено)); + Запрос.УстановитьПараметр("ИФО", ?(ЗначениеЗаполнено(Объект.ИФО), Объект.ИФО, Неопределено)); + Запрос.УстановитьПараметр("ЦБ", ?(ЗначениеЗаполнено(Объект.ЦБ), Объект.ЦБ, Неопределено)); + + Выборка = Запрос.Выполнить().Выбрать(); + Пока Выборка.Следующий() Цикл + ЗаполнитьЗначенияСвойств(ДокументыПередачи.Добавить(), Выборка); + КонецЦикла; + +КонецПроцедуры + +// Заполняет таблицу формы ДокументыПринятия по установленным фильтрам. +// +&НаСервере +Процедура ЗаполнитьДокументыПринятия() + + ДокументыПринятия.Очистить(); + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | Документы.Ссылка КАК Ссылка, + | Документы.Дата КАК Дата, + | Документы.Номер КАК Номер, + | Документы.Организация КАК Организация, + | Документы.Учреждение КАК Учреждение, + | Документы.ИФО КАК ИФО, + | Документы.Период КАК Период, + | Документы.СуммаДокумента КАК СуммаДокумента, + | Документы.Проведен КАК Проведен, + | Документы.ПометкаУдаления КАК ПометкаУдаления + |ИЗ + | Документ.ПС_ПринятиеЗадолженностиОтУчреждения КАК Документы + |ГДЕ + | (&Период = ДАТАВРЕМЯ(1, 1, 1) + | ИЛИ Документы.Период >= &Период) + | И (&Организация = НЕОПРЕДЕЛЕНО + | ИЛИ Документы.Организация = &Организация) + | И (&ИФО = НЕОПРЕДЕЛЕНО + | ИЛИ Документы.ИФО = &ИФО) + |УПОРЯДОЧИТЬ ПО + | Документы.Дата УБЫВ"; + + Запрос.УстановитьПараметр("Период", Объект.Период); + Запрос.УстановитьПараметр("Организация", ?(ЗначениеЗаполнено(Объект.Организация), Объект.Организация, Неопределено)); + Запрос.УстановитьПараметр("ИФО", ?(ЗначениеЗаполнено(Объект.ИФО), Объект.ИФО, Неопределено)); + + Выборка = Запрос.Выполнить().Выбрать(); + Пока Выборка.Следующий() Цикл + ЗаполнитьЗначенияСвойств(ДокументыПринятия.Добавить(), Выборка); + КонецЦикла; + +КонецПроцедуры + +// Заполняет таблицу формы Сверка: сопоставляет суммы наших документов передачи +// и принятия. Приёмка связана с передачей через реквизит ДокументПередачи. +// +&НаСервере +Процедура ЗаполнитьСверку() + + Сверка.Очистить(); + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | Принятие.ДокументПередачи КАК ДокументПередачи, + | СУММА(Принятие.СуммаДокумента) КАК СуммаПринято + |ПОМЕСТИТЬ ВТПринято + |ИЗ + | Документ.ПС_ПринятиеЗадолженностиОтУчреждения КАК Принятие + |ГДЕ + | НЕ Принятие.ПометкаУдаления + |СГРУППИРОВАТЬ ПО + | Принятие.ДокументПередачи + |ИНДЕКСИРОВАТЬ ПО + | ДокументПередачи + |; + | + |ВЫБРАТЬ + | Передача.Ссылка КАК ДокументПередачи, + | Передача.Период КАК Период, + | Передача.Организация КАК Сад, + | Передача.ЦБ КАК ЦБ, + | Передача.СуммаДокумента КАК СуммаПередано, + | ЕСТЬNULL(ВТПринято.СуммаПринято, 0) КАК СуммаПринято, + | Передача.СуммаДокумента - ЕСТЬNULL(ВТПринято.СуммаПринято, 0) КАК Расхождение, + | Передача.Проведен КАК ПередачаПроведена + |ИЗ + | Документ.ПС_ПередачаЗадолженностиВЦБ КАК Передача + | ЛЕВОЕ СОЕДИНЕНИЕ ВТПринято КАК ВТПринято + | ПО Передача.Ссылка = ВТПринято.ДокументПередачи + |ГДЕ + | НЕ Передача.ПометкаУдаления + | И (&Период = ДАТАВРЕМЯ(1, 1, 1) + | ИЛИ Передача.Период >= &Период) + | И (&Организация = НЕОПРЕДЕЛЕНО + | ИЛИ Передача.Организация = &Организация) + | И (&ИФО = НЕОПРЕДЕЛЕНО + | ИЛИ Передача.ИФО = &ИФО) + | И (&ЦБ = НЕОПРЕДЕЛЕНО + | ИЛИ Передача.ЦБ = &ЦБ) + |УПОРЯДОЧИТЬ ПО + | Передача.Период, + | Передача.Организация"; + + Запрос.УстановитьПараметр("Период", Объект.Период); + Запрос.УстановитьПараметр("Организация", ?(ЗначениеЗаполнено(Объект.Организация), Объект.Организация, Неопределено)); + Запрос.УстановитьПараметр("ИФО", ?(ЗначениеЗаполнено(Объект.ИФО), Объект.ИФО, Неопределено)); + Запрос.УстановитьПараметр("ЦБ", ?(ЗначениеЗаполнено(Объект.ЦБ), Объект.ЦБ, Неопределено)); + + Выборка = Запрос.Выполнить().Выбрать(); + Пока Выборка.Следующий() Цикл + ЗаполнитьЗначенияСвойств(Сверка.Добавить(), Выборка); + КонецЦикла; + +КонецПроцедуры + +// Заполняет таблицу остатков и оборотов по счетам 205.31 и 304.04. +// Использует виртуальную таблицу ОстаткиИОбороты регистра бухгалтерии. +// +&НаСервере +Процедура ЗаполнитьТаблицуОстатков() + + ТаблицаОстатков.Очистить(); + + НачалоПериода = Объект.Период; + КонецПериода = КонецМесяца(Объект.Период); + + Запрос = Новый Запрос; + Запрос.Текст = + "ВЫБРАТЬ + | ""205.31"" КАК Счет, + | ОстаткиИОбороты.ИФО КАК ИФО, + | СУММА(ОстаткиИОбороты.СуммаНачальныйОстаток) КАК СуммаНачальныйОстаток, + | СУММА(ОстаткиИОбороты.СуммаОборотДт) КАК СуммаОборотДт, + | СУММА(ОстаткиИОбороты.СуммаОборотКт) КАК СуммаОборотКт, + | СУММА(ОстаткиИОбороты.СуммаКонечныйОстаток) КАК СуммаКонечныйОстаток + |ИЗ + | РегистрБухгалтерии.ЖурналПроводокЕПСБУ.ОстаткиИОбороты( + | &НачалоПериода, + | &КонецПериода, + | Авто, + | , + | Счет В ИЕРАРХИИ (&Счет205)) КАК ОстаткиИОбороты + |ГДЕ + | (&ИФО = НЕОПРЕДЕЛЕНО + | ИЛИ ОстаткиИОбороты.ИФО = &ИФО) + |СГРУППИРОВАТЬ ПО + | ОстаткиИОбороты.ИФО + | + |ОБЪЕДИНИТЬ ВСЕ + | + |ВЫБРАТЬ + | ""304.04"", + | ОстаткиИОбороты.ИФО, + | СУММА(ОстаткиИОбороты.СуммаНачальныйОстаток), + | СУММА(ОстаткиИОбороты.СуммаОборотДт), + | СУММА(ОстаткиИОбороты.СуммаОборотКт), + | СУММА(ОстаткиИОбороты.СуммаКонечныйОстаток) + |ИЗ + | РегистрБухгалтерии.ЖурналПроводокЕПСБУ.ОстаткиИОбороты( + | &НачалоПериода, + | &КонецПериода, + | Авто, + | , + | Счет В ИЕРАРХИИ (&Счет304)) КАК ОстаткиИОбороты + |ГДЕ + | (&ИФО = НЕОПРЕДЕЛЕНО + | ИЛИ ОстаткиИОбороты.ИФО = &ИФО) + |СГРУППИРОВАТЬ ПО + | ОстаткиИОбороты.ИФО"; + + Запрос.УстановитьПараметр("НачалоПериода", НачалоПериода); + Запрос.УстановитьПараметр("КонецПериода", КонецПериода); + Запрос.УстановитьПараметр("Счет205", ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.31")); + Запрос.УстановитьПараметр("Счет304", ПланыСчетов.ЕПСБУ.НайтиПоКоду("304.04")); + Запрос.УстановитьПараметр("ИФО", ?(ЗначениеЗаполнено(Объект.ИФО), Объект.ИФО, Неопределено)); + + Выборка = Запрос.Выполнить().Выбрать(); + Пока Выборка.Следующий() Цикл + ЗаполнитьЗначенияСвойств(ТаблицаОстатков.Добавить(), Выборка); + КонецЦикла; + +КонецПроцедуры + +#КонецОбласти diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ObjectModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ObjectModule.bsl new file mode 100644 index 0000000..4d76197 --- /dev/null +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ObjectModule.bsl @@ -0,0 +1,3 @@ +// Обработка ПС_УправлениеРасчетамиПоРодительскойПлате. +// Логика дашборда реализована в модуле управляемой формы (Forms/Форма/Module.bsl). +// Модуль объекта оставлен пустым намеренно. diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ПС_УправлениеРасчетамиПоРодительскойПлате.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ПС_УправлениеРасчетамиПоРодительскойПлате.mdo new file mode 100644 index 0000000..2939630 --- /dev/null +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ПС_УправлениеРасчетамиПоРодительскойПлате.mdo @@ -0,0 +1,60 @@ + + + + + + + ПС_УправлениеРасчетамиПоРодительскойПлате + + ru + Управление расчётами по родительской плате + + true + DataProcessor.ПС_УправлениеРасчетамиПоРодительскойПлате.Form.Форма + + Период + + Date + + Date + + + + + + + Организация + + CatalogRef.Организации + + + + + + ИФО + + CatalogRef.ИсточникиФинансовогоОбеспечения + + + + + + ЦБ + + ru + ЦБ (получатель) + + + CatalogRef.Контрагенты + + + + + + Форма + + ru + Управление расчётами по родительской плате + + + diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/НачислениеРодительскойПлаты/Forms/ФормаДокумента/Form.form b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/НачислениеРодительскойПлаты/Forms/ФормаДокумента/Form.form index 14c8cd7..5b5a74c 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/НачислениеРодительскойПлаты/Forms/ФормаДокумента/Form.form +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/НачислениеРодительскойПлаты/Forms/ФормаДокумента/Form.form @@ -2679,6 +2679,10 @@ ПС_СоздатьПередачуЗадолженностиВЦБ 241 + + <key>ru</key> + <value>Передать начисления в ЦБ</value> + true true diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/НачислениеРодительскойПлаты/Forms/ФормаДокумента/Module.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/НачислениеРодительскойПлаты/Forms/ФормаДокумента/Module.bsl index 93ac720..54c114e 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/НачислениеРодительскойПлаты/Forms/ФормаДокумента/Module.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/НачислениеРодительскойПлаты/Forms/ФормаДокумента/Module.bsl @@ -104,6 +104,13 @@ Возврат; КонецЕсли; + Если НЕ Объект.Проведен Тогда + СообщениеПользователю = Новый СообщениеПользователю; + СообщениеПользователю.Текст = "Передача задолженности создаётся только на основании проведённого документа начисления."; + СообщениеПользователю.Сообщить(); + Возврат; + КонецЕсли; + ПараметрыФормы = Новый Структура("Основание", Объект.Ссылка); ОткрытьФорму("Документ.ПС_ПередачаЗадолженностиВЦБ.Форма.ФормаДокумента", ПараметрыФормы, diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/Forms/ФормаДокумента/Form.form b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/Forms/ФормаДокумента/Form.form deleted file mode 100644 index 6cecb08..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/Forms/ФормаДокумента/Form.form +++ /dev/null @@ -1,667 +0,0 @@ - - - - Номер - 1 - true - true - - true - - - Объект.Number - - - НомерРасширеннаяПодсказка - 3 - Label - true - true - - Left - - - - НомерКонтекстноеМеню - 2 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - Дата - 4 - true - true - - true - - - Объект.Date - - - ДатаРасширеннаяПодсказка - 6 - Label - true - true - - Left - - - - ДатаКонтекстноеМеню - 5 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузки - 7 - true - true - - true - - - Объект.ТаблицаЗагрузки - - None - - ТаблицаЗагрузкиНомерСтроки - 20 - true - true - - true - - - Объект.ТаблицаЗагрузки.LineNumber - - - ТаблицаЗагрузкиНомерСтрокиРасширеннаяПодсказка - 22 - Label - true - true - - Left - - - - ТаблицаЗагрузкиНомерСтрокиКонтекстноеМеню - 21 - true - - LabelField - Auto - true - Left - true - - true - true - - - - ТаблицаЗагрузкиПериод - 23 - true - true - - true - - - Объект.ТаблицаЗагрузки.Период - - - ТаблицаЗагрузкиПериодРасширеннаяПодсказка - 25 - Label - true - true - - Left - - - - ТаблицаЗагрузкиПериодКонтекстноеМеню - 24 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузкиОрганизация - 26 - true - true - - true - - - Объект.ТаблицаЗагрузки.Организация - - - ТаблицаЗагрузкиОрганизацияРасширеннаяПодсказка - 28 - Label - true - true - - Left - - - - ТаблицаЗагрузкиОрганизацияКонтекстноеМеню - 27 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузкиКонтрагент - 29 - true - true - - true - - - Объект.ТаблицаЗагрузки.Контрагент - - - ТаблицаЗагрузкиКонтрагентРасширеннаяПодсказка - 31 - Label - true - true - - Left - - - - ТаблицаЗагрузкиКонтрагентКонтекстноеМеню - 30 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузкиДоговор - 32 - true - true - - true - - - Объект.ТаблицаЗагрузки.Договор - - - ТаблицаЗагрузкиДоговорРасширеннаяПодсказка - 34 - Label - true - true - - Left - - - - ТаблицаЗагрузкиДоговорКонтекстноеМеню - 33 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузкиКФО - 35 - true - true - - true - - - Объект.ТаблицаЗагрузки.КФО - - - ТаблицаЗагрузкиКФОРасширеннаяПодсказка - 37 - Label - true - true - - Left - - - - ТаблицаЗагрузкиКФОКонтекстноеМеню - 36 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузкиКПС - 38 - true - true - - true - - - Объект.ТаблицаЗагрузки.КПС - - - ТаблицаЗагрузкиКПСРасширеннаяПодсказка - 40 - Label - true - true - - Left - - - - ТаблицаЗагрузкиКПСКонтекстноеМеню - 39 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузкиСуммаОборотДт - 41 - true - true - - true - - - Объект.ТаблицаЗагрузки.СуммаОборотДт - - - ТаблицаЗагрузкиСуммаОборотДтРасширеннаяПодсказка - 43 - Label - true - true - - Left - - - - ТаблицаЗагрузкиСуммаОборотДтКонтекстноеМеню - 42 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузкиСуммаОборотКт - 44 - true - true - - true - - - Объект.ТаблицаЗагрузки.СуммаОборотКт - - - ТаблицаЗагрузкиСуммаОборотКтРасширеннаяПодсказка - 46 - Label - true - true - - Left - - - - ТаблицаЗагрузкиСуммаОборотКтКонтекстноеМеню - 45 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаЗагрузкиКоманднаяПанель - 9 - - ЗагрузитьИзФайла - 47 - true - true - - true - - - ЗагрузитьИзФайлаРасширеннаяПодсказка - 48 - Label - true - true - - Left - - - Form.Command.ЗагрузитьИзФайла - Normal - Auto - true - true - UserCmds - Auto - - Left - true - - - ТаблицаЗагрузкиСтрокаПоиска - 11 - - ТаблицаЗагрузкиСтрокаПоискаРасширеннаяПодсказка - 13 - Label - true - true - - Left - - - - ТаблицаЗагрузкиСтрокаПоискаКонтекстноеМеню - 12 - true - - ТаблицаЗагрузки - - true - - - - ТаблицаЗагрузкиСостояниеПросмотра - 14 - - ТаблицаЗагрузкиСостояниеПросмотраРасширеннаяПодсказка - 16 - Label - true - true - - Left - - - - ТаблицаЗагрузкиСостояниеПросмотраКонтекстноеМеню - 15 - true - - ViewStatusAddition - ТаблицаЗагрузки - - true - - - - ТаблицаЗагрузкиУправлениеПоиском - 17 - - ТаблицаЗагрузкиУправлениеПоискомРасширеннаяПодсказка - 19 - Label - true - true - - Left - - - - ТаблицаЗагрузкиУправлениеПоискомКонтекстноеМеню - 18 - true - - SearchControlAddition - ТаблицаЗагрузки - - true - - - - ТаблицаЗагрузкиРасширеннаяПодсказка - 10 - Label - true - true - - Left - - - - ТаблицаЗагрузкиКонтекстноеМеню - 8 - true - - true - true - true - true - true - MultiRow -
true
- 1 - 1 - AutoUse - AutoUse - true - true - false - true - Auto - Auto - true - true - true - true - AsFileRef - true - - - - ФормаКоманднаяПанель - -1 - Left - true - - DontBlock - true - true - true - Vertical - true - true - true - auto - true - - Объект - 1 - - DocumentObject.ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов - - - true - - - true - - - Объект.RegisterRecords - -
true
- true - - - ЗагрузитьИзФайла - - <key>ru</key> - <value>Загрузить из файла</value> - - 1 - - ru - Загрузить из файла - - - true - - - - ЗагрузитьИзФайла - - - Auto - Auto - - - - - - - true - - diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/Forms/ФормаДокумента/Module.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/Forms/ФормаДокумента/Module.bsl deleted file mode 100644 index e0842f6..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/Forms/ФормаДокумента/Module.bsl +++ /dev/null @@ -1,67 +0,0 @@ - -&НаСервере -Процедура ЗагрузитьИзФайлаНаСервере(ИмяФайла) - - ТекстовыйДокумент = Новый ТекстовыйДокумент; - ТекстовыйДокумент.Прочитать(ИмяФайла,,Символы.ПС); - - Для НомерСтроки=1 по ТекстовыйДокумент.КоличествоСтрок() Цикл - СтрокаЦельная = ТекстовыйДокумент.ПолучитьСтроку(НомерСтроки); - СтрокаДанных = СтрРазделить(СтрокаЦельная,"^"); - СтрокаТаблицы = Объект.ТаблицаЗагрузки.Добавить(); - СтрокаТаблицы.Период = Дата(СтрокаДанных[0]); - СтрокаТаблицы.Организация = Справочники.Организации.НайтиПоНаименованию(СтрокаДанных[1]); - СтрокаТаблицы.Контрагент = Справочники.Контрагенты.НайтиПоКоду(СтрокаДанных[2]); - СтрокаТаблицы.Договор = Справочники.Договоры.НайтиПоКоду(СтрокаДанных[3]); - ИндексКФО = Число(СтрокаДанных[4]-1); - СтрокаТаблицы.КФО = Перечисления.КВД.Получить(ИндексКФО); - СтрокаТаблицы.КПС = Справочники.КлассификационныеПризнакиСчетов.НайтиПоКоду(СтрокаДанных[5]); - Если СтрокаДанных[7] = "0" И СтрокаДанных[8] = "0" Тогда - СтрокаТаблицы.СуммаОборотДт = Число(СтрокаДанных[9]); - СтрокаТаблицы.СуммаОборотКт = Число(СтрокаДанных[10]); - Иначе - СтрокаТаблицы.СуммаОборотДт = Число(СтрокаДанных[7]); - СтрокаТаблицы.СуммаОборотКт = Число(СтрокаДанных[8]); - КонецЕсли; - - КонецЦикла; - -КонецПроцедуры - -&НаКлиенте -Процедура ЗагрузитьИзФайла(Команда) - - Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие); - Диалог.Заголовок = "Выберите имя файла для открытия"; - Диалог.МножественныйВыбор = Ложь; - Диалог.Фильтр = "Текстовый файл(*.txt)|*.txt"; - Диалог.Выбрать(); - ИмяФайла = Диалог.ПолноеИмяФайла; - - ЗагрузитьИзФайлаНаСервере(ИмяФайла); - - //ТекстовыйДокумент = Новый ТекстовыйДокумент; - //ТекстовыйДокумент.Прочитать(ИмяФайла,,Символы.ПС); - // - //Для НомерСтроки=1 по ТекстовыйДокумент.КоличествоСтрок() Цикл - // СтрокаЦельная = ТекстовыйДокумент.ПолучитьСтроку(НомерСтроки); - // СтрокаДанных = СтрРазделить(СтрокаЦельная,"^"); - // СтрокаТаблицы = Объект.ТаблицаЗагрузки.Добавить(); - // СтрокаТаблицы.Период = Дата(СтрокаДанных[0]); - // СтрокаТаблицы.Организация = Справочники.Организации.НайтиПоНаименованию(СтрокаДанных[1]); - // СтрокаТаблицы.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(СтрокаДанных[2]); - // СтрокаТаблицы.Договор = Справочники.Договоры.НайтиПоКоду(СтрокаДанных[3]); - // СтрокаТаблицы.КФО = Перечисления.КВД.Получить(СтрокаДанных[4]); - // СтрокаТаблицы.КПС = Справочники.КлассификационныеПризнакиСчетов.НайтиПоНаименованию(СтрокаДанных[5]); - // Если СтрокаДанных[7] = "0" ИЛИ СтрокаДанных[8] = "0" Тогда - // СтрокаТаблицы.СуммаОборотДт = Число(СтрокаДанных[9]); - // СтрокаТаблицы.СуммаОборотКт = Число(СтрокаДанных[10]); - // Иначе - // СтрокаТаблицы.СуммаОборотДт = Число(СтрокаДанных[7]); - // СтрокаТаблицы.СуммаОборотКт = Число(СтрокаДанных[8]); - // КонецЕсли; - // - //КонецЦикла; - - -КонецПроцедуры diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/ObjectModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/ObjectModule.bsl deleted file mode 100644 index d51a008..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/ObjectModule.bsl +++ /dev/null @@ -1,23 +0,0 @@ - -Процедура ОбработкаПроведения(Отказ, РежимПроведения) - - НаборЗаписей = РегистрыНакопления.ПС_ОборотыРодительскойПлатыПрошлыхПериодов.СоздатьНаборЗаписей(); - НаборЗаписей.Отбор.Регистратор.Установить(ЭтотОбъект.Ссылка); - НаборЗаписей.Прочитать(); - - Для каждого СтрокаДанных из ЭтотОбъект.ТаблицаЗагрузки Цикл - СтрокаРегистра = НаборЗаписей.Добавить(); - СтрокаРегистра.Период = СтрокаДанных.Период; - СтрокаРегистра.Организация = СтрокаДанных.Организация; - СтрокаРегистра.Контрагент = СтрокаДанных.Контрагент; - СтрокаРегистра.Договор = СтрокаДанных.Договор; - СтрокаРегистра.КФО = СтрокаДанных.КФО; - СтрокаРегистра.КПС = СтрокаДанных.КПС; - СтрокаРегистра.СуммаОборотДт = СтрокаДанных.СуммаОборотДт; - СтрокаРегистра.СуммаОборотКт = СтрокаДанных.СуммаОборотКт; - КонецЦикла; - - НаборЗаписей.Записать(); - - -КонецПроцедуры diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов.mdo deleted file mode 100644 index 162dc54..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов/ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов.mdo +++ /dev/null @@ -1,222 +0,0 @@ - - - - - - - - - - ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов - - ru - ПС Загрузка оборотов родительской платы прошлых периодов - - true - Document.ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов.StandardAttribute.Number - DontUse - - Use - Posted - - Use - - - - - Use - Ref - - Use - - - - - Use - DeletionMark - - Use - - - - - Use - Date - - ShowError - Use - - - - - Use - Number - - Use - - - - Use - Managed - Use - String - 9 - Variable - true - true - Document.ПС_ЗагрузкаОборотовРодительскойПлатыПрошлыхПериодов.Form.ФормаДокумента - AccumulationRegister.ПС_ОборотыРодительскойПлатыПрошлыхПериодов - true - true - - ФормаДокумента - - ru - Форма документа - - PersonalComputer - MobileDevice - - - - - - - ТаблицаЗагрузки - - ru - Таблица загрузки - - - Use - LineNumber - - Use - - - - - Период - - ru - Период - - - Date - - Date - - - - - Use - Use - - - Организация - - ru - Организация - - - CatalogRef.Организации - - - - Use - Use - - - Контрагент - - ru - Контрагент - - - CatalogRef.Контрагенты - - - - Use - Use - - - Договор - - ru - Договор - - - CatalogRef.Договоры - - - - Use - Use - - - КФО - - ru - КФО - - - EnumRef.КВД - - - - Use - Use - - - КПС - - ru - КПС - - - CatalogRef.КлассификационныеПризнакиСчетов - - - - Use - Use - - - СуммаОборотДт - - ru - Сумма оборот ДТ - - - Number - - 15 - 2 - - - - - Use - Use - - - СуммаОборотКт - - ru - Сумма оборот КТ - - - Number - - 15 - 2 - - - - - Use - Use - - - diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/Forms/ФормаДокумента/Form.form b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/Forms/ФормаДокумента/Form.form index 242e339..4e0a74b 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/Forms/ФормаДокумента/Form.form +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/Forms/ФормаДокумента/Form.form @@ -3,24 +3,158 @@ ГруппаОрганизаций 71 - - Организация - 7 - - <key>ru</key> - <value>Организация (отправитель)</value> - + + ГруппаОрганизацииИДокумента + 96 + + Организация + 7 + + <key>ru</key> + <value>Организация (отправитель)</value> + + true + true + + true + + + Объект.Организация + + + ОрганизацияРасширеннаяПодсказка + 9 + Label + true + true + + Left + + + + ОрганизацияКонтекстноеМеню + 8 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + + Style.ReportHeaderBackColor + + Normal + + + + ДокументНачисления + 19 + true + true + + true + + + Объект.ДокументНачисления + + + OnChange + ДокументНачисленияПриИзменении + + + ДокументНачисленияРасширеннаяПодсказка + 21 + Label + true + true + + Left + + + + ДокументНачисленияКонтекстноеМеню + 20 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + Период + 13 + true + true + + true + + + Объект.Период + + + ПериодРасширеннаяПодсказка + 15 + Label + true + true + + Left + + + + ПериодКонтекстноеМеню + 14 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + true true true - - Объект.Организация - + + <key>ru</key> + <value>Группа организации и документа</value> + - ОрганизацияРасширеннаяПодсказка - 9 + ГруппаОрганизацииИДокументаРасширеннаяПодсказка + 97 Label true true @@ -28,28 +162,14 @@ Left - - ОрганизацияКонтекстноеМеню - 8 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - - Style.ReportHeaderBackColor - - Normal + UsualGroup + + Auto + Auto + true + true + Auto + Auto @@ -271,243 +391,26 @@ Auto - - Период - 13 - true - true - - true - - - Объект.Период - - - ПериодРасширеннаяПодсказка - 15 - Label - true - true - - Left - - - - ПериодКонтекстноеМеню - 14 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - СуммаДокумента - 16 - true - false - - true - - - Объект.СуммаДокумента - - - СуммаДокументаРасширеннаяПодсказка - 18 - Label - true - true - - Left - - - - СуммаДокументаКонтекстноеМеню - 17 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ДокументНачисления - 19 - true - true - - true - - - Объект.ДокументНачисления - - - OnChange - ДокументНачисленияПриИзменении - - - ДокументНачисленияРасширеннаяПодсказка - 21 - Label - true - true - - Left - - - - ДокументНачисленияКонтекстноеМеню - 20 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ИФО - 22 - true - true - - true - - - Объект.ИФО - - - ИФОРасширеннаяПодсказка - 24 - Label - true - true - - Left - - - - ИФОКонтекстноеМеню - 23 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - Задолженность - 28 - true - true - - true - - - Объект.Задолженность - - None - - ЗадолженностьНомерСтроки - 41 - true - true - - true - - - Объект.Задолженность.LineNumber - - - ЗадолженностьНомерСтрокиРасширеннаяПодсказка - 43 - Label - true - true - - Left - - - - ЗадолженностьНомерСтрокиКонтекстноеМеню - 42 - true - - LabelField - EnterOnInput - true - Left - true - - true - true - - + + ГруппаСтраницФормы + 90 - ЗадолженностьГруппаКонтрагента - 73 + ГруппаСтраницыЗадолженностей + 92 - ЗадолженностьКонтрагент - 44 + СуммаДокумента + 16 true true true - Объект.Задолженность.Контрагент + Объект.СуммаДокумента - ЗадолженностьКонтрагентРасширеннаяПодсказка - 46 + СуммаДокументаРасширеннаяПодсказка + 18 Label true true @@ -516,8 +419,529 @@ - ЗадолженностьКонтрагентКонтекстноеМеню - 45 + СуммаДокументаКонтекстноеМеню + 17 + true + + InputField + true + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + Задолженность + 28 + true + true + + true + + + Объект.Задолженность + + None + + ЗадолженностьНомерСтроки + 41 + true + true + + true + + + Объект.Задолженность.LineNumber + + + ЗадолженностьНомерСтрокиРасширеннаяПодсказка + 43 + Label + true + true + + Left + + + + ЗадолженностьНомерСтрокиКонтекстноеМеню + 42 + true + + LabelField + EnterOnInput + true + Left + true + + true + true + + + + ЗадолженностьГруппаКонтрагента + 73 + + ЗадолженностьКонтрагент + 44 + true + true + + true + + + Объект.Задолженность.Контрагент + + + ЗадолженностьКонтрагентРасширеннаяПодсказка + 46 + Label + true + true + + Left + + + + ЗадолженностьКонтрагентКонтекстноеМеню + 45 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьДоговор + 47 + true + true + + true + + + Объект.Задолженность.Договор + + + ЗадолженностьДоговорРасширеннаяПодсказка + 49 + Label + true + true + + Left + + + + ЗадолженностьДоговорКонтекстноеМеню + 48 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + true + true + + true + + + <key>ru</key> + <value>Задолженность группа контрагента</value> + + + ЗадолженностьГруппаКонтрагентаРасширеннаяПодсказка + 74 + Label + true + true + + Left + + + ColumnGroup + + Vertical + auto + true + + + + ЗадолженностьРебенок + 50 + true + true + + true + + + Объект.Задолженность.Ребенок + + + ЗадолженностьРебенокРасширеннаяПодсказка + 52 + Label + true + true + + Left + + + + ЗадолженностьРебенокКонтекстноеМеню + 51 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьИДСтроки + 53 + true + + true + + + Объект.Задолженность.ИДСтроки + + + ЗадолженностьИДСтрокиРасширеннаяПодсказка + 55 + Label + true + true + + Left + + + + ЗадолженностьИДСтрокиКонтекстноеМеню + 54 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьКПС + 59 + true + true + + true + + + Объект.Задолженность.КПС + + + ЗадолженностьКПСРасширеннаяПодсказка + 61 + Label + true + true + + Left + + + + ЗадолженностьКПСКонтекстноеМеню + 60 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьСумма + 56 + true + true + + true + + + Объект.Задолженность.Сумма + + + ЗадолженностьСуммаРасширеннаяПодсказка + 58 + Label + true + true + + Left + + + + ЗадолженностьСуммаКонтекстноеМеню + 57 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьКоманднаяПанель + 30 + Left + true + + + OnChange + ЗадолженностьПриИзменении + + + ЗадолженностьСтрокаПоиска + 32 + + ЗадолженностьСтрокаПоискаРасширеннаяПодсказка + 34 + Label + true + true + + Left + + + + ЗадолженностьСтрокаПоискаКонтекстноеМеню + 33 + true + + Задолженность + + true + + + + ЗадолженностьСостояниеПросмотра + 35 + + ЗадолженностьСостояниеПросмотраРасширеннаяПодсказка + 37 + Label + true + true + + Left + + + + ЗадолженностьСостояниеПросмотраКонтекстноеМеню + 36 + true + + ViewStatusAddition + Задолженность + + true + + + + ЗадолженностьУправлениеПоиском + 38 + + ЗадолженностьУправлениеПоискомРасширеннаяПодсказка + 40 + Label + true + true + + Left + + + + ЗадолженностьУправлениеПоискомКонтекстноеМеню + 39 + true + + SearchControlAddition + Задолженность + + true + + + + ЗадолженностьРасширеннаяПодсказка + 31 + Label + true + true + + Left + + + + ЗадолженностьКонтекстноеМеню + 29 + true + + true + true + true + true + true + MultiRow + Auto +
true
+ 1 + 1 + AutoUse + AutoUse + true + true + true + Auto + Auto + true + true + true + true + AsFileRef + true + + true + + true + true + + true + + + <key>ru</key> + <value>Начисления</value> + + + ГруппаСтраницыЗадолженностейРасширеннаяПодсказка + 93 + Label + true + true + + Left + + + Page + + Auto + auto + + + + ГруппаСтраницыОперации + 94 + + ИФО + 22 + true + true + + true + + + Объект.ИФО + + + ИФОРасширеннаяПодсказка + 24 + Label + true + true + + Left + + + + ИФОКонтекстноеМеню + 23 true InputField @@ -537,19 +961,23 @@ - ЗадолженностьДоговор - 47 + КФО + 84 + + <key>ru</key> + <value>КФО</value> + true true true - Объект.Задолженность.Договор + Объект.КФО - ЗадолженностьДоговорРасширеннаяПодсказка - 49 + КФОРасширеннаяПодсказка + 86 Label true true @@ -558,12 +986,57 @@ - ЗадолженностьДоговорКонтекстноеМеню - 48 + КФОКонтекстноеМеню + 85 true InputField - EnterOnInput + Enter + true + Left + true + + true + true + true + true + true + true + Normal + + + + Комментарий + 87 + + <key>ru</key> + <value>Комментарий</value> + + true + true + + true + + + Объект.Комментарий + + + КомментарийРасширеннаяПодсказка + 89 + Label + true + true + + Left + + + + КомментарийКонтекстноеМеню + 88 + true + + InputField + Enter true Left true @@ -571,7 +1044,6 @@ true true true - true true true true @@ -585,11 +1057,11 @@ <key>ru</key> - <value>Задолженность группа контрагента</value> + <value>Операция</value> - ЗадолженностьГруппаКонтрагентаРасширеннаяПодсказка - 74 + ГруппаСтраницыОперацииРасширеннаяПодсказка + 95 Label true true @@ -597,307 +1069,24 @@ Left - ColumnGroup - - Vertical + Page + + Auto auto - true - - ЗадолженностьРебенок - 50 - true - true - - true - - - Объект.Задолженность.Ребенок - - - ЗадолженностьРебенокРасширеннаяПодсказка - 52 - Label - true - true - - Left - - - - ЗадолженностьРебенокКонтекстноеМеню - 51 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьИДСтроки - 53 - true - true - - true - - - Объект.Задолженность.ИДСтроки - - - ЗадолженностьИДСтрокиРасширеннаяПодсказка - 55 - Label - true - true - - Left - - - - ЗадолженностьИДСтрокиКонтекстноеМеню - 54 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьСумма - 56 - true - true - - true - - - Объект.Задолженность.Сумма - - - ЗадолженностьСуммаРасширеннаяПодсказка - 58 - Label - true - true - - Left - - - - ЗадолженностьСуммаКонтекстноеМеню - 57 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьКПС - 59 - true - true - - true - - - Объект.Задолженность.КПС - - - ЗадолженностьКПСРасширеннаяПодсказка - 61 - Label - true - true - - Left - - - - ЗадолженностьКПСКонтекстноеМеню - 60 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьКЭК - 62 - true - true - - true - - - Объект.Задолженность.КЭК - - - ЗадолженностьКЭКРасширеннаяПодсказка - 64 - Label - true - true - - Left - - - - ЗадолженностьКЭККонтекстноеМеню - 63 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьКоманднаяПанель - 30 - Left - true - - - OnChange - ЗадолженностьПриИзменении - - - ЗадолженностьСтрокаПоиска - 32 - - ЗадолженностьСтрокаПоискаРасширеннаяПодсказка - 34 - Label - true - true - - Left - - - - ЗадолженностьСтрокаПоискаКонтекстноеМеню - 33 - true - - Задолженность - - true - - - - ЗадолженностьСостояниеПросмотра - 35 - - ЗадолженностьСостояниеПросмотраРасширеннаяПодсказка - 37 - Label - true - true - - Left - - - - ЗадолженностьСостояниеПросмотраКонтекстноеМеню - 36 - true - - ViewStatusAddition - Задолженность - - true - - - - ЗадолженностьУправлениеПоиском - 38 - - ЗадолженностьУправлениеПоискомРасширеннаяПодсказка - 40 - Label - true - true - - Left - - - - ЗадолженностьУправлениеПоискомКонтекстноеМеню - 39 - true - - SearchControlAddition - Задолженность - - true - - + true + true + + true + + + <key>ru</key> + <value>Группа страниц формы</value> + - ЗадолженностьРасширеннаяПодсказка - 31 + ГруппаСтраницФормыРасширеннаяПодсказка + 91 Label true true @@ -905,36 +1094,11 @@ Left - - ЗадолженностьКонтекстноеМеню - 29 - true - - true - true - true - true - true - MultiRow - Auto -
true
- 1 - 1 - AutoUse - AutoUse - true - true - true - Auto - Auto - true - true - true - true - AsFileRef - true - - true + Pages + + Auto + Auto + Ответственный @@ -979,6 +1143,40 @@ Normal + + БухгалтерскаяОперация + 82 + true + true + + true + + + <key>ru</key> + <value>Бухгалтерская операция</value> + + + БухгалтерскаяОперацияРасширеннаяПодсказка + 83 + Label + true + true + + Left + + + UsualGroup + + Auto + Auto + Auto + true + true + auto + Auto + Auto + + ФормаКоманднаяПанель -1 @@ -1120,6 +1318,9 @@ true + + StdPicture.DebitCredit + ПросмотрБухгалтерскихЗаписей @@ -1147,6 +1348,26 @@ + + BeforeWrite + ПередЗаписью + + + BeforeWriteAtServer + ПередЗаписьюНаСервере + + + AfterWriteAtServer + ПослеЗаписиНаСервере + + + OnReadAtServer + ПриЧтенииНаСервере + + + AfterWrite + ПослеЗаписи + true diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/Forms/ФормаДокумента/Module.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/Forms/ФормаДокумента/Module.bsl index 9bd8bdf..14f0fec 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/Forms/ФормаДокумента/Module.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/Forms/ФормаДокумента/Module.bsl @@ -5,6 +5,13 @@ &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) + БухгалтерскиеОперацииСервер.ПриСозданииНаСервере(Отказ, СтандартнаяОбработка, Элементы.БухгалтерскаяОперация); + + // ИФО показывается только при включённом учёте по ИФО (как в типовых документах). + Элементы.ИФО.Видимость = ПолучитьФункциональнуюОпцию("ИспользоватьУчетПоИФО"); + // КПС определяется автоматически по настройкам учётной политики. + Элементы.ЗадолженностьКПС.ТолькоПросмотр = Истина; + Если НЕ ЗначениеЗаполнено(Объект.Ссылка) Тогда Основание = Неопределено; Если Параметры.Свойство("Основание", Основание) @@ -13,7 +20,6 @@ ЗаполнитьПоДокументуНачисленияНаСервере(Основание); КонецЕсли; - // Дефолт ЦБ получателя из константы БГУ 2.0 (поиск контрагента по ИНН организации ЦБ). Если НЕ ЗначениеЗаполнено(Объект.ЦБ) Тогда Объект.ЦБ = ПС_РаботаСКонтрагентами.КонтрагентЦБПоУмолчанию(); КонецЕсли; @@ -21,6 +27,41 @@ КонецПроцедуры +&НаСервере +Процедура ПриЧтенииНаСервере(ТекущийОбъект) + + БухгалтерскиеОперацииСервер.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект, Элементы.БухгалтерскаяОперация); + +КонецПроцедуры + +&НаКлиенте +Процедура ПередЗаписью(Отказ, ПараметрыЗаписи) + + БухгалтерскиеОперацииКлиент.ПередЗаписью(Отказ, ПараметрыЗаписи, ЭтотОбъект); + +КонецПроцедуры + +&НаСервере +Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи) + + БухгалтерскиеОперацииСервер.ПередЗаписью(Отказ, ТекущийОбъект, ПараметрыЗаписи, ЭтотОбъект); + +КонецПроцедуры + +&НаКлиенте +Процедура ПослеЗаписи(ПараметрыЗаписи) + + БухгалтерскиеОперацииКлиент.ПослеЗаписи(ПараметрыЗаписи, ЭтотОбъект); + +КонецПроцедуры + +&НаСервере +Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи) + + БухгалтерскиеОперацииСервер.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписи); + +КонецПроцедуры + #КонецОбласти #Область ОбработчикиКомандФормы @@ -105,6 +146,13 @@ Возврат; КонецЕсли; + // Заполнение возможно только на основании проведённого документа начисления. + Если НЕ ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ДокументНачисленияСсылка, "Проведен") Тогда + ОбщегоНазначения.СообщитьПользователю( + "Заполнение документа возможно только на основании проведённого документа начисления родительской платы."); + Возврат; + КонецЕсли; + Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ @@ -140,9 +188,11 @@ КонецЕсли; Объект.Организация = ВыборкаШапка.Организация; - Объект.ИФО = ВыборкаШапка.ИФО; Объект.Ответственный = ВыборкаШапка.Ответственный; Объект.ДокументНачисления = ДокументНачисленияСсылка; + Если ПолучитьФункциональнуюОпцию("ИспользоватьУчетПоИФО") Тогда + Объект.ИФО = ВыборкаШапка.ИФО; + КонецЕсли; Если ЗначениеЗаполнено(ВыборкаШапка.НачалоПериода) Тогда Объект.Период = ВыборкаШапка.НачалоПериода; @@ -169,6 +219,9 @@ КонецЦикла; + // КФО документа и КПС строк - из проводок документа начисления. + ПС_УчетРодительскойПлаты.ЗаполнитьРеквизитыУчетаПоПроводкам(Объект, ДокументНачисленияСсылка); + КонецПроцедуры &НаКлиенте diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ManagerModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ManagerModule.bsl index 772089a..6e8988f 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ManagerModule.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ManagerModule.bsl @@ -1,8 +1,8 @@ // ПС_ПередачаЗадолженностиВЦБ: модуль менеджера. -// Печатная форма Извещения (ф. 0504805, ред. 103н) - сторона отправителя (сад). -// Используется типовая вёрстка макета ИзвещениеИсходящее с областями: -// Заголовок, ПояснениеМБТ, Строка, Итого, Подвал. -// Проводка между садом и ЦБ по 205.31/304.04 - одна сводная на документ. +// Печатная форма извещения (ф. 0504805, ред. 103н) - сторона отправителя (учреждение). +// Заполнение макета выполняет общая логика подсистемы: ПС_УчетРодительскойПлаты.ПечатьИзвещения0504805. + +#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда #Область ПрограммныйИнтерфейс @@ -10,76 +10,17 @@ // Вызывается из модуля формы документа кнопкой "Печать". // // Параметры: -// ДокументСсылка - DocumentRef.ПС_ПередачаЗадолженностиВЦБ - печатаемый документ. +// ДокументСсылка - ДокументСсылка.ПС_ПередачаЗадолженностиВЦБ - печатаемый документ. // // Возвращаемое значение: // ТабличныйДокумент // Функция СформироватьПечатныеФормыИзвещений(ДокументСсылка) Экспорт - ТабличныйДокумент = Новый ТабличныйДокумент; - ТабличныйДокумент.КлючПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПС_ПередачаЗадолженностиВЦБ_Извещение0504805"; - - Макет = ПолучитьМакет("ПФ_MXL_Извещение0504805_103н_ПС_РП"); - Если Макет = Неопределено Тогда - Возврат ТабличныйДокумент; - КонецЕсли; - - Если НЕ ДокументСсылка.Проведен Тогда - Возврат ТабличныйДокумент; - КонецЕсли; - - ДокументОбъект = ДокументСсылка.ПолучитьОбъект(); - Если ДокументОбъект = Неопределено ИЛИ ДокументОбъект.Задолженность.Количество() = 0 Тогда - Возврат ТабличныйДокумент; - КонецЕсли; - - Счет304_04_130 = ПланыСчетов.ЕПСБУ.НайтиПоКоду("304.04.130"); - Счет205_31_66X = ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.31.66X"); - Счет205_31_56X = ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.31.56X"); - - ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок"); - ОбластьЗаголовок.Параметры.Номер = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(ДокументСсылка.Номер, Истина, Истина); - ОбластьЗаголовок.Параметры.Дата = Формат(ДокументСсылка.Дата, "ДЛФ=DD"); - ОбластьЗаголовок.Параметры.пНаименованиеОтправитель = Строка(ДокументОбъект.Организация); - ОбластьЗаголовок.Параметры.пНаименованиеПолучатель = Строка(ДокументОбъект.ЦБ); - ТабличныйДокумент.Вывести(ОбластьЗаголовок); - - ОбластьПояснение = Макет.ПолучитьОбласть("ПояснениеМБТ"); - ОбластьПояснение.Параметры.ПояснениеМБТ = "Передача задолженности по родительской плате за " - + Формат(ДокументОбъект.Период, "ДФ=MMMM yyyy") - + ". Основание: " + Строка(ДокументОбъект.ДокументНачисления) + "."; - ТабличныйДокумент.Вывести(ОбластьПояснение); - - ОбластьСтрока = Макет.ПолучитьОбласть("Строка"); - ОбластьСтрока.Параметры.пСодержание = "Передача задолженности по родительской плате"; - ОбластьСтрока.Параметры.пДебетСчетОтправитель = Строка(Счет304_04_130); - ОбластьСтрока.Параметры.пКредитСчетОтправитель = Строка(Счет205_31_66X); - ОбластьСтрока.Параметры.пСуммаОтправитель = Формат(ДокументОбъект.СуммаДокумента, "ЧДЦ=2; ЧРГ=' '"); - ОбластьСтрока.Параметры.пДебетСчетПолучатель = Строка(Счет205_31_56X); - ОбластьСтрока.Параметры.пКредитСчетПолучатель = Строка(Счет304_04_130); - ОбластьСтрока.Параметры.пСуммаПолучатель = Формат(ДокументОбъект.СуммаДокумента, "ЧДЦ=2; ЧРГ=' '"); - ТабличныйДокумент.Вывести(ОбластьСтрока); - - ОбластьИтого = Макет.ПолучитьОбласть("Итого"); - ОбластьИтого.Параметры.пИтогоСуммаОтправитель = Формат(ДокументОбъект.СуммаДокумента, "ЧДЦ=2; ЧРГ=' '"); - ОбластьИтого.Параметры.пИтогоСуммаПолучатель = Формат(ДокументОбъект.СуммаДокумента, "ЧДЦ=2; ЧРГ=' '"); - ТабличныйДокумент.Вывести(ОбластьИтого); - - ОбластьПодвал = Макет.ПолучитьОбласть("Подвал"); - ОбластьПодвал.Параметры.пФИОРуководительОтправитель = Строка(ДокументОбъект.Организация.Руководитель); - ОбластьПодвал.Параметры.пФИОБухгалтерОтправитель = Строка(ДокументОбъект.Организация.ГлавныйБухгалтер); - ОбластьПодвал.Параметры.пФИОРуководительПолучатель = Строка(ДокументОбъект.ЦБ.Руководитель); - ОбластьПодвал.Параметры.пФИОБухгалтерПолучатель = Строка(ДокументОбъект.ЦБ.ГлавныйБухгалтер); - ОбластьПодвал.Параметры.ДолжностьИсполнительОтправитель = "Главный бухгалтер"; - ОбластьПодвал.Параметры.ФИОИсполнительОтправитель = Строка(ДокументОбъект.Ответственный); - ОбластьПодвал.Параметры.ДолжностьИсполнительПолучатель = "Главный бухгалтер"; - ОбластьПодвал.Параметры.ФИОИсполнительПолучатель = Строка(ДокументОбъект.Ответственный); - ОбластьПодвал.Параметры.пКоличествоПриложений = ДокументОбъект.Задолженность.Количество(); - ТабличныйДокумент.Вывести(ОбластьПодвал); - - Возврат ТабличныйДокумент; + Возврат ПС_УчетРодительскойПлаты.ПечатьИзвещения0504805(ДокументСсылка); КонецФункции #КонецОбласти + +#КонецЕсли diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ObjectModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ObjectModule.bsl index 74bc181..2cb8006 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ObjectModule.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ObjectModule.bsl @@ -1,11 +1,23 @@ -// ПС_ПередачаЗадолженностиВЦБ: обработка проведения. -// Этап 2 из методических рекомендаций по учёту родительской платы ЦБ ОУО. -// На стороне детского сада (л/с 03): Дт 1.304.04.130 — Кт 1.205.31.66X. +// ПС_ПередачаЗадолженностиВЦБ: модуль объекта. +// Сторона детского сада: Дт 304.04.130 — Кт 205.31.66X. +// Проводки формируются в процедуре ОбработкаПроведения прямым заполнением +// набора записей регистра бухгалтерии ЖурналПроводокЕПСБУ. + +#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда + +#Область ОбработчикиСобытий Процедура ОбработкаЗаполнения(ДанныеЗаполнения, ТекстЗаполнения, СтандартнаяОбработка) Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.НачислениеРодительскойПлаты") Тогда + // Заполнение возможно только на основании проведённого документа начисления. + Если НЕ ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ДанныеЗаполнения, "Проведен") Тогда + ОбщегоНазначения.СообщитьПользователю( + "Заполнение документа возможно только на основании проведённого документа начисления родительской платы."); + Возврат; + КонецЕсли; + Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ @@ -22,9 +34,12 @@ ВыборкаШапка = Запрос.Выполнить().Выбрать(); Если ВыборкаШапка.Следующий() Тогда Организация = ВыборкаШапка.Организация; - ИФО = ВыборкаШапка.ИФО; Ответственный = ВыборкаШапка.Ответственный; ДокументНачисления = ДанныеЗаполнения; + // Учёт по ИФО ведётся только при включённой функциональной опции. + Если ПолучитьФункциональнуюОпцию("ИспользоватьУчетПоИФО") Тогда + ИФО = ВыборкаШапка.ИФО; + КонецЕсли; Если ЗначениеЗаполнено(ВыборкаШапка.НачалоПериода) Тогда Период = ВыборкаШапка.НачалоПериода; Иначе @@ -54,107 +69,162 @@ СуммаДокумента = СуммаДокумента + ВыборкаСтроки.Сумма; КонецЦикла; + // КФО документа и КПС строк - из проводок документа начисления. + ПС_УчетРодительскойПлаты.ЗаполнитьРеквизитыУчетаПоПроводкам(ЭтотОбъект, ДанныеЗаполнения); + КонецЕсли; КонецПроцедуры Процедура ОбработкаПроведения(Отказ, РежимПроведения) - Если Отказ Тогда - Возврат; - КонецЕсли; - - // Контроль заполнения шапки - Если НЕ ЗначениеЗаполнено(Организация) Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "Не заполнена организация (учреждение-сад)"; - СообщениеПользователю.Поле = "Организация"; - СообщениеПользователю.УстановитьДанные(ЭтотОбъект); - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; - КонецЕсли; - - Если НЕ ЗначениеЗаполнено(ЦБ) Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "Не заполнен получатель - ЦБ (администратор доходов)"; - СообщениеПользователю.Поле = "ЦБ"; - СообщениеПользователю.УстановитьДанные(ЭтотОбъект); - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; - КонецЕсли; - - Если Задолженность.Количество() = 0 Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "Не заполнена табличная часть ""Задолженность"""; - СообщениеПользователю.Поле = "Задолженность"; - СообщениеПользователю.УстановитьДанные(ЭтотОбъект); - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; - КонецЕсли; - - // Контроль суммы документа - СуммаПоТаблице = Задолженность.Итог("Сумма"); - Если СуммаДокумента <> СуммаПоТаблице Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "Сумма документа (" + Формат(СуммаДокумента, "ЧДЦ=2; ЧРГ=' '") - + ") не совпадает с итогом по табличной части (" + Формат(СуммаПоТаблице, "ЧДЦ=2; ЧРГ=' '") + ")"; - СообщениеПользователю.Поле = "СуммаДокумента"; - СообщениеПользователю.УстановитьДанные(ЭтотОбъект); - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; - КонецЕсли; - - // Получаем счета из плана счетов - Счет304_04_130 = ПланыСчетов.ЕПСБУ.НайтиПоКоду("304.04.130"); - Счет205_31_66X = ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.31.66X"); - - Если НЕ ЗначениеЗаполнено(Счет304_04_130) Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "В плане счетов ЕПСБУ не найден счёт 304.04.130"; - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; - КонецЕсли; - - Если НЕ ЗначениеЗаполнено(Счет205_31_66X) Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "В плане счетов ЕПСБУ не найден счёт 205.31.66X"; - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; - КонецЕсли; - + Движения.ЖурналПроводокЕПСБУ.Очистить(); Движения.ЖурналПроводокЕПСБУ.Записывать = Истина; + Движения.ЖурналПроводокЕПСБУ.ДополнительныеСвойства.Вставить("НеФормироватьУчетныеДанныеИзПроводок"); - НомерСтроки = 0; + СчетДт = БухгалтерскийУчет.СчетПоКоду("304.04", Дата, Организация); + СчетКт = БухгалтерскийУчет.СчетПоКоду("205.31", Дата, Организация); + ЖурналОпераций = БухгалтерскийУчетПовтИсп.НомерЖурнала(СчетДт, СчетКт); + + // КЭК счёта 304.04 несёт экономический смысл операции: для доходной операции это КЭК + // счёта 401.10 проводок документа начисления. Автоматически он не определяется. + КЭК30404 = ПС_УчетРодительскойПлаты.КЭКПоЭкономическомуСмыслу(ДокументНачисления); + Если НЕ ЗначениеЗаполнено(КЭК30404) Тогда + КЭК30404 = КЭКПроводки(СчетДт, "Дт", ЦБ); + КонецЕсли; + + // КПС строк наследуется из проводок документа начисления (см. ЗаполнитьКПССтрок), + // КЭК счёта 205.31 определяется по настройкам счёта и типу контрагента (подстатья КОСГУ). Для Каждого СтрокаЗадолженности Из Задолженность Цикл - НомерСтроки = НомерСтроки + 1; + Движение = Движения.ЖурналПроводокЕПСБУ.Добавить(); + Движение.Период = Дата; + Движение.Организация = Организация; + Движение.ИФО = ИФО; + Движение.КФО = КФО; + Движение.СчетДт = СчетДт; + Движение.СчетКт = СчетКт; + Движение.КПСДт = СтрокаЗадолженности.КПС; + Движение.КПСКт = СтрокаЗадолженности.КПС; + Движение.КЭКДт = КЭК30404; + Движение.КЭККт = КЭКПроводки(СчетКт, "Кт", СтрокаЗадолженности.Контрагент, СтрокаЗадолженности.Договор); + Движение.Сумма = СтрокаЗадолженности.Сумма; + Движение.ЖурналОпераций = ЖурналОпераций; + Движение.Содержание = "Передача задолженности по родительской плате в ЦБ"; - Если СтрокаЗадолженности.Сумма = 0 Тогда - Продолжить; - КонецЕсли; - - Проводка = Движения.ЖурналПроводокЕПСБУ.Добавить(); - Проводка.Период = Дата; - Проводка.Организация = Организация; - Проводка.СчетДт = Счет304_04_130; - Проводка.СчетКт = Счет205_31_66X; - Проводка.Сумма = СтрокаЗадолженности.Сумма; - - // Субконто Дт по счёту 304.04.130: 1 — Контрагенты (ЦБ как администратор доходов) - Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Контрагенты] = ЦБ; - - // Субконто Кт по счёту 205.31.66X: 1 — Контрагенты (плательщик-родитель), 2 — Договоры - Проводка.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.Контрагенты] = СтрокаЗадолженности.Контрагент; - Проводка.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.Договоры] = СтрокаЗадолженности.Договор; - - Проводка.Содержание = "Передача задолженности по родительской плате в ЦБ (АДБ)"; + Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.КорреспондентыПоВнутреннимРасчетам] = ЦБ; + Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.Контрагенты] = СтрокаЗадолженности.Контрагент; + Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.Договоры] = СтрокаЗадолженности.Договор; КонецЦикла; + // В конфигурации есть подписка на событие "ОбработкаПроведения" (ЗаписатьТаблицуПроводок), + // которая выполняется после модуля объекта и перезаписывает проводки документа: если таблица + // проводок не передана, набор записей регистра очищается. Поэтому передаём сформированную + // таблицу через ДополнительныеСвойства.ДанныеАвтоПроведения.ТаблицаПроводок. + БухгалтерскиеОперацииСервер.ИнициализироватьБухгалтерскиеОперации(ЭтотОбъект); + ДополнительныеСвойства.ДанныеАвтоПроведения.ТаблицаПроводок = Движения.ЖурналПроводокЕПСБУ.Выгрузить(); + КонецПроцедуры + +Процедура ОбработкаУдаленияПроведения(Отказ) + + Движения.ЖурналПроводокЕПСБУ.Записывать = Истина; + +КонецПроцедуры + +Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения) + + Если ОбменДанными.Загрузка Тогда + Возврат; + КонецЕсли; + + ОбновлениеИнформационнойБазы.ПроверитьОбъектОбработан(ЭтотОбъект); + + СуммаДокумента = Задолженность.Итог("Сумма"); + ЗаполнитьКПССтрок(); + +КонецПроцедуры + +Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты) + + Если НЕ ЗначениеЗаполнено(Организация) Тогда + ОбщегоНазначения.СообщитьПользователю("Не заполнена организация (учреждение-сад)", , "Организация", "Объект", Отказ); + КонецЕсли; + + Если НЕ ЗначениеЗаполнено(ЦБ) Тогда + ОбщегоНазначения.СообщитьПользователю("Не заполнен получатель - ЦБ (администратор доходов)", , "ЦБ", "Объект", Отказ); + КонецЕсли; + + Если НЕ ЗначениеЗаполнено(ДокументНачисления) Тогда + ОбщегоНазначения.СообщитьПользователю("Не заполнен документ начисления родительской платы", , "ДокументНачисления", "Объект", Отказ); + КонецЕсли; + + Если НЕ ЗначениеЗаполнено(КФО) Тогда + ОбщегоНазначения.СообщитьПользователю("Не заполнен КФО", , "КФО", "Объект", Отказ); + КонецЕсли; + + Если Задолженность.Количество() = 0 Тогда + ОбщегоНазначения.СообщитьПользователю("Не заполнена табличная часть ""Задолженность""", , "Задолженность", "Объект", Отказ); + Иначе + Для Каждого СтрокаЗадолженности Из Задолженность Цикл + Если НЕ ЗначениеЗаполнено(СтрокаЗадолженности.КПС) Тогда + ОбщегоНазначения.СообщитьПользователю( + "Не заполнен КПС строки табличной части ""Задолженность"". Заполнение возможно только на основании проведённого документа начисления родительской платы.", + , "Задолженность", "Объект", Отказ); + Прервать; + КонецЕсли; + КонецЦикла; + КонецЕсли; + + СуммаПоТаблице = Задолженность.Итог("Сумма"); + Если СуммаДокумента <> СуммаПоТаблице Тогда + ОбщегоНазначения.СообщитьПользователю("Сумма документа не совпадает с итогом по табличной части", , "СуммаДокумента", "Объект", Отказ); + КонецЕсли; + +КонецПроцедуры + +#КонецОбласти + +#Область СлужебныеПроцедурыИФункции + +// Заполняет строки табличной части "Задолженность" КПС, унаследованным +// из проводок документа начисления родительской платы. +// +Процедура ЗаполнитьКПССтрок() + + ПС_УчетРодительскойПлаты.ЗаполнитьРеквизитыУчетаПоПроводкам(ЭтотОбъект, ДокументНачисления); + +КонецПроцедуры + +// Возвращает КЭК проводки, определённый по настройкам счёта +// и типу контрагента (подстатья КОСГУ). +// +// Параметры: +// Счет - ПланСчетовСсылка.ЕПСБУ - счёт проводки. +// ДтКт - Строка - сторона проводки: "Дт" или "Кт". +// Субконто1 - Произвольный - значение первого субконто проводки. +// Субконто2 - Произвольный - значение второго субконто проводки. +// +// Возвращаемое значение: +// СправочникСсылка.КОСГУ - КЭК проводки. +// +Функция КЭКПроводки(Счет, ДтКт, Субконто1 = Неопределено, Субконто2 = Неопределено) + + ПараметрыКЭК = БухгалтерскийУчетКлиентСервер.ПараметрыРасчетаКЭКПроводки(); + ПараметрыКЭК.Организация = Организация; + ПараметрыКЭК.ИФО = ИФО; + ПараметрыКЭК.КФО = КФО; + ПараметрыКЭК.Дата = Дата; + ПараметрыКЭК.Счет = Счет; + ПараметрыКЭК.ДтКт = ДтКт; + ПараметрыКЭК.Субконто1 = Субконто1; + ПараметрыКЭК.Субконто2 = Субконто2; + + Возврат БухгалтерскийУчет.КЭКПроводки(ПараметрыКЭК); + +КонецФункции + +#КонецОбласти + +#КонецЕсли diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ПС_ПередачаЗадолженностиВЦБ.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ПС_ПередачаЗадолженностиВЦБ.mdo index 253fb46..47b9828 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ПС_ПередачаЗадолженностиВЦБ.mdo +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПередачаЗадолженностиВЦБ/ПС_ПередачаЗадолженностиВЦБ.mdo @@ -10,11 +10,10 @@ ПС_ПередачаЗадолженностиВЦБ ru - ПС Передача задолженности в ЦБ + Передача начислений в ЦБ true DontUse - Document.ПС_ПринятиеЗадолженностиОтУчреждения Use Use @@ -23,7 +22,7 @@ ru - Передача задолженности в ЦБ (сады) + Передача начислений в ЦБ String 9 @@ -146,6 +145,38 @@ Use Use + + Комментарий + + ru + Комментарий + + + String + + + true + + + + Use + Use + + + КФО + + ru + КФО + + + EnumRef.КВД + + + + + Use + Use + ФормаДокумента @@ -250,20 +281,6 @@ Use Use - - КЭК - - ru - КЭК - - - CatalogRef.КОСГУ - - - - Use - Use - ПФ_MXL_Извещение0504805_103н_ПС_РП diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/Forms/ФормаДокумента/Form.form b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/Forms/ФормаДокумента/Form.form index c07e80c..5c15b16 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/Forms/ФормаДокумента/Form.form +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/Forms/ФормаДокумента/Form.form @@ -3,20 +3,154 @@ ГруппаОрганизации 71 - - Организация - 7 + + ГруппаДокумента + 90 + + Организация + 7 + true + true + + true + + + Объект.Организация + + + ОрганизацияРасширеннаяПодсказка + 9 + Label + true + true + + Left + + + + ОрганизацияКонтекстноеМеню + 8 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + + Style.ReportHeaderBackColor + + Normal + + + + ДокументПередачи + 22 + true + true + + true + + + Объект.ДокументПередачи + + + OnChange + ДокументПередачиПриИзменении + + + ДокументПередачиРасширеннаяПодсказка + 24 + Label + true + true + + Left + + + + ДокументПередачиКонтекстноеМеню + 23 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + Период + 16 + true + true + + true + + + Объект.Период + + + ПериодРасширеннаяПодсказка + 18 + Label + true + true + + Left + + + + ПериодКонтекстноеМеню + 17 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + true true true - - Объект.Организация - + + <key>ru</key> + <value>Группа документа</value> + - ОрганизацияРасширеннаяПодсказка - 9 + ГруппаДокументаРасширеннаяПодсказка + 91 Label true true @@ -24,28 +158,14 @@ Left - - ОрганизацияКонтекстноеМеню - 8 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - - Style.ReportHeaderBackColor - - Normal + UsualGroup + + Auto + Auto + true + true + Auto + Auto @@ -235,20 +355,702 @@ Auto - - Период - 16 + + ГруппаСтраницФормы + 84 + + ГруппаСтраницыЗадолженностей + 86 + + СуммаДокумента + 19 + true + true + + true + + + Объект.СуммаДокумента + + + СуммаДокументаРасширеннаяПодсказка + 21 + Label + true + true + + Left + + + + СуммаДокументаКонтекстноеМеню + 20 + true + + InputField + true + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + Задолженность + 28 + true + true + + true + + + Объект.Задолженность + + None + + ЗадолженностьНомерСтроки + 41 + true + true + + true + + + Объект.Задолженность.LineNumber + + + ЗадолженностьНомерСтрокиРасширеннаяПодсказка + 43 + Label + true + true + + Left + + + + ЗадолженностьНомерСтрокиКонтекстноеМеню + 42 + true + + LabelField + EnterOnInput + true + Left + true + + true + true + + + + ЗадолженностьГруппаКонтрагента + 92 + + ЗадолженностьКонтрагент + 44 + true + true + + true + + + Объект.Задолженность.Контрагент + + + ЗадолженностьКонтрагентРасширеннаяПодсказка + 46 + Label + true + true + + Left + + + + ЗадолженностьКонтрагентКонтекстноеМеню + 45 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьДоговор + 47 + true + true + + true + + + Объект.Задолженность.Договор + + + ЗадолженностьДоговорРасширеннаяПодсказка + 49 + Label + true + true + + Left + + + + ЗадолженностьДоговорКонтекстноеМеню + 48 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + true + true + + true + + + <key>ru</key> + <value>Задолженность группа контрагента</value> + + + ЗадолженностьГруппаКонтрагентаРасширеннаяПодсказка + 93 + Label + true + true + + Left + + + ColumnGroup + + Vertical + auto + true + + + + ЗадолженностьРебенок + 50 + true + true + + true + + + Объект.Задолженность.Ребенок + + + ЗадолженностьРебенокРасширеннаяПодсказка + 52 + Label + true + true + + Left + + + + ЗадолженностьРебенокКонтекстноеМеню + 51 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьИДСтроки + 53 + true + + true + + + Объект.Задолженность.ИДСтроки + + + ЗадолженностьИДСтрокиРасширеннаяПодсказка + 55 + Label + true + true + + Left + + + + ЗадолженностьИДСтрокиКонтекстноеМеню + 54 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьКПС + 59 + true + true + + true + + + Объект.Задолженность.КПС + + + ЗадолженностьКПСРасширеннаяПодсказка + 61 + Label + true + true + + Left + + + + ЗадолженностьКПСКонтекстноеМеню + 60 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьСумма + 56 + true + true + + true + + + Объект.Задолженность.Сумма + + + ЗадолженностьСуммаРасширеннаяПодсказка + 58 + Label + true + true + + Left + + + + ЗадолженностьСуммаКонтекстноеМеню + 57 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + ЗадолженностьКоманднаяПанель + 30 + Left + true + + + OnChange + ЗадолженностьПриИзменении + + + ЗадолженностьСтрокаПоиска + 32 + + ЗадолженностьСтрокаПоискаРасширеннаяПодсказка + 34 + Label + true + true + + Left + + + + ЗадолженностьСтрокаПоискаКонтекстноеМеню + 33 + true + + Задолженность + + true + + + + ЗадолженностьСостояниеПросмотра + 35 + + ЗадолженностьСостояниеПросмотраРасширеннаяПодсказка + 37 + Label + true + true + + Left + + + + ЗадолженностьСостояниеПросмотраКонтекстноеМеню + 36 + true + + ViewStatusAddition + Задолженность + + true + + + + ЗадолженностьУправлениеПоиском + 38 + + ЗадолженностьУправлениеПоискомРасширеннаяПодсказка + 40 + Label + true + true + + Left + + + + ЗадолженностьУправлениеПоискомКонтекстноеМеню + 39 + true + + SearchControlAddition + Задолженность + + true + + + + ЗадолженностьРасширеннаяПодсказка + 31 + Label + true + true + + Left + + + + ЗадолженностьКонтекстноеМеню + 29 + true + + true + true + true + true + true + MultiRow + Auto +
true
+ 1 + 1 + AutoUse + AutoUse + true + true + true + Auto + Auto + true + true + true + true + AsFileRef + true + + true + + true + true + + true + + + <key>ru</key> + <value>Начисления</value> + + + ГруппаСтраницыЗадолженностейРасширеннаяПодсказка + 87 + Label + true + true + + Left + + + Page + + Auto + auto + + + + ГруппаСтраницыОбщихДанных + 88 + + ИФО + 10 + true + true + + true + + + Объект.ИФО + + + ИФОРасширеннаяПодсказка + 12 + Label + true + true + + Left + + + + ИФОКонтекстноеМеню + 11 + true + + InputField + EnterOnInput + true + Left + true + + true + true + true + true + true + true + true + Normal + + + + КФО + 78 + + <key>ru</key> + <value>КФО</value> + + true + true + + true + + + Объект.КФО + + + КФОРасширеннаяПодсказка + 80 + Label + true + true + + Left + + + + КФОКонтекстноеМеню + 79 + true + + InputField + Enter + true + Left + true + + true + true + true + true + true + true + Normal + + + + Комментарий + 81 + + <key>ru</key> + <value>Комментарий</value> + + true + true + + true + + + Объект.Комментарий + + + КомментарийРасширеннаяПодсказка + 83 + Label + true + true + + Left + + + + КомментарийКонтекстноеМеню + 82 + true + + InputField + Enter + true + Left + true + + true + true + true + true + true + true + Normal + + + true + true + + true + + + <key>ru</key> + <value>Операция</value> + + + ГруппаСтраницыОбщихДанныхРасширеннаяПодсказка + 89 + Label + true + true + + Left + + + Page + + Auto + auto + + true true true - - Объект.Период - + + <key>ru</key> + <value>Группа страниц формы</value> + - ПериодРасширеннаяПодсказка - 18 + ГруппаСтраницФормыРасширеннаяПодсказка + 85 Label true true @@ -256,621 +1058,12 @@ Left - - ПериодКонтекстноеМеню - 17 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal + Pages + + Auto + Auto - - СуммаДокумента - 19 - true - false - - true - - - Объект.СуммаДокумента - - - СуммаДокументаРасширеннаяПодсказка - 21 - Label - true - true - - Left - - - - СуммаДокументаКонтекстноеМеню - 20 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ДокументПередачи - 22 - true - true - - true - - - Объект.ДокументПередачи - - - OnChange - ДокументПередачиПриИзменении - - - ДокументПередачиРасширеннаяПодсказка - 24 - Label - true - true - - Left - - - - ДокументПередачиКонтекстноеМеню - 23 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ИФО - 10 - true - true - - true - - - Объект.ИФО - - - ИФОРасширеннаяПодсказка - 12 - Label - true - true - - Left - - - - ИФОКонтекстноеМеню - 11 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - Задолженность - 28 - true - true - - true - - - Объект.Задолженность - - None - - ЗадолженностьНомерСтроки - 41 - true - true - - true - - - Объект.Задолженность.LineNumber - - - ЗадолженностьНомерСтрокиРасширеннаяПодсказка - 43 - Label - true - true - - Left - - - - ЗадолженностьНомерСтрокиКонтекстноеМеню - 42 - true - - LabelField - EnterOnInput - true - Left - true - - true - true - - - - ЗадолженностьКонтрагент - 44 - true - true - - true - - - Объект.Задолженность.Контрагент - - - ЗадолженностьКонтрагентРасширеннаяПодсказка - 46 - Label - true - true - - Left - - - - ЗадолженностьКонтрагентКонтекстноеМеню - 45 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьДоговор - 47 - true - true - - true - - - Объект.Задолженность.Договор - - - ЗадолженностьДоговорРасширеннаяПодсказка - 49 - Label - true - true - - Left - - - - ЗадолженностьДоговорКонтекстноеМеню - 48 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьРебенок - 50 - true - true - - true - - - Объект.Задолженность.Ребенок - - - ЗадолженностьРебенокРасширеннаяПодсказка - 52 - Label - true - true - - Left - - - - ЗадолженностьРебенокКонтекстноеМеню - 51 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьИДСтроки - 53 - true - true - - true - - - Объект.Задолженность.ИДСтроки - - - ЗадолженностьИДСтрокиРасширеннаяПодсказка - 55 - Label - true - true - - Left - - - - ЗадолженностьИДСтрокиКонтекстноеМеню - 54 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьСумма - 56 - true - true - - true - - - Объект.Задолженность.Сумма - - - ЗадолженностьСуммаРасширеннаяПодсказка - 58 - Label - true - true - - Left - - - - ЗадолженностьСуммаКонтекстноеМеню - 57 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьКПС - 59 - true - true - - true - - - Объект.Задолженность.КПС - - - ЗадолженностьКПСРасширеннаяПодсказка - 61 - Label - true - true - - Left - - - - ЗадолженностьКПСКонтекстноеМеню - 60 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьКЭК - 62 - true - true - - true - - - Объект.Задолженность.КЭК - - - ЗадолженностьКЭКРасширеннаяПодсказка - 64 - Label - true - true - - Left - - - - ЗадолженностьКЭККонтекстноеМеню - 63 - true - - InputField - EnterOnInput - true - Left - true - - true - true - true - true - true - true - true - Normal - - - - ЗадолженностьКоманднаяПанель - 30 - Left - true - - - OnChange - ЗадолженностьПриИзменении - - - ЗадолженностьСтрокаПоиска - 32 - - ЗадолженностьСтрокаПоискаРасширеннаяПодсказка - 34 - Label - true - true - - Left - - - - ЗадолженностьСтрокаПоискаКонтекстноеМеню - 33 - true - - Задолженность - - true - - - - ЗадолженностьСостояниеПросмотра - 35 - - ЗадолженностьСостояниеПросмотраРасширеннаяПодсказка - 37 - Label - true - true - - Left - - - - ЗадолженностьСостояниеПросмотраКонтекстноеМеню - 36 - true - - ViewStatusAddition - Задолженность - - true - - - - ЗадолженностьУправлениеПоиском - 38 - - ЗадолженностьУправлениеПоискомРасширеннаяПодсказка - 40 - Label - true - true - - Left - - - - ЗадолженностьУправлениеПоискомКонтекстноеМеню - 39 - true - - SearchControlAddition - Задолженность - - true - - - - ЗадолженностьРасширеннаяПодсказка - 31 - Label - true - true - - Left - - - - ЗадолженностьКонтекстноеМеню - 29 - true - - true - true - true - true - true - MultiRow - Auto -
true
- 1 - 1 - AutoUse - AutoUse - true - true - true - Auto - Auto - true - true - true - true - AsFileRef - true - - true - Ответственный 25 @@ -914,6 +1107,40 @@ Normal + + БухгалтерскаяОперация + 76 + true + true + + true + + + <key>ru</key> + <value>Бухгалтерская операция</value> + + + БухгалтерскаяОперацияРасширеннаяПодсказка + 77 + Label + true + true + + Left + + + UsualGroup + + Auto + Auto + Auto + true + true + auto + Auto + Auto + + ФормаКоманднаяПанель -1 @@ -1029,6 +1256,9 @@ true + + StdPicture.DebitCredit + ПросмотрБухгалтерскихЗаписей diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/Forms/ФормаДокумента/Module.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/Forms/ФормаДокумента/Module.bsl index 0d63df6..d68a28f 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/Forms/ФормаДокумента/Module.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/Forms/ФормаДокумента/Module.bsl @@ -5,6 +5,13 @@ &НаСервере Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка) + БухгалтерскиеОперацииСервер.ПриСозданииНаСервере(Отказ, СтандартнаяОбработка, Элементы.БухгалтерскаяОперация); + + // ИФО показывается только при включённом учёте по ИФО (как в типовых документах). + Элементы.ИФО.Видимость = ПолучитьФункциональнуюОпцию("ИспользоватьУчетПоИФО"); + // КПС определяется автоматически по настройкам учётной политики. + Элементы.ЗадолженностьКПС.ТолькоПросмотр = Истина; + Если НЕ ЗначениеЗаполнено(Объект.Ссылка) Тогда Основание = Неопределено; Если Параметры.Свойство("Основание", Основание) @@ -13,7 +20,6 @@ ЗаполнитьПоДокументуПередачиНаСервере(Основание); КонецЕсли; - // Дефолт ЦБ получателя (на стороне ЦБ это Организация) из константы БГУ 2.0. Если НЕ ЗначениеЗаполнено(Объект.Организация) Тогда Объект.Организация = Константы.ОрганизацияЦентрализованнаяБухгалтерия.Получить(); КонецЕсли; @@ -21,6 +27,41 @@ КонецПроцедуры +&НаСервере +Процедура ПриЧтенииНаСервере(ТекущийОбъект) + + БухгалтерскиеОперацииСервер.ПриЧтенииНаСервере(ЭтотОбъект, ТекущийОбъект, Элементы.БухгалтерскаяОперация); + +КонецПроцедуры + +&НаКлиенте +Процедура ПередЗаписью(Отказ, ПараметрыЗаписи) + + БухгалтерскиеОперацииКлиент.ПередЗаписью(Отказ, ПараметрыЗаписи, ЭтотОбъект); + +КонецПроцедуры + +&НаСервере +Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи) + + БухгалтерскиеОперацииСервер.ПередЗаписью(Отказ, ТекущийОбъект, ПараметрыЗаписи, ЭтотОбъект); + +КонецПроцедуры + +&НаКлиенте +Процедура ПослеЗаписи(ПараметрыЗаписи) + + БухгалтерскиеОперацииКлиент.ПослеЗаписи(ПараметрыЗаписи, ЭтотОбъект); + +КонецПроцедуры + +&НаСервере +Процедура ПослеЗаписиНаСервере(ТекущийОбъект, ПараметрыЗаписи) + + БухгалтерскиеОперацииСервер.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписи); + +КонецПроцедуры + #КонецОбласти #Область ОбработчикиКомандФормы @@ -81,6 +122,13 @@ Возврат; КонецЕсли; + // Заполнение возможно только на основании проведённого документа передачи. + Если НЕ ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ДокументПередачиСсылка, "Проведен") Тогда + ОбщегоНазначения.СообщитьПользователю( + "Заполнение документа возможно только на основании проведённого документа передачи задолженности."); + Возврат; + КонецЕсли; + Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ @@ -117,10 +165,12 @@ Объект.Организация = ПС_РаботаСКонтрагентами.КонтрагентПоОрганизации(ВыборкаШапка.Организация, "Организация (ЦБ)"); Объект.Учреждение = ПС_РаботаСКонтрагентами.КонтрагентПоОрганизации(ВыборкаШапка.Учреждение, "Учреждение-отправитель"); - Объект.ИФО = ВыборкаШапка.ИФО; Объект.Ответственный = ВыборкаШапка.Ответственный; Объект.Период = ВыборкаШапка.Период; Объект.ДокументПередачи = ДокументПередачиСсылка; + Если ПолучитьФункциональнуюОпцию("ИспользоватьУчетПоИФО") Тогда + Объект.ИФО = ВыборкаШапка.ИФО; + КонецЕсли; Объект.Задолженность.Очистить(); Объект.СуммаДокумента = 0; @@ -134,6 +184,9 @@ КонецЦикла; + // КФО документа и КПС строк - из проводок документа передачи. + ПС_УчетРодительскойПлаты.ЗаполнитьРеквизитыУчетаПоПроводкам(Объект, ДокументПередачиСсылка); + КонецПроцедуры &НаКлиенте diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ManagerModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ManagerModule.bsl index 626b3be..8d79c13 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ManagerModule.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ManagerModule.bsl @@ -1,7 +1,8 @@ // ПС_ПринятиеЗадолженностиОтУчреждения: модуль менеджера. -// Печатная форма Извещения (ф. 0504805, ред. 103н) - сторона получателя (ЦБ). -// Используется типовая вёрстка макета ИзвещениеИсходящее с областями: -// Заголовок, ПояснениеМБТ, Строка, Итого, Подвал. +// Печатная форма извещения (ф. 0504805, ред. 103н) - сторона получателя (централизованная бухгалтерия). +// Заполнение макета выполняет общая логика подсистемы: ПС_УчетРодительскойПлаты.ПечатьИзвещения0504805. + +#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда #Область ПрограммныйИнтерфейс @@ -9,76 +10,17 @@ // Вызывается из модуля формы документа кнопкой "Печать". // // Параметры: -// ДокументСсылка - DocumentRef.ПС_ПринятиеЗадолженностиОтУчреждения - печатаемый документ. +// ДокументСсылка - ДокументСсылка.ПС_ПринятиеЗадолженностиОтУчреждения - печатаемый документ. // // Возвращаемое значение: // ТабличныйДокумент // Функция СформироватьПечатныеФормыИзвещений(ДокументСсылка) Экспорт - ТабличныйДокумент = Новый ТабличныйДокумент; - ТабличныйДокумент.КлючПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_ПС_ПринятиеЗадолженности_Извещение0504805"; - - Макет = ПолучитьМакет("ПФ_MXL_Извещение0504805_103н_ПС_РП_Получатель"); - Если Макет = Неопределено Тогда - Возврат ТабличныйДокумент; - КонецЕсли; - - Если НЕ ДокументСсылка.Проведен Тогда - Возврат ТабличныйДокумент; - КонецЕсли; - - ДокументОбъект = ДокументСсылка.ПолучитьОбъект(); - Если ДокументОбъект = Неопределено ИЛИ ДокументОбъект.Задолженность.Количество() = 0 Тогда - Возврат ТабличныйДокумент; - КонецЕсли; - - Счет304_04_130 = ПланыСчетов.ЕПСБУ.НайтиПоКоду("304.04.130"); - Счет205_31_66X = ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.31.66X"); - Счет205_31_56X = ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.31.56X"); - - ОбластьЗаголовок = Макет.ПолучитьОбласть("Заголовок"); - ОбластьЗаголовок.Параметры.Номер = ПрефиксацияОбъектовКлиентСервер.НомерНаПечать(ДокументСсылка.Номер, Истина, Истина); - ОбластьЗаголовок.Параметры.Дата = Формат(ДокументСсылка.Дата, "ДЛФ=DD"); - ОбластьЗаголовок.Параметры.пНаименованиеОтправитель = Строка(ДокументОбъект.Учреждение); - ОбластьЗаголовок.Параметры.пНаименованиеПолучатель = Строка(ДокументОбъект.Организация); - ТабличныйДокумент.Вывести(ОбластьЗаголовок); - - ОбластьПояснение = Макет.ПолучитьОбласть("ПояснениеМБТ"); - ОбластьПояснение.Параметры.ПояснениеМБТ = "Принятие задолженности по родительской плате за " - + Формат(ДокументОбъект.Период, "ДФ=MMMM yyyy") - + ". Основание: " + Строка(ДокументОбъект.ДокументПередачи) + "."; - ТабличныйДокумент.Вывести(ОбластьПояснение); - - ОбластьСтрока = Макет.ПолучитьОбласть("Строка"); - ОбластьСтрока.Параметры.пСодержание = "Принятие задолженности по родительской плате"; - ОбластьСтрока.Параметры.пДебетСчетОтправитель = Строка(Счет304_04_130); - ОбластьСтрока.Параметры.пКредитСчетОтправитель = Строка(Счет205_31_66X); - ОбластьСтрока.Параметры.пСуммаОтправитель = Формат(ДокументОбъект.СуммаДокумента, "ЧДЦ=2; ЧРГ=' '"); - ОбластьСтрока.Параметры.пДебетСчетПолучатель = Строка(Счет205_31_56X); - ОбластьСтрока.Параметры.пКредитСчетПолучатель = Строка(Счет304_04_130); - ОбластьСтрока.Параметры.пСуммаПолучатель = Формат(ДокументОбъект.СуммаДокумента, "ЧДЦ=2; ЧРГ=' '"); - ТабличныйДокумент.Вывести(ОбластьСтрока); - - ОбластьИтого = Макет.ПолучитьОбласть("Итого"); - ОбластьИтого.Параметры.пИтогоСуммаОтправитель = Формат(ДокументОбъект.СуммаДокумента, "ЧДЦ=2; ЧРГ=' '"); - ОбластьИтого.Параметры.пИтогоСуммаПолучатель = Формат(ДокументОбъект.СуммаДокумента, "ЧДЦ=2; ЧРГ=' '"); - ТабличныйДокумент.Вывести(ОбластьИтого); - - ОбластьПодвал = Макет.ПолучитьОбласть("Подвал"); - ОбластьПодвал.Параметры.пФИОРуководительОтправитель = Строка(ДокументОбъект.Учреждение.Руководитель); - ОбластьПодвал.Параметры.пФИОБухгалтерОтправитель = Строка(ДокументОбъект.Учреждение.ГлавныйБухгалтер); - ОбластьПодвал.Параметры.пФИОРуководительПолучатель = Строка(ДокументОбъект.Организация.Руководитель); - ОбластьПодвал.Параметры.пФИОБухгалтерПолучатель = Строка(ДокументОбъект.Организация.ГлавныйБухгалтер); - ОбластьПодвал.Параметры.ДолжностьИсполнительОтправитель = "Главный бухгалтер"; - ОбластьПодвал.Параметры.ФИОИсполнительОтправитель = Строка(ДокументОбъект.Ответственный); - ОбластьПодвал.Параметры.ДолжностьИсполнительПолучатель = "Главный бухгалтер"; - ОбластьПодвал.Параметры.ФИОИсполнительПолучатель = Строка(ДокументОбъект.Ответственный); - ОбластьПодвал.Параметры.пКоличествоПриложений = ДокументОбъект.Задолженность.Количество(); - ТабличныйДокумент.Вывести(ОбластьПодвал); - - Возврат ТабличныйДокумент; + Возврат ПС_УчетРодительскойПлаты.ПечатьИзвещения0504805(ДокументСсылка); КонецФункции #КонецОбласти + +#КонецЕсли diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ObjectModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ObjectModule.bsl index 62d9ffe..dbe1936 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ObjectModule.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ObjectModule.bsl @@ -1,11 +1,23 @@ -// ПС_ПринятиеЗадолженностиОтУчреждения: обработка проведения. -// Этап 3 из методических рекомендаций по учету родительской платы ЦБ ОУО. -// На стороне ЦБ (л/с 04): Дт 1.205.31.56X - Кт 1.304.04.130. +// ПС_ПринятиеЗадолженностиОтУчреждения: модуль объекта. +// Сторона ЦБ: Дт 205.31.56X — Кт 304.04.130. +// Проводки формируются в процедуре ОбработкаПроведения прямым заполнением +// набора записей регистра бухгалтерии ЖурналПроводокЕПСБУ. + +#Если Сервер Или ТолстыйКлиентОбычноеПриложение Или ВнешнееСоединение Тогда + +#Область ОбработчикиСобытий Процедура ОбработкаЗаполнения(ДанныеЗаполнения, ТекстЗаполнения, СтандартнаяОбработка) Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ПС_ПередачаЗадолженностиВЦБ") Тогда + // Заполнение возможно только на основании проведённого документа передачи. + Если НЕ ОбщегоНазначения.ЗначениеРеквизитаОбъекта(ДанныеЗаполнения, "Проведен") Тогда + ОбщегоНазначения.СообщитьПользователю( + "Заполнение документа возможно только на основании проведённого документа передачи задолженности."); + Возврат; + КонецЕсли; + Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ @@ -13,30 +25,35 @@ | ПередачаЗадолженности.Организация КАК Учреждение, | ПередачаЗадолженности.ИФО КАК ИФО, | ПередачаЗадолженности.Ответственный КАК Ответственный, - | ПередачаЗадолженности.Период КАК Период + | ПередачаЗадолженности.Период КАК Период, + | ПередачаЗадолженности.КФО КАК КФО |ИЗ | Документ.ПС_ПередачаЗадолженностиВЦБ КАК ПередачаЗадолженности |ГДЕ | ПередачаЗадолженности.Ссылка = &Ссылка"; Запрос.УстановитьПараметр("Ссылка", ДанныеЗаполнения); ВыборкаШапка = Запрос.Выполнить().Выбрать(); - Если ВыборкаШапка.Следующий() Тогда - // Организация на стороне ЦБ — берём организацию-получатель из передачи (это и есть ЦБ). - ОрганизацияЦБ = ВыборкаШапка.Организация; - Если ЗначениеЗаполнено(ОрганизацияЦБ) Тогда - Организация = ПС_РаботаСКонтрагентами.КонтрагентПоОрганизации(ОрганизацияЦБ, "Организация (ЦБ)"); + Если ВыборкаШапка.Следующий() Тогда + // Организация на стороне ЦБ — берём организацию-получатель из передачи (это и есть ЦБ). + ОрганизацияЦБ = ВыборкаШапка.Организация; + Если ЗначениеЗаполнено(ОрганизацияЦБ) Тогда + Организация = ПС_РаботаСКонтрагентами.КонтрагентПоОрганизации(ОрганизацияЦБ, "Организация (ЦБ)"); + КонецЕсли; + // Учреждение-отправитель (ПБС) — берём организацию-отправитель из передачи + // (там тип CatalogRef.Организации), а в нашем документе нужен CatalogRef.Контрагенты. + УчреждениеОрганизация = ВыборкаШапка.Учреждение; + Если ЗначениеЗаполнено(УчреждениеОрганизация) Тогда + Учреждение = ПС_РаботаСКонтрагентами.КонтрагентПоОрганизации(УчреждениеОрганизация, "Учреждение-отправитель"); + КонецЕсли; + Ответственный = ВыборкаШапка.Ответственный; + Период = ВыборкаШапка.Период; + КФО = ВыборкаШапка.КФО; + ДокументПередачи = ДанныеЗаполнения; + // Учёт по ИФО ведётся только при включённой функциональной опции. + Если ПолучитьФункциональнуюОпцию("ИспользоватьУчетПоИФО") Тогда + ИФО = ВыборкаШапка.ИФО; + КонецЕсли; КонецЕсли; - // Учреждение-отправитель (ПБС) — берём организацию-отправитель из передачи - // (там тип CatalogRef.Организации), а в нашем документе нужен CatalogRef.Контрагенты. - УчреждениеОрганизация = ВыборкаШапка.Учреждение; - Если ЗначениеЗаполнено(УчреждениеОрганизация) Тогда - Учреждение = ПС_РаботаСКонтрагентами.КонтрагентПоОрганизации(УчреждениеОрганизация, "Учреждение-отправитель"); - КонецЕсли; - ИФО = ВыборкаШапка.ИФО; - Ответственный = ВыборкаШапка.Ответственный; - Период = ВыборкаШапка.Период; - ДокументПередачи = ДанныеЗаполнения; - КонецЕсли; ЗапросСтроки = Новый Запрос; ЗапросСтроки.Текст = @@ -44,9 +61,9 @@ | ПередачаЗадолженностиЗадолженность.Контрагент КАК Контрагент, | ПередачаЗадолженностиЗадолженность.Договор КАК Договор, | ПередачаЗадолженностиЗадолженность.Ребенок КАК Ребенок, - | ПередачаЗадолженностиЗадолженность.ИДСтроки КАК ИДСтроки, - | ПередачаЗадолженностиЗадолженность.Сумма КАК Сумма - |ИЗ + | ПередачаЗадолженностиЗадолженность.ИДСтроки КАК ИДСтроки, + | ПередачаЗадолженностиЗадолженность.Сумма КАК Сумма + |ИЗ | Документ.ПС_ПередачаЗадолженностиВЦБ.Задолженность КАК ПередачаЗадолженностиЗадолженность |ГДЕ | ПередачаЗадолженностиЗадолженность.Ссылка = &Ссылка"; @@ -58,101 +75,162 @@ СуммаДокумента = СуммаДокумента + ВыборкаСтроки.Сумма; КонецЦикла; + // КФО документа и КПС строк - из проводок документа передачи. + ПС_УчетРодительскойПлаты.ЗаполнитьРеквизитыУчетаПоПроводкам(ЭтотОбъект, ДанныеЗаполнения); + КонецЕсли; КонецПроцедуры Процедура ОбработкаПроведения(Отказ, РежимПроведения) - Если Отказ Тогда + Движения.ЖурналПроводокЕПСБУ.Очистить(); + Движения.ЖурналПроводокЕПСБУ.Записывать = Истина; + Движения.ЖурналПроводокЕПСБУ.ДополнительныеСвойства.Вставить("НеФормироватьУчетныеДанныеИзПроводок"); + + СчетДт = БухгалтерскийУчет.СчетПоКоду("205.31", Дата, Организация); + СчетКт = БухгалтерскийУчет.СчетПоКоду("304.04", Дата, Организация); + ЖурналОпераций = БухгалтерскийУчетПовтИсп.НомерЖурнала(СчетДт, СчетКт); + + // КЭК счёта 304.04 несёт экономический смысл операции и берётся из проводок документа передачи + // (КЭК счёта 401.10, унаследованный от документа начисления). Автоматически он не определяется. + КЭК30404 = ПС_УчетРодительскойПлаты.КЭКПоЭкономическомуСмыслу(ДокументПередачи); + Если НЕ ЗначениеЗаполнено(КЭК30404) Тогда + КЭК30404 = КЭКПроводки(СчетКт, "Кт", Учреждение); + КонецЕсли; + + // КПС строк наследуется из проводок документа передачи (см. ЗаполнитьКПССтрок), + // КЭК счёта 205.31 определяется по настройкам счёта и типу контрагента (подстатья КОСГУ). + Для Каждого СтрокаЗадолженности Из Задолженность Цикл + + Движение = Движения.ЖурналПроводокЕПСБУ.Добавить(); + Движение.Период = Дата; + Движение.Организация = Организация; + Движение.ИФО = ИФО; + Движение.КФО = КФО; + Движение.СчетДт = СчетДт; + Движение.СчетКт = СчетКт; + Движение.КПСДт = СтрокаЗадолженности.КПС; + Движение.КПСКт = СтрокаЗадолженности.КПС; + Движение.КЭКДт = КЭКПроводки(СчетДт, "Дт", СтрокаЗадолженности.Контрагент, СтрокаЗадолженности.Договор); + Движение.КЭККт = КЭК30404; + Движение.Сумма = СтрокаЗадолженности.Сумма; + Движение.ЖурналОпераций = ЖурналОпераций; + Движение.Содержание = "Принятие задолженности по родительской плате от учреждения"; + + Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Контрагенты] = СтрокаЗадолженности.Контрагент; + Движение.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Договоры] = СтрокаЗадолженности.Договор; + Движение.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.КорреспондентыПоВнутреннимРасчетам] = Учреждение; + + КонецЦикла; + + // В конфигурации есть подписка на событие "ОбработкаПроведения" (ЗаписатьТаблицуПроводок), + // которая выполняется после модуля объекта и перезаписывает проводки документа: если таблица + // проводок не передана, набор записей регистра очищается. Поэтому передаём сформированную + // таблицу через ДополнительныеСвойства.ДанныеАвтоПроведения.ТаблицаПроводок. + БухгалтерскиеОперацииСервер.ИнициализироватьБухгалтерскиеОперации(ЭтотОбъект); + ДополнительныеСвойства.ДанныеАвтоПроведения.ТаблицаПроводок = Движения.ЖурналПроводокЕПСБУ.Выгрузить(); + +КонецПроцедуры + +Процедура ОбработкаУдаленияПроведения(Отказ) + + Движения.ЖурналПроводокЕПСБУ.Записывать = Истина; + +КонецПроцедуры + +Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения) + + Если ОбменДанными.Загрузка Тогда Возврат; КонецЕсли; + ОбновлениеИнформационнойБазы.ПроверитьОбъектОбработан(ЭтотОбъект); + + СуммаДокумента = Задолженность.Итог("Сумма"); + ЗаполнитьКПССтрок(); + +КонецПроцедуры + +Процедура ОбработкаПроверкиЗаполнения(Отказ, ПроверяемыеРеквизиты) + Если НЕ ЗначениеЗаполнено(Организация) Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "Не заполнена организация (ЦБ)"; - СообщениеПользователю.Поле = "Организация"; - СообщениеПользователю.УстановитьДанные(ЭтотОбъект); - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; + ОбщегоНазначения.СообщитьПользователю("Не заполнена организация (ЦБ)", , "Организация", "Объект", Отказ); КонецЕсли; Если НЕ ЗначениеЗаполнено(Учреждение) Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "Не заполнено учреждение (сад-отправитель)"; - СообщениеПользователю.Поле = "Учреждение"; - СообщениеПользователю.УстановитьДанные(ЭтотОбъект); - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; + ОбщегоНазначения.СообщитьПользователю("Не заполнено учреждение (сад-отправитель)", , "Учреждение", "Объект", Отказ); + КонецЕсли; + + Если НЕ ЗначениеЗаполнено(ДокументПередачи) Тогда + ОбщегоНазначения.СообщитьПользователю("Не заполнен документ передачи задолженности", , "ДокументПередачи", "Объект", Отказ); + КонецЕсли; + + Если НЕ ЗначениеЗаполнено(КФО) Тогда + ОбщегоНазначения.СообщитьПользователю("Не заполнен КФО", , "КФО", "Объект", Отказ); КонецЕсли; Если Задолженность.Количество() = 0 Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "Не заполнена табличная часть ""Задолженность"""; - СообщениеПользователю.Поле = "Задолженность"; - СообщениеПользователю.УстановитьДанные(ЭтотОбъект); - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; + ОбщегоНазначения.СообщитьПользователю("Не заполнена табличная часть ""Задолженность""", , "Задолженность", "Объект", Отказ); + Иначе + Для Каждого СтрокаЗадолженности Из Задолженность Цикл + Если НЕ ЗначениеЗаполнено(СтрокаЗадолженности.КПС) Тогда + ОбщегоНазначения.СообщитьПользователю( + "Не заполнен КПС строки табличной части ""Задолженность"". Заполнение возможно только на основании проведённого документа передачи задолженности.", + , "Задолженность", "Объект", Отказ); + Прервать; + КонецЕсли; + КонецЦикла; КонецЕсли; СуммаПоТаблице = Задолженность.Итог("Сумма"); Если СуммаДокумента <> СуммаПоТаблице Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "Сумма документа (" + Формат(СуммаДокумента, "ЧДЦ=2; ЧРГ=' '") - + ") не совпадает с итогом по табличной части (" + Формат(СуммаПоТаблице, "ЧДЦ=2; ЧРГ=' '") + ")"; - СообщениеПользователю.Поле = "СуммаДокумента"; - СообщениеПользователю.УстановитьДанные(ЭтотОбъект); - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; + ОбщегоНазначения.СообщитьПользователю("Сумма документа не совпадает с итогом по табличной части", , "СуммаДокумента", "Объект", Отказ); КонецЕсли; - Счет205_31_56X = ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.31.56X"); - Счет304_04_130 = ПланыСчетов.ЕПСБУ.НайтиПоКоду("304.04.130"); - - Если НЕ ЗначениеЗаполнено(Счет205_31_56X) Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "В плане счетов ЕПСБУ не найден счёт 205.31.56X"; - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; - КонецЕсли; - - Если НЕ ЗначениеЗаполнено(Счет304_04_130) Тогда - СообщениеПользователю = Новый СообщениеПользователю; - СообщениеПользователю.Текст = "В плане счетов ЕПСБУ не найден счёт 304.04.130"; - СообщениеПользователю.Сообщить(); - Отказ = Истина; - Возврат; - КонецЕсли; - - Движения.ЖурналПроводокЕПСБУ.Записывать = Истина; - - Для Каждого СтрокаЗадолженности Из Задолженность Цикл - - Если СтрокаЗадолженности.Сумма = 0 Тогда - Продолжить; - КонецЕсли; - - Проводка = Движения.ЖурналПроводокЕПСБУ.Добавить(); - Проводка.Период = Дата; - Проводка.Организация = Организация; - Проводка.СчетДт = Счет205_31_56X; - Проводка.СчетКт = Счет304_04_130; - Проводка.Сумма = СтрокаЗадолженности.Сумма; - - // Субконто Дт по счёту 205.31.56X: 1 — Контрагенты (плательщик-родитель), 2 — Договоры - Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Контрагенты] = СтрокаЗадолженности.Контрагент; - Проводка.СубконтоДт[ПланыВидовХарактеристик.ВидыСубконто.Договоры] = СтрокаЗадолженности.Договор; - - // Субконто Кт по счёту 304.04.130: 1 — Контрагенты (учреждение-сад как ПБС) - Проводка.СубконтоКт[ПланыВидовХарактеристик.ВидыСубконто.Контрагенты] = Учреждение; - - Проводка.Содержание = "Принятие задолженности по родительской плате от учреждения (ПБС)"; - - КонецЦикла; - КонецПроцедуры + +#КонецОбласти + +#Область СлужебныеПроцедурыИФункции + +// Заполняет строки табличной части "Задолженность" КПС, унаследованным +// из проводок документа передачи задолженности. +// +Процедура ЗаполнитьКПССтрок() + + ПС_УчетРодительскойПлаты.ЗаполнитьРеквизитыУчетаПоПроводкам(ЭтотОбъект, ДокументПередачи); + +КонецПроцедуры + +// Возвращает КЭК проводки, определённый по настройкам счёта +// и типу контрагента (подстатья КОСГУ). +// +// Параметры: +// Счет - ПланСчетовСсылка.ЕПСБУ - счёт проводки. +// ДтКт - Строка - сторона проводки: "Дт" или "Кт". +// Субконто1 - Произвольный - значение первого субконто проводки. +// Субконто2 - Произвольный - значение второго субконто проводки. +// +// Возвращаемое значение: +// СправочникСсылка.КОСГУ - КЭК проводки. +// +Функция КЭКПроводки(Счет, ДтКт, Субконто1 = Неопределено, Субконто2 = Неопределено) + + ПараметрыКЭК = БухгалтерскийУчетКлиентСервер.ПараметрыРасчетаКЭКПроводки(); + ПараметрыКЭК.Организация = Организация; + ПараметрыКЭК.ИФО = ИФО; + ПараметрыКЭК.КФО = КФО; + ПараметрыКЭК.Дата = Дата; + ПараметрыКЭК.Счет = Счет; + ПараметрыКЭК.ДтКт = ДтКт; + ПараметрыКЭК.Субконто1 = Субконто1; + ПараметрыКЭК.Субконто2 = Субконто2; + + Возврат БухгалтерскийУчет.КЭКПроводки(ПараметрыКЭК); + +КонецФункции + +#КонецОбласти + +#КонецЕсли diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ПС_ПринятиеЗадолженностиОтУчреждения.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ПС_ПринятиеЗадолженностиОтУчреждения.mdo index e9877e5..7667fa8 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ПС_ПринятиеЗадолженностиОтУчреждения.mdo +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Documents/ПС_ПринятиеЗадолженностиОтУчреждения/ПС_ПринятиеЗадолженностиОтУчреждения.mdo @@ -10,7 +10,7 @@ ПС_ПринятиеЗадолженностиОтУчреждения ru - ПС Принятие задолженности от учреждения + Принятие начислений от учреждения true DontUse @@ -22,7 +22,7 @@ ru - Принятие задолженности от учреждения (ЦБ) + Принятие начислений от учреждения (ЦБ) String 9 @@ -67,7 +67,7 @@ Учреждение ru - Учреждение (сад-отправитель) + Учреждение-отправитель CatalogRef.Контрагенты @@ -145,6 +145,38 @@ Use Use + + Комментарий + + ru + Комментарий + + + String + + + true + + + + Use + Use + + + КФО + + ru + КФО + + + EnumRef.КВД + + + + + Use + Use + ФормаДокумента @@ -249,20 +281,6 @@ Use Use - - КЭК - - ru - КЭК - - - CatalogRef.КОСГУ - - - - Use - Use - ПФ_MXL_Извещение0504805_103н_ПС_РП_Получатель diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Reports/ПС_Отчет1/Templates/Макет/Template.dcs b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Reports/ПС_Отчет1/Templates/Макет/Template.dcs deleted file mode 100644 index a183415..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Reports/ПС_Отчет1/Templates/Макет/Template.dcs +++ /dev/null @@ -1,17 +0,0 @@ - - - - ИсточникДанных1 - Local - - - НаборДанных1 - ИсточникДанных1 - - - - Основной - Основной - - - \ No newline at end of file diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Reports/ПС_Отчет1/ПС_Отчет1.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Reports/ПС_Отчет1/ПС_Отчет1.mdo deleted file mode 100644 index b6f1165..0000000 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Reports/ПС_Отчет1/ПС_Отчет1.mdo +++ /dev/null @@ -1,17 +0,0 @@ - - - - - - - ПС_Отчет1 - true - - Макет - - ru - Макет - - DataCompositionSchema - - diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Roles/БазовыеПраваБГУ/Rights.rights b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Roles/БазовыеПраваБГУ/Rights.rights index 94a6afc..99ca72d 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Roles/БазовыеПраваБГУ/Rights.rights +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Roles/БазовыеПраваБГУ/Rights.rights @@ -3,21 +3,6 @@ false false false - - AccumulationRegister.ПС_ОборотыРодительскойПлатыПрошлыхПериодов - - Read - true - - - View - true - - - TotalsControl - true - - Configuration.ПрофиСофт diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Roles/ПС_ОсновнаяРоль/Rights.rights b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Roles/ПС_ОсновнаяРоль/Rights.rights index 0ffb006..eb67030 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Roles/ПС_ОсновнаяРоль/Rights.rights +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Roles/ПС_ОсновнаяРоль/Rights.rights @@ -17,10 +17,6 @@ Update true - - Delete - true - Posting true @@ -44,10 +40,6 @@ Update true - - Delete - true - Posting true @@ -57,4 +49,11 @@ true + + DataProcessor.ПС_УправлениеРасчетамиПоРодительскойПлате + + Use + true + + diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Subsystems/ТаксиПлатноеОбразование/Subsystems/РодительскаяПлата/РодительскаяПлата.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Subsystems/ТаксиПлатноеОбразование/Subsystems/РодительскаяПлата/РодительскаяПлата.mdo index 55a863f..54e2369 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Subsystems/ТаксиПлатноеОбразование/Subsystems/РодительскаяПлата/РодительскаяПлата.mdo +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Subsystems/ТаксиПлатноеОбразование/Subsystems/РодительскаяПлата/РодительскаяПлата.mdo @@ -10,5 +10,6 @@ true Document.ПС_ПередачаЗадолженностиВЦБ Document.ПС_ПринятиеЗадолженностиОтУчреждения + DataProcessor.ПС_УправлениеРасчетамиПоРодительскойПлате Subsystem.ТаксиПлатноеОбразование