Procedure Sayerr(code:integer);external;

{*USER*
 Pascal-3 procedure to access system error message file 
(QIOSYM.MSG), and print error message. Call with IOSB value
for QIO errors, or with ($DSW-128) for directive errors. 
Message goes to OUTPUT

}

{*WIZARD*
 This procedure is a build-in in the Pascal library - so no
source for it exists. 
}