Add(MainForm,15391640,224,147)
{
 Visible=1
 link(onCreate,2062696:doEvent1,[])
}
Add(StrList,5903685,315,105)
{
 Strings=#42:Артикул;Название;Кол-во;Ед.изм.;Цена;Сумма|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(StreamConvertor,16688297,364,161)
{
 Mode=7
 link(onResult,13611874:doCreate,[])
}
Add(TempFileStream,13611874,413,161)
{
 Extention=".txt"
 link(onCreate,15816150:doString,[])
}
Add(FormatStr,15816150,462,161)
{
 Mask="Dim objExcel, iCommandBar\r\n\r\nSet objExcel = CreateObject("Excel.Application")\r\nSet objWorkbook = objExcel.Workbooks.Open("%1")\r\nSet iCommandBar = objExcel.CommandBars\r\nWith objExcel\r\n	.Visible = False\r\n	.ScreenUpdating = False\r\n	.Workbooks(1).Windows(1).Caption = ""\r\n	.Caption = "Excel reduction"\r\n	.DisplayStatusBar = False \r\n	.DisplayFormulaBar = False\r\n	.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"", False)"\r\n	With .ActiveWindow\r\n		.DisplayHeadings = False\r\n		.DisplayGridlines = False\r\n		.DisplayHorizontalScrollBar = False \r\n		.DisplayVerticalScrollBar = False\r\n		.DisplayWorkbookTabs = False\r\n		.Height = 500 \r\n		.Width = 400 \r\n	End With\r\n	\r\n        For Each iCommandBar In .CommandBars\r\n            iCommandBar.Enabled = False\r\n        Next	\r\n	.ActiveSheet.UsedRange.EntireColumn.AutoFit\r\n	.ScreenUpdating = True\r\n	.Visible = True	\r\n	.Workbooks(1).Saved = True\r\nEnd With"
 link(onFString,4492862:##SetScript,[])
}
Add(VBJScript,4492862,511,161)
{
 WorkPoints=#11:##SetScript|
 Script=#0:|0:|
 UseName=0
}
Add(Replace,2999836,315,161)
{
 SubStr=";"
 DestStr="\t"
 link(onReplace,16688297:doConvert,[])
 link(Str,5903685:Text,[])
}
Add(Hub,2062696,273,161)
{
 link(onEvent1,2999836:doReplace,[])
 link(onEvent2,15391640:doClose,[(298,174)(298,188)(214,188)(214,174)])
}