Get PeopleSoft Record Structure via SQL

select rf.recname, 
rf.fieldname, 
L.LONGNAME AS Default_Label,
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, E.PTIA_UEREQUIRED isRequired, 
rf.deffieldname AS defaultValue,  
E.PTIA_UEEDITXLAT isXlat, 
E.PTIA_UEYESNO isYesNo, 
E.PTIA_UEEDITTABLE hasPromptTable, 
rf.edittable ,

  (SELECT LISTAGG(A.FIELDVALUE || ' (' || A.XLATLONGNAME || ')', ', ') WITHIN GROUP (ORDER BY A.FIELDVALUE)
   FROM PSXLATITEM A
   WHERE A.EFFDT =
    (SELECT MAX(A_ED.EFFDT) FROM PSXLATITEM A_ED
    WHERE A.FIELDNAME = A_ED.FIELDNAME
      AND A.FIELDVALUE = A_ED.FIELDVALUE
      AND A_ED.EFFDT <= SYSDATE)
      AND A.EFF_STATUS = 'A'
      AND A.FIELDNAME = rf.FIELDNAME) AS ListAgg_Column


from PSRECFIELDDB rf, PSDBFIELD f, PSPTIAURECFLDVW E, PSDBFLDLABL L
where rf.recname = '{{insert_record_name_here}}'
and f.fieldname = rf.fieldname
AND E.RECNAME= RF.RECNAME
AND E.FIELDNAME = RF.FIELDNAME
AND l.fieldname = RF.FIELDNAME
AND L.FIELDNAME = E.FIELDNAME
AND l.default_label = 1

ORDER BY RF.FIELDNUM
;