hongji.li
2023-11-03 aefafd2142478d4fb07d6b8b45c3047e247389e0
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
Quintiq file version 2.0
#parent: #root
Method ImportFiles (
  String importpath,
  output structured[BinaryValue] binaryvalues,
  output structured[String] brokers,
  output structured[BinaryValue] smbinaryvalues,
  structured[String] smbrokers,
  structured[String] fileNames,
  structured[String] smFileNames,
  structured[String] missingFiles
) id:Method_DialogEDIImport_ImportFiles
{
  #keys: '[127238.0.2017718758]'
  Body:
  [*
    // Upload send data to server
    importpath := importpath;
    
    is3DDrive := RadioButtonGroupExcelOrDataManager.BoundValue()= MPSyncUtility::ID_Source_3DDrive();
    
    traverse( Dialog.Data().WrappedInstance(), ImportObjectGroupInDefaultProfile, e,
              e.IsIncludeInImportExport() )
    {  
      filenames := e.ImportObjectGroup().GetMPFileNames();
      traverse( filenames, Elements, filename )
      {
        filepath := importpath + filename;
        fileExists := ifexpr( is3DDrive, 
                              exists( DataHolderFileItems.Data(), Elements, fileItem, fileItem.Name() = filename ),
                              Application.ClientFileExists( filepath ) );
                              
        if( fileExists )
        {   
          bindata := ifexpr( is3DDrive, BinaryData::Construct(), Application.ReadBinaryFile( filepath ) );
          brokername := Dialog.GetBrokerName( filename );
          calendarfilename := LibCal_ImportExport::DEFAULT_EXPORT_FILENAME();
          condition := "^MP_|" + calendarfilename;
           
          if( filename.Regex( condition) )
          {
            binaryvalues.Add( bindata.AsBinaryValue() );
            
            if ( brokername.Length() >0 )
            {
              brokers.Add( brokername );
              fileNames.Add( filename );          
            }
          }
          else
          {
            smbinaryvalues.Add( bindata.AsBinaryValue() )    
            
            if ( brokername.Length() >0 )
            {
              smbrokers.Add( brokername );
              smFileNames.Add( filename );
            }
          }
        }
        else
        {
          missingFiles.Add( filename )
        }
      }
    }
  *]
}