Q: Moving a file based on specific filename part to specific folder
Hi there, looking if your software can do this please.
1) Look at a filename, parse out from character 8-16 and capture it as a ID number
2) look at the subfolders, find folder with same name, if doesn’t exist, create.
3) move the file to that location.
Here is some more specific example
PDF Name: 055400E900105028-DEN-20210412_12.pdf
Folder name to search for, and if not exists, create and move the data.
The bolded number is the ID number we need to catch/reference.
I think it could just skip the file in this ‘rule’ if the length of the file is not ok which would mean it doesn’t contain an ID number.
For this 1 rule/purpose these files come from a third party provider which should be pretty consistent and contain that number.
The problem is some folders contain only the ID and is missing the buffer 0’s we put in front.
So pdf may say 000000465 but the folder that already exists may be called 465 ☹
Hopefully your tool can assist in more than one way (which it looks like it can!)
A: Yes this should be possible. We prepared some screenshots to get you started.
1.You can use any Source but in this example we used a WIN folder:
2. File Filter Setup
The minimum file length we need is 20 (this includes the file extension). We are using the RegEx Include File Filter:
3.Now we need some Pascal Script to achieve the customer request:
Be sure to set the ctOutputPath Constant to the Destination path you are using. In our example the Destination path will be ‘C:\Test\Out_Pdf\’.
When the File ID starts with 0 then we’ll check if the ID as subfolder exists without the zeros. If it exists we’ll use that one but when not, then the complete ID will be used to create a new destination subfolder.
Var tmpDummyPath: String; tmpSubPath: String; Const ctOutputPath = 'C:\Test\Out_Pdf\'; Begin psExitCode := 0; tmpSubPath := Copy(psFilename, 8, 9); psLogWrite(1, '', 'Stripped ' + tmpSubPath + ' from ' + psFilename); // IF Copy(tmpSubPath, 1, 1) = '0' Then Begin If Not DirectoryExists(ctOutputPath + tmpSubPath) Then Begin tmpDummyPath := tmpSubPath; Repeat tmpDummyPath := Copy(tmpDummyPath, 2, length(tmpDummyPath) - 1); If DirectoryExists(ctOutputPath + tmpDummyPath) Then Begin tmpSubPath := tmpDummyPath; Break; End; Until Copy(tmpDummyPath, 1, 1) <> '0'; End; End; // The End psVSA := tmpSubPath; // Check If psVSA <> '' Then psExitCode := 1; End.
4. WIN as Destination setup. Important because for this request we need a WIN as Destination.
Important, be sure the ctOutputPath Constant in the previous Pascal Script is the same as this path.
Please enable and set the Create SubDir option to: %VSA
The file RegEx filter will ignore a file when its length < 20. In this case file ‘055400E9001050.pdf’ will not be used.
- Subfolder 105208 was already available and was used because of the ‘zero’ prefix in the ID number.
- Subfolder 900105028 was created by our File Mover.
File ‘055400E000105028-DEN-20210412_12 – Copy.pdf’ was copied to ‘C:\Test\Out_Pdf\105028\’ because this already existed. The Pascal Script removed the zeros from the ID number and checked if it already was available.
File ‘055400E900105028-DEN-20210412_12.pdf’ was copied to ‘C:\Test\Out_Pdf\900105028\’. The ID number has no ‘zero’ prefix so the complete ID number was used to create the subfolder.