Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Two #2

Open
wants to merge 2 commits into
base: main
Choose a base branch
from
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Original file line number Diff line number Diff line change
@@ -0,0 +1,33 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:Catalog xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="9d7d919d-236d-4561-a399-21403b13fe13">
<producedTypes>
<objectType typeId="3533168e-d6c7-42d5-9904-89caa5569492" valueTypeId="030300c7-0545-4ec9-ad1d-4cc4ab7a2a16"/>
<refType typeId="59a1461a-5958-4d04-b4c6-7883c379ace7" valueTypeId="26ad462d-7b7c-4a1d-a576-5b349e4b45b3"/>
<selectionType typeId="7e7e301f-ff2f-4365-b45d-15b26c20920d" valueTypeId="444a4c69-15c5-45d6-8e61-d5710555ad78"/>
<listType typeId="01f88a69-3001-457c-8510-debc62af39a7" valueTypeId="36c8ccf2-757a-4dcc-945c-43862fc5c886"/>
<managerType typeId="26907613-6fd6-4098-b56c-babd61763a50" valueTypeId="f1fca1e3-1e71-4c48-8693-6d3cb752f31e"/>
</producedTypes>
<name>АВС_Должности</name>
<synonym>
<key>ru</key>
<value>Должности</value>
</synonym>
<useStandardCommands>true</useStandardCommands>
<inputByString>Catalog.АВС_Должности.StandardAttribute.Code</inputByString>
<inputByString>Catalog.АВС_Должности.StandardAttribute.Description</inputByString>
<fullTextSearchOnInputByString>DontUse</fullTextSearchOnInputByString>
<createOnInput>Use</createOnInput>
<dataLockControlMode>Managed</dataLockControlMode>
<fullTextSearch>Use</fullTextSearch>
<levelCount>2</levelCount>
<foldersOnTop>true</foldersOnTop>
<codeLength>9</codeLength>
<descriptionLength>25</descriptionLength>
<codeType>String</codeType>
<codeAllowedLength>Variable</codeAllowedLength>
<checkUnique>true</checkUnique>
<autonumbering>true</autonumbering>
<defaultPresentation>AsDescription</defaultPresentation>
<editType>InDialog</editType>
<choiceMode>BothWays</choiceMode>
</mdclass:Catalog>
Original file line number Diff line number Diff line change
@@ -0,0 +1,100 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:Catalog xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:core="http://g5.1c.ru/v8/dt/mcore" xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="a351773d-87bb-454d-acab-9c0d40410eab">
<producedTypes>
<objectType typeId="7804f766-2cd5-4245-988c-1392d94b61d0" valueTypeId="40a62e9d-9f26-48c4-9442-5074f6133487"/>
<refType typeId="2a196b32-7f79-4f91-8008-4742a678def7" valueTypeId="938b9332-00c7-41cf-b965-2e132c0bdbdf"/>
<selectionType typeId="0565a8d2-f469-45b4-a933-5ea29c910c7e" valueTypeId="0e2d2529-32d2-4a03-b624-df7d16bdaf07"/>
<listType typeId="2aa0e6db-9c96-4426-bab8-aa22f8c70de0" valueTypeId="1d95faab-ed2b-4b00-8504-d1cbfa3f1551"/>
<managerType typeId="b45a6cf3-3062-4cc7-bad1-6ab1fffeb1c3" valueTypeId="4f3acdc1-11fe-4c7c-bae1-f5311b6167e7"/>
</producedTypes>
<name>АВС_КонтактныеЛицаКА</name>
<synonym>
<key>ru</key>
<value>АВС контактные лица КА</value>
</synonym>
<useStandardCommands>true</useStandardCommands>
<inputByString>Catalog.АВС_КонтактныеЛицаКА.StandardAttribute.Code</inputByString>
<inputByString>Catalog.АВС_КонтактныеЛицаКА.StandardAttribute.Description</inputByString>
<fullTextSearchOnInputByString>DontUse</fullTextSearchOnInputByString>
<createOnInput>Use</createOnInput>
<dataLockControlMode>Managed</dataLockControlMode>
<fullTextSearch>Use</fullTextSearch>
<levelCount>2</levelCount>
<foldersOnTop>true</foldersOnTop>
<codeLength>9</codeLength>
<descriptionLength>25</descriptionLength>
<codeType>String</codeType>
<codeAllowedLength>Variable</codeAllowedLength>
<checkUnique>true</checkUnique>
<autonumbering>true</autonumbering>
<defaultPresentation>AsDescription</defaultPresentation>
<editType>InDialog</editType>
<choiceMode>BothWays</choiceMode>
<attributes uuid="5ec5b4cb-ba96-4552-93e1-0e739ffbe974">
<name>Должность</name>
<synonym>
<key>ru</key>
<value>Должность</value>
</synonym>
<type>
<types>CatalogRef.АВС_Должности</types>
</type>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="96917bbb-3986-4e6b-b1f6-4f9ccc1fa4c9">
<name>КонтактныйТелефон</name>
<synonym>
<key>ru</key>
<value>Контактный телефон</value>
</synonym>
<type>
<types>String</types>
<stringQualifiers>
<length>50</length>
</stringQualifiers>
</type>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="08048fb8-107a-4d18-ac51-3cafd1ce6b45">
<name>ДействуетНаОсновании</name>
<synonym>
<key>ru</key>
<value>Действует на основании</value>
</synonym>
<type>
<types>String</types>
<stringQualifiers>
<length>150</length>
</stringQualifiers>
</type>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
<attributes uuid="01f4c132-3238-4e59-bad1-f076cb13e029">
<name>Заметка</name>
<synonym>
<key>ru</key>
<value>Заметка</value>
</synonym>
<type>
<types>String</types>
<stringQualifiers/>
</type>
<minValue xsi:type="core:UndefinedValue"/>
<maxValue xsi:type="core:UndefinedValue"/>
<fillValue xsi:type="core:UndefinedValue"/>
<fullTextSearch>Use</fullTextSearch>
<dataHistory>Use</dataHistory>
</attributes>
</mdclass:Catalog>
Original file line number Diff line number Diff line change
@@ -0,0 +1,52 @@
#Область ПрограмныйИнтерфейс
Процедура ДополнитьФорму(Форма) Экспорт

ИмяФормы = Форма.ИмяФормы;

Если ИмяФормы = "Документ.ЗаказПокупателя.Форма.ФормаДокумента" Тогда
ДобавитьКонтактноеЛицоГруппаШапкаПраво(Форма);
ДобавитьСогласованнаяСкидка(Форма);
ИначеЕсли ИмяФормы = "Документ.ОплатаОтПокупателя.Форма.ФормаДокумента" Тогда
ВставитьКонтактноеЛицоНаФормуПередСуммойДокумента(Форма);
ИначеЕсли ИмяФормы = "Документ.ОплатаПоставщику.Форма.ФормаДокумента" Тогда
ВставитьКонтактноеЛицоНаФормуПередСуммойДокумента(Форма);
ИначеЕсли ИмяФормы = "Документ.ПоступлениеТоваровУслуг.Форма.ФормаДокумента" Тогда
ДобавитьКонтактноеЛицоГруппаШапкаПраво(Форма);
ИначеЕсли ИмяФормы = "Документ.РеализацияТоваровУслуг.Форма.ФормаДокумента" Тогда
ДобавитьКонтактноеЛицоГруппаШапкаПраво(Форма);
КонецЕсли;

КонецПроцедуры

#КонецОбласти

#Область СлужебныеПрограмныйИнтерфейс

Процедура ДобавитьКонтактноеЛицоГруппаШапкаПраво(Форма)

ПолеВвода = Форма.Элементы.Добавить("КонтактноеЛицо", Тип("ПолеФормы"), Форма.Элементы.ГруппаШапкаПраво);
ПолеВвода.Вид = ВидПоляФормы.ПолеВвода;
ПолеВвода.ПутьКДанным = "Объект.АВС_КонтактноеЛицо";

КонецПроцедуры

Процедура ВставитьКонтактноеЛицоНаФормуПередСуммойДокумента(Форма)

ПолеВвода = Форма.Элементы.Вставить("КонтактноеЛицо", Тип("ПолеФормы"), , Форма.Элементы.СуммаДокумента);
ПолеВвода.Вид = ВидПоляФормы.ПолеВвода;
ПолеВвода.ПутьКДанным = "Объект.АВС_КонтактноеЛицо";

КонецПроцедуры

Процедура ДобавитьСогласованнаяСкидка(Форма)

ПолеВвода = Форма.Элементы.Добавить("СогласованнаяСкидка", Тип("ПолеФормы"),
Форма.Элементы.ГруппаШапкаЛево);
ПолеВвода.Вид = ВидПоляФормы.ПолеВвода;
ПолеВвода.ПутьКДанным = "Объект.АВС_СогласованнаяСкидка";
ПолеВвода.УстановитьДействие("ПриИзменении", "АВС_ПриИзмененииСогласованнаяСкидка");


КонецПроцедуры

#КонецОбласти
Original file line number Diff line number Diff line change
@@ -0,0 +1,9 @@
<?xml version="1.0" encoding="UTF-8"?>
<mdclass:CommonModule xmlns:mdclass="http://g5.1c.ru/v8/dt/metadata/mdclass" uuid="d1f7ae67-51aa-469f-9e3c-e538af30c65d">
<name>АВС_РаботаСФормамиСервер</name>
<synonym>
<key>ru</key>
<value>АВС работа с формами сервер</value>
</synonym>
<server>true</server>
</mdclass:CommonModule>
Original file line number Diff line number Diff line change
Expand Up @@ -94,6 +94,11 @@
Команды = КэшФормы.Команды.Скопировать();
ВывестиКоманды(Форма, Команды, ПараметрыРазмещения);

//АВС {{
АВС_РаботаСФормами.ДополнитьФорму(Форма);
//ABC}}


КонецПроцедуры

// Конструктор одноименного параметра процедуры ПодключаемыеКоманды.ПриСозданииНаСервере.
Expand Down
3 changes: 3 additions & 0 deletions onec-mid-base-11/src/Configuration/Configuration.mdo
Original file line number Diff line number Diff line change
Expand Up @@ -814,6 +814,7 @@
<commonModules>CommonModule.ФайловаяСистемаСлужебныйКлиент</commonModules>
<commonModules>CommonModule.ФайловаяСистемаСлужебныйКлиентСервер</commonModules>
<commonModules>CommonModule.ФизическиеЛицаКлиентСервер</commonModules>
<commonModules>CommonModule.АВС_РаботаСФормамиСервер</commonModules>
<exchangePlans>ExchangePlan.ОбновлениеИнформационнойБазы</exchangePlans>
<xDTOPackages>XDTOPackage.ApdexExport</xDTOPackages>
<xDTOPackages>XDTOPackage.ApdexExport_1_0_0_2</xDTOPackages>
Expand Down Expand Up @@ -1134,6 +1135,8 @@
<catalogs>Catalog.УчетныеЗаписиСинхронизацииФайлов</catalogs>
<catalogs>Catalog.УчетныеЗаписиЭлектроннойПочты</catalogs>
<catalogs>Catalog.Файлы</catalogs>
<catalogs>Catalog.АВС_Должности</catalogs>
<catalogs>Catalog.АВС_КонтактныеЛицаКА</catalogs>
<documents>Document.ЗаказПокупателя</documents>
<documents>Document.ОплатаОтПокупателя</documents>
<documents>Document.ОплатаПоставщику</documents>
Expand Down