Постановка задачи
Тип карточки Договорные документы предназначен для занесения в систему договоров и договорных документов. В событиях типа карточки необходимо реализовать логику:
1. | Автоматически формировать значение реквизита № документа (Дополнение). |
Запись. Сохранение до
// Если работа в визуальном режиме либо карточка документа
// была изменена.
if (not VarIsNull(Object.View)) or Object.Modified
// Если в качестве номера документа указано АВТОНОМЕР, сформировать и
// присвоить новый номер документу.
EDocNumber = Object.Requisites("Дополнение").AsString
AutoNum = LoadString("AUTO_CODE"; SYSRES_SBDATA;)
// АВТОНОМЕР
if EDocNumber == AutoNum
EDocNumber = КНЦЭлДокНомер()
// № документа
Object.Дополнение = EDocNumber
endif
endif
2. | Связывать документ с соответствующей записью справочника Договоры, если заполнено поле Договор (Договор). |
Запись. Сохранение после
// Если заполнено поле "Договор", то связать документ
// с записью справочника Договоры.
ContractID = Object.Requisites('Договор').ValueID
if ContractID <> 0
ContractRecordInfo = References.ДГВ.ObjectInfo(ContractID)
EDocuments.BindTo(ContractRecordInfo; Object.Info)
endif
© Компания DIRECTUM, 2018 | Сообщество пользователей DIRECTUM |