embedjava.ecl 1.1 KB

1234567891011121314151617181920212223242526
  1. IMPORT java;
  2. integer add1(integer val) := IMPORT(java, 'JavaCat.add1:(I)I');
  3. string add2(string val) := IMPORT(java, 'JavaCat.add2:(Ljava/lang/String;)Ljava/lang/String;');
  4. string add3(varstring val) := IMPORT(java, 'JavaCat.add2:(Ljava/lang/String;)Ljava/lang/String;');
  5. add1(10);
  6. add2('Hello');
  7. add3('World');
  8. s1 :=DATASET(250000, TRANSFORM({ integer a }, SELF.a := add1(COUNTER)));
  9. s2 :=DATASET(250000, TRANSFORM({ integer a }, SELF.a := add1(COUNTER/2)));
  10. SUM(NOFOLD(s1 + s2), a);
  11. s1a :=DATASET(250000, TRANSFORM({ integer a }, SELF.a := (integer) add2((STRING)COUNTER)));
  12. s2a :=DATASET(250000, TRANSFORM({ integer a }, SELF.a := (integer) add3((STRING)(COUNTER/2))));
  13. SUM(NOFOLD(s1a + s2a), a);
  14. s1b :=DATASET(250000, TRANSFORM({ integer a }, SELF.a := COUNTER+1));
  15. s2b :=DATASET(250000, TRANSFORM({ integer a }, SELF.a := (COUNTER/2)+1));
  16. SUM(NOFOLD(s1b + s2b), a);
  17. s1c :=DATASET(250000, TRANSFORM({ integer a }, SELF.a := (integer) ((STRING) COUNTER + '1')));
  18. s2c :=DATASET(250000, TRANSFORM({ integer a }, SELF.a := (integer) ((STRING)(COUNTER/2) + '1')));
  19. SUM(NOFOLD(s1c + s2c), a);