System.Activities
System.Activities.Statements
System.Activities.Expressions
System.Activities.Validation
System.Activities.XamlIntegration
Microsoft.VisualBasic
Microsoft.VisualBasic.Activities
System
System.Collections
System.Collections.Generic
System.Data
System.Diagnostics
System.Drawing
System.IO
System.Linq
System.Net.Mail
System.Xml
System.Xml.Linq
UiPath.Core
UiPath.Core.Activities
System.Windows.Markup
UiPath.Excel
System.Collections.ObjectModel
UiPath.Excel.Activities
System.Activities.DynamicUpdate
System.ComponentModel
System.Runtime.Serialization
System.Xml.Serialization
System.Text.RegularExpressions
System.Reflection
System.Runtime.InteropServices
System.Activities
Microsoft.VisualBasic
mscorlib
System.Data
System.Data.DataSetExtensions
System
System.Drawing
System.Core
System.Xml
System.Xml.Linq
PresentationFramework
WindowsBase
PresentationCore
System.Xaml
UiPath.System.Activities
UiPath.UiAutomation.Activities
UiPath.Excel.Activities.Design
UiPath.Excel.Activities
UiPath.Excel
System.Runtime.Serialization
System.ValueTuple
System.ServiceModel
UiPath.Mail
UiPath.OCR.Activities.Design
UiPath.UIAutomationCore
Microsoft.Bcl.AsyncInterfaces
System.Memory
True
True
[dtTemp]
[(From d1 In dt1.AsEnumerable
Join d2 In dt2.AsEnumerable
On d1("Week Date").toString.Trim.Substring(0,10) Equals d2("Week Date").toString.Trim.Substring(0,10)
Let ra = d2.ItemArray.Concat(d1.ItemArray.Skip(1)).ToArray
Select dtTemp.Rows.Add(ra)).CopyToDataTable]
True
[arrOrderedWK]
[(From d In dtTemp.AsEnumerable
Let w = CInt(Regex.Match(d("Week Format").toString,"\d+").toString)
Order By w
Select d("Week Format").toString.Trim).Distinct().toArray]
True
[dtResult]
[(From d In dtTemp.AsEnumerable
Group d By k=d("Part Number").toString.Trim Into grp=Group
Let dv = grp.ToDictionary(Function (g) g("Week Format").toString, Function (g) g("Qty").toString)
Let ra1 = arrOrderedWK.Select(Function (w) If( dv.ContainsKey(w), dv(w),"" )).toArray
Let ra = ra1.prepend(k).toArray
Select r= dtResult.Rows.Add(ra)).CopyToDataTable]