
  TYPE
    cst$application_name = string (* <= csc$max_name);

?? PUSH (LISTEXT := ON) ??
*copyc csc$max_name
?? POP ??
