UniBasic Commands Reference - Rocket Software

STATUS Function Return Values
After you execute WRITE, the STATUS function returns one of the values described
in the following table.
Return
Value Meaning
0 Successful write.
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 WRITE is not
allowed.
3 Trigger execution error or unexpected return from trigger routine (for
example, the trigger subroutine is not cataloged).
10 Non-RFS files – WRITE created a duplicate alternate index key and ECL
DUP.STATUS is on; or WRITE failed because a duplicate value exists in the
index, and NO.DUPS was specified when the index was created.
RFS files – WRITE created a duplicate value in the index, and ECL
DUP.STATUS is on.
STATUS Function Return Values
Examples
The following program segment is taken from the sample program in Appendix A,
“Sample Program, in Developing UniBasic Applications. The statements update
records that were previously locked with READU and release locks on the records.
WRITE CLIENT.REC ON CLIENT_FILE,CLIENT_NUMBER
WRITE ORDER.REC ON ORDERS_FILE,ORDER_NUMBER
In the next example, the program statement writes the contents of the variable
OVERSTOCK to the file named in variable FNAME as a record with ID OS:
WRITE OVERSTOCK TO FNAME,"OS"
WRITE 1-904