SELECT r.recname, r.fieldname, l.longname, l.shortname, decode(f.fieldtype, 0, 'Character', 1, 'Long Character', 2, 'Number', 3, 'Signed Number', 4, 'Date', 5, 'Time', 6, 'Date Time', 8, 'Image', 9, 'Image Reference', ' ') fieldtype, f.LENGTH, decode((SELECT 'Y'FROM pskeydefn kWHERE r.recname = k.recname AND r.fieldname = k.fieldname AND k.indexid = '_'), 'Y', 'Y', ' ')KEY, decode((SELECT ascdesc…