GeMIS_WEB/GUI/TRIGGERS/t-aufko-delete.p

TRIGGER PROCEDURE FOR DELETE OF Aufko.

    DEFINE VARIABLE lRetVal AS LOGICAL NO-UNDO.

/*    lRetVal = DYNAMIC-FUNCTION ('deleteAuftrag':U, RECID(Aufko)) NO-ERROR.*/
/*                                                                          */
/*    IF  lRetVal = ?     OR                                                */
/*        lRetVal = FALSE THEN RETURN ERROR.                                */