USE table CHD_RA |
---|
k = max_line_number |
DO while k ≥ 1 |
GO top |
   FOR DescriptorName_Pair(1)//The 1st pairs in CHD_RA |
      COUNT its Frequency |
   EndFor |
   OUTPUT DescriptorName Pairs, Frequency INTO table |
         CHD_RA_Frqncy |
   DELETE all DescriptorName_Pair(1) from table |
         CHD_RA |
   k = max_line_number |
ENDDO |