OnDeleteDocument - Событие удаление документа

Событие удаление документа.

Событие OnDeleteDocument приходит к документу перед его удалением. Обработчик данного события может запретить удаление данного документа или выполнить действия связанные с удалением документа. Для того чтобы запретить удаление документа  необходимо в обработчике данного документа вернуть код “NO-DELETE”.

Замечание: Документ не удаляется в системе в любом случае, даже если не был возвращен код “NO-DELETE” если :

1. На этот документ ссылаются другие документы;
2. Если данный документ фигурирует как документ основание в задаче.

Синтаксис вызова события :

PROCEDURE OnDeleteDocument :
  define input parameter rid-doc as integer.
 

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

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

PROCEDURE OnDeleteDocument :
  define input parameter rid-doc as integer.
 
  define variable rid-main      as integer.       
 
  run src/kernel/get_ffv.p ( "1:27", rid-doc ).   
  rid-main = DECIMAL (RETURN-VALUE).              
  run src/kernel/doctask.p ( rid-main, "Recalc" ).
  RETURN "DELETE".
END.