RunText.ecl 382 B

1234567891011121314151617181920212223
  1. //
  2. // Example code - use without restriction.
  3. //
  4. IMPORT $;
  5. MyRec := RECORD
  6. STRING1 value1;
  7. STRING1 value2;
  8. END;
  9. D := DATASET([{'A','B'},
  10. {'B','C'},
  11. {'A','D'},
  12. {'B','B'},
  13. {'A','C'},
  14. {'B','D'},
  15. {'A','B'},
  16. {'C','C'},
  17. {'C','D'},
  18. {'A','A'}],MyRec);
  19. $.DeclareData.MAC_CountFieldValues(D,Value1)
  20. $.DeclareData.MAC_CountFieldValues(D,Value2)