hlcConnStr = "DRIVER={SQL Server};SERVER="+SQLServerIP+";uid="+SQLLogin+";pwd="+SQLPassword+";NETWORK=dbmssocn;LANGUAGE=Russian;"+";ADDRESS="+SQLServerIP;
           
	cnn= СоздатьОбъект("ADODB.Connection");	
	cnn.ConnectionString = hlcConnStr;  
	Попытка
		cnn.Open();      
	Исключение		                                               		
		Предупреждение("Немає зв'язку з сервером " + НазваСервера+"!");
		Возврат;
	КонецПопытки;
   
	rst = СоздатьОбъект("ADODB.Recordset");

	Попытка 		
		rst = cnn.Execute("exec [тут пишем процедуру с параметрами]");
	Исключение	
		cnn.Close();
		Предупреждение(ОписаниеОшибки());
		Возврат;
	КонецПопытки;
	
	Пока rst.EOF <> - 1  Цикл 	
	 	ТаблШапки.НоваяСтрока();                                               
	 	ТаблШапки.coden = rst.Fields("coden").Value;   
		ТаблШапки.daten = rst.Fields("daten").Value;   
		ТаблШапки.namep = rst.Fields("namep").Value;   
		ТаблШапки.suma = rst.Fields("suma").Value;		
	 	rst.MoveNext();
	КонецЦикла;
    
	rst = rst.NextRecordset;                            
	
	Пока rst.EOF <> - 1  Цикл	 	
	 	ТаблНакл.НоваяСтрока();                                               
	 	ТаблНакл.codetovar = rst.Fields("codetovar").Value;   
	 	ТаблНакл.nametovar = rst.Fields("nametovar").Value;   
	 	ТаблНакл.kol = rst.Fields("kol").Value;   
	 	ТаблНакл.cena = rst.Fields("cena").Value;   	 	
	 	rst.MoveNext();
	КонецЦикла;
	
	rst.Close(); 
	cnn.Close();