
{ This common deck contains types for psr statistics }

CONST
  qcc$max_psr_entries = 255,
  qcc$null_psr = '       ',
  qcc$null_feature = '                               ';


TYPE
  qct$psr_statistics_entry = record
    psr_ident: qct$psr_ident,
    feature_ident: qct$feature_ident,
  recend,

 qct$psr_ident = string(7),
 qct$feature_ident = string(31),

 qct$psr_statistics = record
  item_count: qct$item_count,
  psr_entries: array [1 .. 255] of qct$psr_statistics_entry,
  recend,

 qct$item_count = integer;
