From 5309bab3c7cb8be836edee4de189d888b1e175ab Mon Sep 17 00:00:00 2001 From: tsvetkoff Date: Mon, 26 Oct 2026 20:36:58 +0500 Subject: [PATCH] =?UTF-8?q?feat(=D0=BF=D1=83=D0=BB=D1=8C=D1=82):=20=D0=BE?= =?UTF-8?q?=D1=81=D1=82=D0=B0=D1=82=D0=BA=D0=B8=20=D0=BF=D0=BE=20=D1=80?= =?UTF-8?q?=D0=B5=D0=B3=D0=B8=D1=81=D1=82=D1=80=D1=83=20=D0=B2=D0=B7=D0=B0?= =?UTF-8?q?=D0=B8=D0=BC=D0=BE=D1=80=D0=B0=D1=81=D1=87=D1=91=D1=82=D0=BE?= =?UTF-8?q?=D0=B2=20=D0=B2=D0=BC=D0=B5=D1=81=D1=82=D0=BE=20=D1=81=D1=87?= =?UTF-8?q?=D0=B5=D1=82=D0=BE=D0=B2=20205.31/304.04,=20=D0=B2=D0=B5=D1=80?= =?UTF-8?q?=D1=81=D0=B8=D1=8F=201.0.0?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../src/Configuration/Configuration.mdo | 1 + .../Forms/Форма/Form.form | 1160 +++++++++++------ .../Forms/Форма/Module.bsl | 238 ++-- .../ПС_УправлениеРасчетамиПоРодительскойПлате/ObjectModule.bsl | 22 - 4 files changed, 914 insertions(+), 507 deletions(-) diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Configuration/Configuration.mdo b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Configuration/Configuration.mdo index 7be3209..e843894 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Configuration/Configuration.mdo +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/Configuration/Configuration.mdo @@ -28,6 +28,7 @@ PersonalComputer Russian Role.ПС_ОсновнаяРоль + 1.0.0 Language.Русский TaxiEnableVersion8_2 diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Form.form b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Form.form index 859c548..7266f66 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Form.form +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Form.form @@ -245,37 +245,6 @@ UserCmds Auto - - КнопкаИнициализироватьИдентификаторыЭДО - 529 - - <key>ru</key> - <value>Инициализировать идентификаторы ЭДО</value> - - true - true - - true - - - ИнициализироватьИдентификаторыЭДОРасширеннаяПодсказка - 530 - Label - true - true - - Left - - - UsualButton - Form.Command.ИнициализироватьИдентификаторыЭДО - Normal - Auto - true - true - UserCmds - Auto - true true @@ -2454,31 +2423,39 @@ СтраницаОстатки 7 - ТаблицаОстатковВывод - 27 + ТаблицаСадыОстатки + 542 + + <key>ru</key> + <value>Остатки по садам</value> + true true true - ТаблицаОстатков + ТаблицаОстатковСады None - ТаблицаОстатковВыводИФО - 478 + ТаблицаСадыОстаткиУчреждение + 601 + + <key>ru</key> + <value>Учреждение (сад)</value> + true true true - ТаблицаОстатков.ИФО + ТаблицаОстатковСады.Учреждение - ТаблицаОстатковВыводТаблицаОстатковВыводИФОРасширеннаяПодсказка - 480 + ТаблицаСадыОстаткиТаблицаСадыОстаткиУчреждениеРасширеннаяПодсказка + 603 Label true true @@ -2487,8 +2464,8 @@ - ТаблицаОстатковВыводТаблицаОстатковВыводИФОКонтекстноеМеню - 479 + ТаблицаСадыОстаткиТаблицаСадыОстаткиУчреждениеКонтекстноеМеню + 602 true InputField @@ -2507,19 +2484,23 @@ - ТаблицаОстатковВыводОрганизация - 481 + ТаблицаСадыОстаткиПоступило + 604 + + <key>ru</key> + <value>Поступило в ЦБ</value> + true true true - ТаблицаОстатков.Организация + ТаблицаОстатковСады.Поступило - ТаблицаОстатковВыводТаблицаОстатковВыводОрганизацияРасширеннаяПодсказка - 483 + ТаблицаСадыОстаткиТаблицаСадыОстаткиПоступилоРасширеннаяПодсказка + 606 Label true true @@ -2528,8 +2509,8 @@ - ТаблицаОстатковВыводТаблицаОстатковВыводОрганизацияКонтекстноеМеню - 482 + ТаблицаСадыОстаткиТаблицаСадыОстаткиПоступилоКонтекстноеМеню + 605 true InputField @@ -2548,19 +2529,23 @@ - ТаблицаОстатковВыводСчет - 484 + ТаблицаСадыОстаткиПередано + 607 + + <key>ru</key> + <value>Передано в сад</value> + true true true - ТаблицаОстатков.Счет + ТаблицаОстатковСады.Передано - ТаблицаОстатковВыводТаблицаОстатковВыводСчетРасширеннаяПодсказка - 486 + ТаблицаСадыОстаткиТаблицаСадыОстаткиПереданоРасширеннаяПодсказка + 609 Label true true @@ -2569,8 +2554,8 @@ - ТаблицаОстатковВыводТаблицаОстатковВыводСчетКонтекстноеМеню - 485 + ТаблицаСадыОстаткиТаблицаСадыОстаткиПереданоКонтекстноеМеню + 608 true InputField @@ -2589,19 +2574,23 @@ - ТаблицаОстатковВыводСуммаНачальныйОстаток - 487 + ТаблицаСадыОстаткиОстаток + 610 + + <key>ru</key> + <value>Остаток у ЦБ</value> + true true true - ТаблицаОстатков.СуммаНачальныйОстаток + ТаблицаОстатковСады.Остаток - ТаблицаОстатковВыводТаблицаОстатковВыводСуммаНачальныйОстатокРасширеннаяПодсказка - 489 + ТаблицаСадыОстаткиТаблицаСадыОстаткиОстатокРасширеннаяПодсказка + 612 Label true true @@ -2610,131 +2599,8 @@ - ТаблицаОстатковВыводТаблицаОстатковВыводСуммаНачальныйОстатокКонтекстноеМеню - 488 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаОстатковВыводСуммаОборотДт - 490 - true - true - - true - - - ТаблицаОстатков.СуммаОборотДт - - - ТаблицаОстатковВыводТаблицаОстатковВыводСуммаОборотДтРасширеннаяПодсказка - 492 - Label - true - true - - Left - - - - ТаблицаОстатковВыводТаблицаОстатковВыводСуммаОборотДтКонтекстноеМеню - 491 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаОстатковВыводСуммаОборотКт - 493 - true - true - - true - - - ТаблицаОстатков.СуммаОборотКт - - - ТаблицаОстатковВыводТаблицаОстатковВыводСуммаОборотКтРасширеннаяПодсказка - 495 - Label - true - true - - Left - - - - ТаблицаОстатковВыводТаблицаОстатковВыводСуммаОборотКтКонтекстноеМеню - 494 - true - - InputField - Auto - true - Left - true - - true - true - true - true - true - true - Normal - - - - ТаблицаОстатковВыводСуммаКонечныйОстаток - 496 - true - true - - true - - - ТаблицаОстатков.СуммаКонечныйОстаток - - - ТаблицаОстатковВыводТаблицаОстатковВыводСуммаКонечныйОстатокРасширеннаяПодсказка - 498 - Label - true - true - - Left - - - - ТаблицаОстатковВыводТаблицаОстатковВыводСуммаКонечныйОстатокКонтекстноеМеню - 497 + ТаблицаСадыОстаткиТаблицаСадыОстаткиОстатокКонтекстноеМеню + 611 true InputField @@ -2753,17 +2619,21 @@ - ТаблицаОстатковВыводКоманднаяПанель - 28 + ТаблицаСадыОстаткиКоманднаяПанель + 543 Left true + + OnActivateRow + ТаблицаСадыОстаткиПриАктивизацииСтроки + - ТаблицаОстатковВыводСтрокаПоиска - 31 + ТаблицаСадыОстаткиСтрокаПоиска + 546 - ТаблицаОстатковВыводСтрокаПоискаРасширеннаяПодсказка - 33 + ТаблицаСадыОстаткиСтрокаПоискаРасширеннаяПодсказка + 548 Label true true @@ -2772,21 +2642,21 @@ - ТаблицаОстатковВыводСтрокаПоискаКонтекстноеМеню - 32 + ТаблицаСадыОстаткиСтрокаПоискаКонтекстноеМеню + 547 true - ТаблицаОстатковВывод + ТаблицаСадыОстатки true - ТаблицаОстатковВыводСостояниеПросмотра - 37 + ТаблицаСадыОстаткиСостояниеПросмотра + 552 - ТаблицаОстатковВыводСостояниеПросмотраРасширеннаяПодсказка - 39 + ТаблицаСадыОстаткиСостояниеПросмотраРасширеннаяПодсказка + 554 Label true true @@ -2795,22 +2665,22 @@ - ТаблицаОстатковВыводСостояниеПросмотраКонтекстноеМеню - 38 + ТаблицаСадыОстаткиСостояниеПросмотраКонтекстноеМеню + 553 true ViewStatusAddition - ТаблицаОстатковВывод + ТаблицаСадыОстатки true - ТаблицаОстатковВыводУправлениеПоиском - 34 + ТаблицаСадыОстаткиУправлениеПоиском + 549 - ТаблицаОстатковВыводУправлениеПоискомРасширеннаяПодсказка - 36 + ТаблицаСадыОстаткиУправлениеПоискомРасширеннаяПодсказка + 551 Label true true @@ -2819,19 +2689,19 @@ - ТаблицаОстатковВыводУправлениеПоискомКонтекстноеМеню - 35 + ТаблицаСадыОстаткиУправлениеПоискомКонтекстноеМеню + 550 true SearchControlAddition - ТаблицаОстатковВывод + ТаблицаСадыОстатки true - ТаблицаОстатковВыводРасширеннаяПодсказка - 30 + ТаблицаСадыОстаткиРасширеннаяПодсказка + 545 Label true true @@ -2840,8 +2710,458 @@ - ТаблицаОстатковВыводКонтекстноеМеню - 29 + ТаблицаСадыОстаткиКонтекстноеМеню + 544 + 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 +
+ + ТаблицаДетиОстатки + 567 + + <key>ru</key> + <value>Остатки по детям</value> + + true + true + + true + + + ТаблицаОстатковДети + + None + + ТаблицаДетиОстаткиУчреждение + 613 + + <key>ru</key> + <value>Учреждение (сад)</value> + + true + true + + true + + + ТаблицаОстатковДети.Учреждение + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиУчреждениеРасширеннаяПодсказка + 615 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиУчреждениеКонтекстноеМеню + 614 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДетиОстаткиИФО + 616 + + <key>ru</key> + <value>ИФО</value> + + true + true + + true + + + ТаблицаОстатковДети.ИФО + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиИФОРасширеннаяПодсказка + 618 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиИФОКонтекстноеМеню + 617 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДетиОстаткиРебенок + 619 + + <key>ru</key> + <value>Ребёнок</value> + + true + true + + true + + + ТаблицаОстатковДети.Ребенок + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиРебенокРасширеннаяПодсказка + 621 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиРебенокКонтекстноеМеню + 620 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДетиОстаткиДоговор + 622 + + <key>ru</key> + <value>Договор</value> + + true + true + + true + + + ТаблицаОстатковДети.Договор + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиДоговорРасширеннаяПодсказка + 624 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиДоговорКонтекстноеМеню + 623 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДетиОстаткиПоступило + 625 + + <key>ru</key> + <value>Поступило в ЦБ</value> + + true + true + + true + + + ТаблицаОстатковДети.Поступило + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиПоступилоРасширеннаяПодсказка + 627 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиПоступилоКонтекстноеМеню + 626 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДетиОстаткиПередано + 628 + + <key>ru</key> + <value>Передано в сад</value> + + true + true + + true + + + ТаблицаОстатковДети.Передано + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиПереданоРасширеннаяПодсказка + 630 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиПереданоКонтекстноеМеню + 629 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДетиОстаткиОстаток + 631 + + <key>ru</key> + <value>Остаток у ЦБ</value> + + true + true + + true + + + ТаблицаОстатковДети.Остаток + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиОстатокРасширеннаяПодсказка + 633 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиТаблицаДетиОстаткиОстатокКонтекстноеМеню + 632 + true + + InputField + Auto + true + Left + true + + true + true + true + true + true + true + Normal + + + + ТаблицаДетиОстаткиКоманднаяПанель + 568 + Left + true + + + ТаблицаДетиОстаткиСтрокаПоиска + 571 + + ТаблицаДетиОстаткиСтрокаПоискаРасширеннаяПодсказка + 573 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиСтрокаПоискаКонтекстноеМеню + 572 + true + + ТаблицаДетиОстатки + + true + + + + ТаблицаДетиОстаткиСостояниеПросмотра + 577 + + ТаблицаДетиОстаткиСостояниеПросмотраРасширеннаяПодсказка + 579 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиСостояниеПросмотраКонтекстноеМеню + 578 + true + + ViewStatusAddition + ТаблицаДетиОстатки + + true + + + + ТаблицаДетиОстаткиУправлениеПоиском + 574 + + ТаблицаДетиОстаткиУправлениеПоискомРасширеннаяПодсказка + 576 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиУправлениеПоискомКонтекстноеМеню + 575 + true + + SearchControlAddition + ТаблицаДетиОстатки + + true + + + + ТаблицаДетиОстаткиРасширеннаяПодсказка + 570 + Label + true + true + + Left + + + + ТаблицаДетиОстаткиКонтекстноеМеню + 569 true true @@ -3456,161 +3776,6 @@
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 - - - ДокументыПередачи @@ -4574,6 +4739,251 @@ </edit> </columns> </attributes> + <attributes> + <name>ТаблицаОстатковСады</name> + <title> + <key>ru</key> + <value>ТаблицаОстатковСады</value> + + 69 + + ValueTable + + + true + + + true + + + Учреждение + + <key>ru</key> + <value>Учреждение</value> + + 70 + + CatalogRef.Организации + + + true + + + true + + + + Поступило + + <key>ru</key> + <value>Поступило в ЦБ</value> + + 71 + + Number + + 15 + 2 + + + + true + + + true + + + + Передано + + <key>ru</key> + <value>Передано в сад</value> + + 72 + + Number + + 15 + 2 + + + + true + + + true + + + + Остаток + + <key>ru</key> + <value>Остаток у ЦБ</value> + + 73 + + Number + + 15 + 2 + + + + true + + + true + + + + + ТаблицаОстатковДети + + <key>ru</key> + <value>ТаблицаОстатковДети</value> + + 74 + + ValueTable + + + true + + + true + + + Учреждение + + <key>ru</key> + <value>Учреждение</value> + + 75 + + CatalogRef.Организации + + + true + + + true + + + + ИФО + + <key>ru</key> + <value>ИФО</value> + + 76 + + CatalogRef.ИсточникиФинансовогоОбеспечения + + + true + + + true + + + + Ребенок + + <key>ru</key> + <value>Ребенок</value> + + 77 + + CatalogRef.Дети + + + true + + + true + + + + Договор + + <key>ru</key> + <value>Договор</value> + + 78 + + CatalogRef.Договоры + + + true + + + true + + + + Поступило + + <key>ru</key> + <value>Поступило в ЦБ</value> + + 79 + + Number + + 15 + 2 + + + + true + + + true + + + + Передано + + <key>ru</key> + <value>Передано в сад</value> + + 80 + + Number + + 15 + 2 + + + + true + + + true + + + + Остаток + + <key>ru</key> + <value>Остаток у ЦБ</value> + + 81 + + Number + + 15 + 2 + + + + true + + + true + + + Обновить @@ -4606,22 +5016,6 @@ </handler> </action> </formCommands> - <formCommands> - <name>ИнициализироватьИдентификаторыЭДО</name> - <title> - <key>ru</key> - <value>Инициализировать идентификаторы ЭДО</value> - - 4 - - true - - - - ИнициализироватьИдентификаторыЭДО - - - diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Module.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Module.bsl index 376c813..12738e6 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Module.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/Forms/Форма/Module.bsl @@ -42,6 +42,26 @@ #КонецОбласти +#Область ОбработчикиСобытийЭлементовТаблицыФормыТаблицаСадыОстатки + +// Показывает остатки по детям выбранного сада. +// Строка сада берётся из таблицы «Остатки по садам»; при пустой строке детализация +// остаётся по всем садам из отбора формы. +// +&НаКлиенте +Процедура ТаблицаСадыОстаткиПриАктивизацииСтроки(Элемент) + + ТекущиеДанные = Элемент.ТекущиеДанные; + Если ТекущиеДанные = Неопределено Тогда + Возврат; + КонецЕсли; + + ЗаполнитьОстаткиПоДетям(ТекущиеДанные.Учреждение); + +КонецПроцедуры + +#КонецОбласти + #Область ОбработчикиКомандФормы // Обновляет данные таблиц формы по установленным фильтрам. @@ -85,18 +105,6 @@ КонецПроцедуры -// Обеспечивает наличие идентификаторов объектов метаданных по документам внутреннего ЭДО. -// -// Команда нужна для разовой проверки механизма внутреннего ЭДО БГУ: без идентификаторов -// документы расширения не попадают в настройки внутреннего ЭДО (см. ПС_ИдентификаторыОбъектовЭДО). -// -&НаКлиенте -Процедура ИнициализироватьИдентификаторыЭДО(Команда) - - ИнициализироватьИдентификаторыЭДОНаСервере(); - -КонецПроцедуры - #КонецОбласти #Область СлужебныеПроцедурыИФункции @@ -118,33 +126,12 @@ ЗаполнитьДокументыПередачи(Отборы.ЦБОрганизация, Отборы.СадОрганизация); ЗаполнитьДокументыПринятия(Отборы.ЦБОрганизация, Отборы.СадОрганизация); ЗаполнитьСверку(Отборы.ЦБОрганизация, Отборы.СадОрганизация); - ЗаполнитьТаблицуОстатков(); + ЗаполнитьОстаткиПоСадам(); + ЗаполнитьОстаткиПоДетям(Неопределено); ЗаполнитьКассовыеПоступления(); КонецПроцедуры -// Обеспечивает наличие идентификаторов объектов метаданных по документам внутреннего ЭДО -// и выводит пользователю результат проверки. -// -&НаСервере -Процедура ИнициализироватьИдентификаторыЭДОНаСервере() - - ОбъектОбработки = РеквизитФормыВЗначение("Объект"); - Идентификаторы = ОбъектОбработки.ПС_ИнициализироватьИдентификаторыОбъектовЭДО(); - - ТекстыИдентификаторов = Новый Массив; - - Для Каждого КлючИЗначение Из Идентификаторы Цикл - ТекстыИдентификаторов.Добавить(КлючИЗначение.Ключ + " -> " + Строка(КлючИЗначение.Значение)); - КонецЦикла; - - Сообщение = Новый СообщениеПользователю; - Сообщение.Текст = "Идентификаторы объектов метаданных внутреннего ЭДО: " - + СтрСоединить(ТекстыИдентификаторов, "; "); - Сообщение.Сообщить(); - -КонецПроцедуры - // Возвращает отборы формы в терминах, в которых они хранятся в документах. // // ЦБ и учреждение (сад) хранятся в документах передачи и принятия организациями, @@ -174,7 +161,8 @@ ДокументыПередачи.Очистить(); ДокументыПринятия.Очистить(); Сверка.Очистить(); - ТаблицаОстатков.Очистить(); + ТаблицаОстатковСады.Очистить(); + ТаблицаОстатковДети.Очистить(); КассовыеПоступления.Очистить(); КонецПроцедуры @@ -426,89 +414,135 @@ КонецПроцедуры -// Заполняет таблицу остатков и оборотов по счетам 205.31 и 304.04. -// Использует виртуальную таблицу ОстаткиИОбороты регистра бухгалтерии. +// Заполняет таблицу остатков по садам: поступило в ЦБ, передано в сад и остаток у ЦБ. +// +// Источник данных - регистр накопления взаиморасчётов по родительской плате: приход +// формирует кассовое поступление, расход - документ передачи платежей в учреждение. +// Остаток показывает, сколько поступило в ЦБ и ещё не передано в сад. // &НаСервере -Процедура ЗаполнитьТаблицуОстатков() +Процедура ЗаполнитьОстаткиПоСадам() - ТаблицаОстатков.Очистить(); - - Если ЗначениеЗаполнено(Объект.Учреждение) Тогда - ОбщегоНазначения.СообщитьПользователю( - "Остатки и обороты по счетам ведутся без разреза по учреждению," - + " поэтому отбор по учреждению на эту страницу не влияет."); - КонецЕсли; - - НачалоПериода = Объект.Период.ДатаНачала; - КонецПериода = Объект.Период.ДатаОкончания; + ТаблицаОстатковСады.Очистить(); Запрос = Новый Запрос; + УсловиеОтбора = УсловиеОтбораОстатков(Запрос); + Запрос.Текст = "ВЫБРАТЬ - | ""205.31"" КАК Счет, - | ОстаткиИОбороты.ИФО КАК ИФО, - | СУММА(ОстаткиИОбороты.СуммаНачальныйОстаток) КАК СуммаНачальныйОстаток, - | СУММА(ОстаткиИОбороты.СуммаОборотДт) КАК СуммаОборотДт, - | СУММА(ОстаткиИОбороты.СуммаОборотКт) КАК СуммаОборотКт, - | СУММА(ОстаткиИОбороты.СуммаКонечныйОстаток) КАК СуммаКонечныйОстаток + | Остатки.Учреждение КАК Учреждение, + | СУММА(Остатки.СуммаПриход) КАК Поступило, + | СУММА(Остатки.СуммаРасход) КАК Передано, + | СУММА(Остатки.СуммаКонечныйОстаток) КАК Остаток |ИЗ - | РегистрБухгалтерии.ЖурналПроводокЕПСБУ.ОстаткиИОбороты( - | &НачалоПериода, - | &КонецПериода, - | Авто, - | , - | Счет В ИЕРАРХИИ (&Счет205)) КАК ОстаткиИОбороты - |ГДЕ - | (&ИФО = НЕОПРЕДЕЛЕНО - | ИЛИ ОстаткиИОбороты.ИФО = &ИФО) + | РегистрНакопления.ПС_ВзаиморасчетыПоРодительскойПлате.ОстаткиИОбороты( + | &НачалоПериода, &КонецПериода, Авто, , " + УсловиеОтбора + ") КАК Остатки |СГРУППИРОВАТЬ ПО - | ОстаткиИОбороты.ИФО - | - |ОБЪЕДИНИТЬ ВСЕ - | - |ВЫБРАТЬ - | ""304.04"", - | ОстаткиИОбороты.ИФО, - | СУММА(ОстаткиИОбороты.СуммаНачальныйОстаток), - | СУММА(ОстаткиИОбороты.СуммаОборотДт), - | СУММА(ОстаткиИОбороты.СуммаОборотКт), - | СУММА(ОстаткиИОбороты.СуммаКонечныйОстаток) - |ИЗ - | РегистрБухгалтерии.ЖурналПроводокЕПСБУ.ОстаткиИОбороты( - | &НачалоПериода, - | &КонецПериода, - | Авто, - | , - | Счет В ИЕРАРХИИ (&Счет304)) КАК ОстаткиИОбороты - |ГДЕ - | (&ИФО = НЕОПРЕДЕЛЕНО - | ИЛИ ОстаткиИОбороты.ИФО = &ИФО) - |СГРУППИРОВАТЬ ПО - | ОстаткиИОбороты.ИФО"; + | Остатки.Учреждение + |УПОРЯДОЧИТЬ ПО + | Остатки.Учреждение"; - Счет205 = ПланыСчетов.ЕПСБУ.НайтиПоКоду("205.31"); - Счет304 = ПланыСчетов.ЕПСБУ.НайтиПоКоду("304.04"); - Если Счет205 = Неопределено ИЛИ Счет304 = Неопределено Тогда - ОбщегоНазначения.СообщитьПользователю( - "Остатки и обороты не рассчитаны: в плане счетов ЕПСБУ не найден счет" - + " 205.31 и/или 304.04."); - Возврат; - КонецЕсли; - - Запрос.УстановитьПараметр("НачалоПериода", НачалоПериода); - Запрос.УстановитьПараметр("КонецПериода", КонецПериода); - Запрос.УстановитьПараметр("Счет205", Счет205); - Запрос.УстановитьПараметр("Счет304", Счет304); - Запрос.УстановитьПараметр("ИФО", ?(ЗначениеЗаполнено(Объект.ИФО), Объект.ИФО, Неопределено)); + Запрос.УстановитьПараметр("НачалоПериода", Объект.Период.ДатаНачала); + Запрос.УстановитьПараметр("КонецПериода", Объект.Период.ДатаОкончания); Выборка = Запрос.Выполнить().Выбрать(); Пока Выборка.Следующий() Цикл - ЗаполнитьЗначенияСвойств(ТаблицаОстатков.Добавить(), Выборка); + Если Выборка.Поступило = 0 И Выборка.Передано = 0 И Выборка.Остаток = 0 Тогда + Продолжить; + КонецЕсли; + ЗаполнитьЗначенияСвойств(ТаблицаОстатковСады.Добавить(), Выборка); КонецЦикла; КонецПроцедуры +// Заполняет таблицу остатков по детям: поступило в ЦБ, передано в сад и остаток у ЦБ +// по каждому ребёнку и договору. +// +// Параметры: +// Учреждение - CatalogRef.Организации - сад, выбранный в таблице остатков по садам; +// Неопределено - детализация строится по всем садам из отбора формы. +// +&НаСервере +Процедура ЗаполнитьОстаткиПоДетям(Учреждение) + + ТаблицаОстатковДети.Очистить(); + + Запрос = Новый Запрос; + УсловиеОтбора = УсловиеОтбораОстатков(Запрос, Учреждение); + + Запрос.Текст = + "ВЫБРАТЬ + | Остатки.Учреждение КАК Учреждение, + | Остатки.ИФО КАК ИФО, + | Остатки.Ребенок КАК Ребенок, + | Остатки.Договор КАК Договор, + | СУММА(Остатки.СуммаПриход) КАК Поступило, + | СУММА(Остатки.СуммаРасход) КАК Передано, + | СУММА(Остатки.СуммаКонечныйОстаток) КАК Остаток + |ИЗ + | РегистрНакопления.ПС_ВзаиморасчетыПоРодительскойПлате.ОстаткиИОбороты( + | &НачалоПериода, &КонецПериода, Авто, , " + УсловиеОтбора + ") КАК Остатки + |СГРУППИРОВАТЬ ПО + | Остатки.Учреждение, + | Остатки.ИФО, + | Остатки.Ребенок, + | Остатки.Договор + |УПОРЯДОЧИТЬ ПО + | Учреждение, + | Ребенок"; + + Запрос.УстановитьПараметр("НачалоПериода", Объект.Период.ДатаНачала); + Запрос.УстановитьПараметр("КонецПериода", Объект.Период.ДатаОкончания); + + Выборка = Запрос.Выполнить().Выбрать(); + Пока Выборка.Следующий() Цикл + Если Выборка.Поступило = 0 И Выборка.Передано = 0 И Выборка.Остаток = 0 Тогда + Продолжить; + КонецЕсли; + ЗаполнитьЗначенияСвойств(ТаблицаОстатковДети.Добавить(), Выборка); + КонецЦикла; + +КонецПроцедуры + +// Возвращает условие отбора для виртуальной таблицы остатков регистра взаиморасчётов +// и устанавливает соответствующие параметры запроса. +// +// Параметры: +// Запрос - Запрос - запрос, в который добавляются параметры отбора; +// Учреждение - CatalogRef.Организации - сад, по которому строится детализация; +// Неопределено - используется отбор по учреждению из формы. +// +// Возвращаемое значение: +// Строка - условие отбора в терминах полей регистра; "ИСТИНА", если отборов нет. +// +&НаСервере +Функция УсловиеОтбораОстатков(Запрос, Учреждение = Неопределено) + + Условия = Новый Массив; + + Если ЗначениеЗаполнено(Объект.Организация) Тогда + Запрос.УстановитьПараметр("ОрганизацияОтбор", Объект.Организация); + Условия.Добавить("Организация = &ОрганизацияОтбор"); + КонецЕсли; + + Если ЗначениеЗаполнено(Объект.ИФО) Тогда + Запрос.УстановитьПараметр("ИФООтбор", Объект.ИФО); + Условия.Добавить("ИФО = &ИФООтбор"); + КонецЕсли; + + Если НЕ ЗначениеЗаполнено(Учреждение) Тогда + Учреждение = Объект.Учреждение; + КонецЕсли; + + Если ЗначениеЗаполнено(Учреждение) Тогда + Запрос.УстановитьПараметр("УчреждениеОтбор", Учреждение); + Условия.Добавить("Учреждение = &УчреждениеОтбор"); + КонецЕсли; + + Возврат ?(Условия.Количество() = 0, "ИСТИНА", СтрСоединить(Условия, " И ")); + +КонецФункции + // Заполняет таблицу формы КассовыеПоступления: документы с признаком "Родительская плата" за период // по установленным отборам. // Колонка "Строк не распознано" показывает строки расшифровки платежа, в которых не определён ребёнок, - diff --git a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ObjectModule.bsl b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ObjectModule.bsl index 308d8d8..1ade038 100644 --- a/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ObjectModule.bsl +++ b/153_ЦБ_ОУО_БГУ.ПрофиСофт/src/DataProcessors/ПС_УправлениеРасчетамиПоРодительскойПлате/ObjectModule.bsl @@ -1,24 +1,2 @@ // Обработка ПС_УправлениеРасчетамиПоРодительскойПлате. // Логика дашборда реализована в модуле управляемой формы (Forms/Форма/Module.bsl). - -#Область ПрограммныйИнтерфейс - -#Если Сервер Или ВнешнееСоединение Или ТолстыйКлиентОбычноеПриложение Тогда - -// Обеспечивает наличие в справочнике идентификаторов объектов метаданных записей -// по документам внутреннего ЭДО, созданным в расширении конфигурации. -// -// Возвращаемое значение: -// Соответствие из КлючИЗначение - идентификаторы объектов метаданных по их полным именам: -// * Ключ - Строка - полное имя объекта метаданных, например "Документ.ПС_ПринятиеПоступившихПлатежейИзЦБ"; -// * Значение - СправочникСсылка.ИдентификаторыОбъектовМетаданных - идентификатор объекта метаданных. -// -Функция ПС_ИнициализироватьИдентификаторыОбъектовЭДО() Экспорт - - Возврат ПС_ИдентификаторыОбъектовЭДО.ПС_ОбеспечитьИдентификаторыДокументовЭДО(); - -КонецФункции - -#КонецЕсли - -#КонецОбласти \ No newline at end of file