1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
| Quintiq file version 2.0
| #parent: #root
| StaticMethod UploadFiles (
| Strings filenames,
| String source,
| String destination
| )
| {
| TextBody:
| [*
| // danielshue Nov-28-2016 (created)
| // Upload files to server
|
| traverse( filenames, Elements, filename )
| {
| feedback := '';
| sourcepath := source +'/'+ filename;
| destinationpath := destination +'/'+ filename;
| MacroPlan::CopyFile( sourcepath, destinationpath, feedback );
|
| if( feedback <> '' )
| {
| info( feedback );
| }
| }
| *]
| }
|
|