Merge pull request #5787 from jakesmith/hpcc-11321

HPCC-11321 - external file write/read test to regression suite

Reviewed-By: Richard Chapman <rchapman@hpccsystems.com>

testing/regress/ecl/external.ecl

@@ -0,0 +1,27 @@
+//noroxie
+
+import Std.File;
+
+rec := RECORD
+ string f;
+END;
+ds := DATASET([{'a'}], rec);
+
+string localDir := 'var::lib::^h^p^c^c^systems::mydropzone' : stored('localdir');
+
+string getFName(string ext) := FUNCTION
+ RETURN '~file::localhost::' + localDir + '::external' + ext;
+END;
+
+external1 := getFName('1');
+external2 := getFName('2');
+
+SEQUENTIAL(
+File.DeleteLogicalFile(external1, true),
+File.DeleteLogicalFile(external2, true),
+OUTPUT(ds,,external1),
+OUTPUT(DATASET(external1, rec, FLAT), , external2),
+OUTPUT(DATASET(external2, rec, FLAT), , external1, OVERWRITE),
+File.DeleteLogicalFile(external1), // NB: will fail if doesn't exist
+File.DeleteLogicalFile(external2) // NB: will fail if doesn't exist
+);

testing/regress/ecl/key/external.xml

@@ -0,0 +1,10 @@
+<Info><Source>fileservices</Source><Message>DeleteLogicalFile (&apos;file::localhost::var::lib::^h^p^c^c^systems::mydropzone::external1&apos;) done</Message></Info>
+<Info><Source>fileservices</Source><Message>DeleteLogicalFile (&apos;file::localhost::var::lib::^h^p^c^c^systems::mydropzone::external2&apos;) done</Message></Info>
+<Info><Source>fileservices</Source><Message>DeleteLogicalFile (&apos;file::localhost::var::lib::^h^p^c^c^systems::mydropzone::external1&apos;) done</Message></Info>
+<Info><Source>fileservices</Source><Message>DeleteLogicalFile (&apos;file::localhost::var::lib::^h^p^c^c^systems::mydropzone::external2&apos;) done</Message></Info>
+<Dataset name='Result 1'>
+</Dataset>
+<Dataset name='Result 2'>
+</Dataset>
+<Dataset name='Result 3'>
+</Dataset>