UniBasic Commands Reference - Rocket Software

Tip: The UniBasic STATUS function returns the status of the preceding command.
You can place it within the trigger subroutine to learn about the status of individual
commands executed within the trigger. If you place it immediately after the statement
that calls the trigger, it returns the status of the UniBasic command as determined by
the trigger. The trigger subroutine also returns a value indicating its status in the
parameter execstat. These values returned in execstat are listed in the Parameters
section.
Return
Value Description
0 No error.
Examples
The following example begins with an UPDATE trigger subroutine called TRIG1.
Because the return status is always 0, no record in the file can be updated.
1-882 UniBasic Commands Reference
1 System error, such as a damaged file.
2 Constraint violation. In this case, the UniBasic trigger subroutine returns a
value of 0 in the parameter execstat, indicating that the update or delete is not
allowed.
3 Trigger execution error or unexpected return from trigger routine (for
example, the trigger subroutine is not cataloged).
STATUS Function Return Values
SUBROUTINE
TRIG1(exec.stat,dict.flag,trig.name,rec.id.expr,rec.val)
exec.stat=0
RETURN
Next, we create the trigger, associate it with the ORDERS file, and list the triggers
associated with the ORDERS file:
:CREATE.TRIGGER ORDERS TRIG1 UPDATE
:LIST.TRIGGER ORDERS
BEFORE UPDATE TRIGGER: TRIG1
BEFORE DELETE TRIGGER: not defined