Add(MainForm,12243380,175,133)
{
 Width=269
 Height=113
 Caption="Hiasm-Excel"
 Position=1
 link(onCreate,819712:doExecute,[])
}
Add(StrList,13732325,273,84)
{
 Strings=#56:23544122;Carbon disc ?44,7/38,3x5,8mm;10;PC;16,92;169,20|56:23544122;Carbon disc ?44,7/38,3x5,8mm;10;PC;16,92;169,20|54:23544122;Carbon disc ?44,7/38,3x5,8mm;2;PC;16,92;33,84|64:21200159;Top part UNIFL3/4 for steel bot.part;25;PC;30,09;752,25|57:24400111;Hose f. pump compl. UNIWASH;153;PC;10,58;1618,74|58:13225;Piston complete for valve UNIWASH3;4;PC;27,09;108,36|60:12200105;Vacuumgauge glycerine ?100mm 3/8";5;PC;40,57;202,85|54:21200141;Thread bush UNIFLOW3 steel;130;PC;1,93;250,90|45:25100146;O-ring ?16,1x1,6mm;175;PC;0,36;63,00|57:21200127;Holder rocking lever, UNIFLOW3;170;PC;0,26;44,20|50:21200131;Rocking lever UNIFLOW3;150;PC;0,89;133,50|65:25200132;Valve button inside UNIFLOW3 steel FA;225;PC;0,72;162,00|61:21200129;Bar closing device UNIFLOW3 steel;225;PC;1,09;245,25|55:25200124;Valve flap outside UNIFLOW3;225;PC;1,56;351,00|60:14400212;Solenoid valve sgl. invensys 230vac;5;PC;8,50;42,50|62:14400213;Solenoid valve dobb. invensys 230vac;5;PC;14,13;70,65|48:21200131;Rocking lever UNIFLOW3;20;PC;0,89;17,80|63:25200132;Valve button inside UNIFLOW3 steel FA;20;PC;0,72;14,40|43:25100146;O-ring ?16,1x1,6mm;20;PC;0,36;7,20|55:21200127;Holder rocking lever, UNIFLOW3;20;PC;0,26;5,20|58:21200130;Bar closing device UNIFLOW3 steel;20;PC;0,34;6,80|58:25200119;Guard bracket UNIFLOW3 steel SBS;20;PC;3,38;67,60|55:13474;Valve flap exterior UNIFLOW3 SBS;20;PC;1,56;31,20|59:26400104;Terminal wheel for lock guide str;20;PC;1,12;22,40|67:25215022;Rubber liner UNIFL. 15022-?22 UNIFLEX FA;96;PC;2,39;229,44|55:14800695;Hose guide f. SAC115 complete;10;PC;9,17;91,70|36:14306;Filter for IDC;20;PC;0,40;8,00|51:25515435;Rubber hose ?27/16 mm - FA;15;M;5,24;78,60|63:13930;Double-action Quickstart II rem. L=740mm;1;PC;98,66;98,66|54:13100201;Spray gun for udder washer;20;PC;17,77;355,40|0:|
}
Add(FormatStr,1666019,273,147)
{
 DataCount=3
 Mask="$Excel = New-Object -ComObject Excel.Application\r\n# $WorkBook = $Excel.Workbooks.add()\r\n$WorkBook = $Excel.Workbooks.Open('%2')\r\n# $Sheet = $WorkBook.worksheets.Item(1)\r\n$Sheet = $Excel.Sheets.Add()\r\n$Sheet.activate()\r\n$Sheet.Name = '%3'\r\n# $Sheet.Name = 'test'\r\n$Sheet.Range('B2').Select()\r\n$Tabl = '%1'\r\nSet-Clipboard -Value $Tabl\r\n$Sheet.Paste()\r\n$Range = $Sheet.UsedRange\r\n$Range.texttocolumns($Range,1,-4142,$true,$false,$true,$false,$false)\r\n$Range = $Sheet.UsedRange\r\n$Range.EntireColumn.AutoFit()\r\n$Sheet.Range('B2').Select()\r\n$Excel.visible = $true\r\n"
 link(onFString,9563171:doShellExec,[])
 link(Str1,13732325:Text,[])
 link(Str3,7763047:FormatTime,[(293,124)(328,124)])
}
Add(WinExec,9563171,329,140)
{
 FileName="powershell"
 Mode=0
 Action="runas"
 Point(doConsoleExec)
 Point(onConsoleError)
 Point(onConsoleResult)
 link(onExec,12243380:doClose,[(368,146)(368,188)(165,188)(165,160)])
}
Add(Time,7763047,322,84)
{
 Format="W-M-Y_h-m-s"
}
Add(ODialog,819712,224,147)
{
 link(onExecute,1666019:doString,[])
}