UniBasic Commands Reference - Rocket Software

STATUS Function Return Values
After you execute OSBWRITE, the STATUS function returns one of the values
described in the following table.
Examples
Value Description
0 The write was successful.
1 The file name is invalid.
2 You do not have permission to access the file.
4 The file does not exist.
STATUS Function Return Values
In the following example, the program statement writes the data in TEST to the
RFILE starting from the beginning of the file:
OSBWRITE TEST ON RFILE AT 0
In the next example, the program segment reads REC.ID from a select list, reads the
associated record from the CLIENT file, and appends the record onto a variable
(BLOCK), terminating each record with an ASCII 10 (line feed). When it is
complete, the code writes the block to the NTFS or UNIX file name opened to the
variable CLIENT.SEQ.
DONE = 0
LOOP
READNEXT REC.ID ELSE DONE = 1
UNTIL DONE DO
READ REC FROM CLIENT,REC.ID ELSE REC = ' '
IF REC THEN
REC = REC.ID:@FM:REC
BLOCK := REC:CHAR(10)
END
REPEAT
OSBWRITE BLOCK ON CLIENT.SEQ AT 0
OSBWRITE 1-552