FileIO description of all ErrorCodes very easily

Date: Tue May 16 09:09:16 MST 2000
From: m.Seiler <martinseiler@gmx.net>
Subject: FileIO description of all ErrorCodes very easily

With my Code you will get a field member containing all descriptions, all calls and all error codes inclusive a short description !!

You can write 'put interface(xtra"fileio") or can use this moviescript code:

  on showErrorCodes
  f = new(#field)
    gg =  interface(xtra"fileio")
    ins = new(xtra"fileio")
    repeat with i= -500 to 500
       b = ins.error(i)
       if b <> "Unknown error" then
         ii = string(i) & "  " * 3
         cc = cc &  i & "          " & b & Return
       end if
    end repeat
  gggg = gg & Return & cc
  member(f).text = gggg
  alert "member with fileio Info is: "¬
         & return & "in" & string(f)
end