DO CALLUSER = CTBRECL ARG recfunc, fileid, argnum, keylen1, keyvar1, ..., key-end-mark, len1, var1, ...
DO CALLUSER = CTBRECL ARG
...
WRITE