Soapcall4.ecl 869 B

1234567891011121314151617181920212223242526272829
  1. //
  2. // Example code - use without restriction.
  3. //
  4. RoxieIP := 'http://127.0.0.1:8002/WsEcl/soap/query/roxie/soapcall3.1'; //Roxie
  5. svc := 'soapcall3.1';
  6. InRec := RECORD
  7. STRING UIDstr{XPATH('UIDstr')};
  8. STRING LeftInStr{XPATH('LeftInStr')};
  9. STRING RightInStr{XPATH('RightInStr')};
  10. END;
  11. InDS := DATASET([
  12. {'1','the quick brown fox jumped over the lazy red dog','quick fox red dog'},
  13. {'2','the quick brown fox jumped over the lazy red dog','quick fox black dog'},
  14. {'3','george of the jungle lives here','fox black dog'},
  15. {'4','fred and wilma flintstone','fred flintstone'},
  16. {'5','yomama comeonah','brake chill'}
  17. ],InRec);
  18. RS := SOAPCALL(InDS,
  19. RoxieIP,
  20. svc,
  21. InRec,
  22. TRANSFORM(LEFT),
  23. DATASET({STRING UIDval{XPATH('uid')},
  24. BOOLEAN CompareResult{XPATH('res')}}));
  25. OUTPUT(RS);