BeforeCloseDocument - Событие предзакрытия документа

Событие предзакрытия документа.

Данное событие приходит к документу, когда пользователь выполнил функцию Сохранить документ. Данное событие предназначено для проверки корректности введенных в документ данных. Если событие возвращает значение “ERROR“, то пользователь останется в документе и не сможет выйти из документа через сохранение, пока не исправит документ к такому виду, чтобы оно удовлетворяло условию события.

Синтаксис использования:

PROCEDURE BeforeCloseDocument :
  DEFINE INPUT PARAMETER rid-doc AS INTEGER.

Где rid-doc - внутренний номер документа.

Пример использования:

PROCEDURE BeforeCloseDocument :
  DEFINE INPUT PARAMETER rid-doc AS INTEGER.

  DEFINE VARIABLE bdate       AS DATE      NO-UNDO.
  DEFINE VARIABLE edate       AS DATE      NO-UNDO.
  RUN src/kernel/get_ffv.p ( "1:6", rid-doc ). bdate = DATE ( RETURN-VALUE ).
  RUN src/kernel/get_ffv.p ( "1:7", rid-doc ). edate = DATE ( RETURN-VALUE ).
  IF bdate > edate THEN
  DO:
    RUN src/message_alert.p ("Дата окончания Договора не может быть раньше даты его начала").
    RETURN "ERROR".
  END.
 
  RETURN "OK".
END.