Contact Us Now

How to when files arrive, copy files from an other source directory

Q: I need some help on a Limagito rule I need to write :

• Check files into a source directory.
• When these files arrive, copy files from an other source directory with same filename but different extension.

ie :

Check files named 123456.pregen from c:\Test\Search\

Then copy file c:\Test\In\123456.pdf to c:\dest\

A: Please have a look at the following screenshots:

• We are using a Windows folder as source. The goal is to copy files from here to a destination. Which files will depend on the script we are going to add.

• File Filter Setup:
  • Add  %VSA  as include Filename Filter (%VSA = Variable String A)
  • The %VSA will contain the filenames we want to copy. Our Pascal script will add the filenames to this Var.

• Enable ‘Allow parameters in File Name filter’ (File Filter Setup – Advanced Tab):

• Open our Pascal Script option

• Add and enable the following ‘On Rule Begin’ Pascal Script:
  • Do not forget to adjust the CtSearchPath (ctSearchFilter and ctSearchSubFolders) Const

Var
  iList: Integer;
  tmpFilename: String;
  tmpList: TstringList;
Const
  ctSearchPath = 'C:\Test\Search\'; // Must end with a \
  ctSearchFilter = '*.pregen';
  ctSearchSubFolders = False; // False or True
Begin
  psExitCode:= 0;
  psVSA := '';
  // ... add your code here
  tmpList := psListFiles(ctSearchPath, ctSearchFilter, ctSearchSubFolders);
  Try
    For iList := 0 to (tmpList.Count-1) Do
    Begin
      tmpFilename := tmpList.Strings[iList];
      tmpFilename := ChangeFileExt(tmpFilename, '.pdf');
      psVSA := psVSA + tmpFilename + ';';    
    End;           
  Finally
    tmpList.Free;
  End;    
  // Debug
  psLogWrite(1, '', 'Filename filter as psVSA: ' + psVSA);
  // Set psExitCode
  If psVSA <> '' Then
    psExitCode := 1;
End.

• We used a Windows folder as Destination:

• Function is set to Copy in our example but also Move is possible

• If function is set to Copy and you only want to copy the same files once, then please enable our File Memory option:

• RunTime log result:

I forgot on line. If I want to delete my pregen file after copy/move, where can I add it on code ?

In this case some adjustments to the pascal script are needed:

• Add and enable the following: ‘On Rule Begin’ Pascal Script
  • Do not forget to adjust the CtSearchPath (ctSearchFilter and ctSearchSubFolders) Const

• Add and enable the following: ‘On Rule End’ Pascal Script
  • The pregen files will be deleted only if no errors occurred

If you need any help with this question, please let us know.

Best Regards,

Limagito Team

#managedfiletransfer #filetransfer #filemanagement