
  TYPE
    pft$catalog_description = record
      name: pft$name,
      charge_id: pft$charge_id,
    recend;

*copyc pft$charge_id
*copyc pft$name
