
  TYPE
    cst$field_attributes = array [1 .. *] of cst$field_attribute;


?? PUSH (LISTEXT := ON) ??
*copyc cst$field_attribute_keys
*copyc cst$field_attribute
?? POP ??
