Постановка задачи

Тип карточки Договорные документы предназначен для занесения в систему договоров и договорных документов. В событиях типа карточки необходимо реализовать логику:

Запись. Сохранение до

 

  // Если работа в визуальном режиме либо карточка документа 

  // была изменена.

 

  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

Запись. Сохранение после

 

  // Если заполнено поле "Договор", то связать документ

  // с записью справочника Договоры.

  ContractID = Object.Requisites('Договор').ValueID

  if ContractID <> 0

    ContractRecordInfo = References.ДГВ.ObjectInfo(ContractID)

    EDocuments.BindTo(ContractRecordInfo; Object.Info)

  endif

© 2016 Компания DIRECTUM

Сообщество пользователей DIRECTUM