Contact Us Now

Using day of the week folders

Q: I would like to sort my files based on the filename. The first 8 char contain the date that has to be used. The format is YYYYMMDD (Year = 4 char, Month = 2 char and Day 2 = char).

A: This is possible using our Pascal Script option. We’ve attached some screenshots to get you started.

• We used a Windows folder as Source:

• File Filter Setup:

• Open our Pascal Script option:

• Enable and add the following ‘On Destination’ script:
  • The script will strip the date part from the filename and will check the day of the week
    • Corresponding day of the week will go into the %VSA (Var String A) parameter which will be used in the Destination setup

Var
  tmpStr: String;
  tmpDate: TDateTime;
  tmpDays: array[1..7] of string;
Const
  ctDateFormat = 'YYYYMMDD';
  ctDateFormatLen = 8;
  ctDateSeparator = #0;
Begin
  tmpDays[1] := 'Monday';
  tmpDays[2] := 'Tuesday';
  tmpDays[3] := 'Wednesday';
  tmpDays[4] := 'Thursday';
  tmpDays[5] := 'Friday';
  tmpDays[6] := 'Saturday';
  tmpDays[7] := 'Sunday';
  // Default Result = Skip File
  psExitCode:= 0;
  psVSA := '';
  // ... add your code here
  tmpStr := Copy(psFileName, 1, ctDateFormatLen);
  If StrToIntDef(tmpStr, -1) <> -1 Then
  Begin
    Try
      tmpDate := psStrToDate(tmpStr, ctDateFormat, ctDateSeparator);
      psVSA := tmpDays[DayOfTheWeek(tmpDate)];
      // Successful Result
      psExitCode := 1;
      // Debug
      psLogWrite(1, '', psFileName + ' will go into subfolder: ' + psVSA);
    Except
      psLogWrite(1, '', psFileName + ' conversion exception of date part, file will be skipped');    
    End;
  End
  Else
  Begin
    psLogWrite(1, '', psFileName + ' does not start with a valid date, file will be skipped');
  End;
End.

• Destination Setup:

• Important, adjust the default ‘Create Subdir option’, add %VSA (%VSA contains the day of the week):

• RunTime Log Result:

If you need any help about this ‘day of the week folders’ option, please let us know.

Best Regards,

Limagito Team

#managedfiletransfer #filetransfer #filemanagement #limagito