ProcessAutomation3.ecl 691 B

1234567891011121314151617181920212223242526272829
  1. //
  2. // Example code - use without restriction.
  3. //
  4. IMPORT Std;
  5. rec := RECORD
  6. STRING3 code;
  7. STRING desc;
  8. STRING zone;
  9. END;
  10. srcnode := '10.173.9.4';
  11. srcdir := '/c$/training/import/DFUtest/';
  12. dir := Std.File.RemoteDirectory(srcnode,srcdir,'BIG*0?.csv',true);
  13. NOTHOR(
  14. SEQUENTIAL(
  15. Std.File.DeleteSuperFile('MultiSuper1'),
  16. Std.File.CreateSuperFile('MultiSuper1'),
  17. Std.File.StartSuperFileTransaction(),
  18. APPLY(dir,Std.File.AddSuperFile('MultiSuper1',Std.File.ExternalLogicalFileName(srcnode,srcdir+name))),
  19. Std.File.FinishSuperFileTransaction()));
  20. F1 := DATASET('MultiSuper1', rec, csv);
  21. OUTPUT(F1,,'~RTTEST::testmulti1',overwrite);
  22. // OUTPUT(F1);