*copyc csc$max_character_position

TYPE
  cst$data_string = string ( * <= csc$max_character_position );
