Read Sequence for File Retrieval from Folder

KyleaKylea Member Posts: 39
Hi All,

Can anyone tell me if there is a way to alter the read sequence of files written to a folder.

eg.

CRMDealer20081201130303.csv
CRMAdvisor20081201130305.csv
CRMAdvisor20081201130307.csv

If I have the data above despite the fact that the arrival sequence is as per above the second record is always read first.
Is there a way to make the file read by file create date?

Kylea

Comments

  • garakgarak Member Posts: 3,263
    So i'm sure u use the systemtable File for this. Tehr is also a field Date.
    So, you filter your Path and get all the files from this path.
    Now you loop through the recs and stores this rec into a tempTable (create here your own)

    like this:
    FileRec.setrange(Path,'C:\');
    FileRec.setrange("Is a file",true);
    FileRec.setrange(Date,SomeDate); //if needed
    if FileRec.find('-') then begin
      i := 1;
      repeat
        MyTempTable.init;
        MyTempTable.Date := FileRec.DAte; //PK Field 1
        MyTempTable.FileName := FileRec.name; //PK Field 2 or you use here a counter
        //The solution with a counter if Filename shouldn't be a PK field
        MyTempTable.Counter := i; //PK Field 2 if Fielname is not a PK field
        MyTempTable.OtherFields := FileRec.SomeFieldThatYouAlsoNeed;
        MyTempTable.insert;
        i := i + 1;
      until FileRec.next = 0;
    end;
    
    MyTempTable.reset;
    if MyTempTable.find('-') then begin
      repeat
         //Here do something
      until MyTempTable.next = 0;
    end;
    

    Regards
    Do you make it right, it works too!
Sign In or Register to comment.