Type III C lass A Program

WRBUF Function
Purpose:
The WRBUF function writes one item of information into the
file whose name is specified by the filename and filetype
parameters. If the file does not exist when this function
is first called. a new file is opened and assigned the given
name and type. WRBUF automatically packs fixed-length items
into an SOO byte buffer and writes this 800 byte buffer onto
the disk when required.
Calling Sequence:
PLIST DC CLS-WRBUF e
DC CLS- e filename
DC CLS' , filetype
DC CL2' , mode must be specified
not *
DC H' • item number (0 if next item)
DC A( ) user's buffer address
DC F' , number of bytes
DC CL2' , fixed-variable flag, F or V
DC H' e number of items to write
(0 treated as 1 item)
Note:
The number of bytes in the user area divided by the number
of items (that is, the same logical record length) must be
constant for a fixed-length-record file.
Error Codes:
E(00001)
E(00002)
EC00003)
E(OOOOIl)
EtOOo-05)
E(00006)
E(OOOO?)
E(OOOOS}
EC000091
E(OOOlO)
E(OOOll)
E(00012)
E(00013)
E(00014)
E(00015)
E(OOOl6)
E(OOOl1)
File name or file type not specified
User memory address not in user area
Disk error. The disk might be read-only.
First character of mode illegal
Second character of mode illegal
Attempted to write item whose number
exceeds 65533
Attempt to skip over unwritten variablelength
item
Number of bytes not specified
File already active for reading
Maximum number of CMS files (3500) reached
F-V flag not F or V
Mode S (system) is illegal
Disk already full
Goes to KILLEXF instead of returning to
caller
Attempt to write a not yet formatted disk
Length of this item not same as previous
Characteristic (P-V Flag) not same as
previous
Variable length item greater than 65K bytes
WRBUF FUnction 319