alter proc UP_DiagramExp
@company nvarchar( 50 ),
@year int=null,
@mon int=null,
@TypeExp int=null,
@StruktSubdiv nvarchar( 50 )=null,
@maxGhor bigint =null output,
@minGhor bigint =null output,
@maxVert bigint =null output
as
set nocount on
if isnull(@year, 0 )<> 0  --график затрат компании за год
	begin
		select * into #TempExp from
			--------таблица1--------------
			union
			--------Таблица2-------------
						
	end
select * from #TempExp
set @maxGhor=(select max(mon) as mon from #TempExp)
set @minGhor=(select min(mon) as mon from #TempExp)

Dim StorPar( 1 ) As SqlParameter
        StorPar = SqlHelperParameterCache.GetSpParameterSet(строка подключения, "UP_DiagramExp")
        StorPar( 0 ).Value = "бла-бла"
        StorPar( 0 ).Direction = ParameterDirection.Input 'компания
        StorPar(1).Direction = ParameterDirection.Input 'год
        StorPar( 2 ).Direction = ParameterDirection.Input 'месяц
        StorPar(3).Direction = ParameterDirection.Input 'тип затрат
        StorPar( 4 ).Direction = ParameterDirection.Input 'Структурное подразделение
        StorPar(5).Direction = ParameterDirection.Output ' Максимальное значение по Х
        StorPar( 6 ).Direction = ParameterDirection.Output 'Минимальное значение по Х
        StorPar(7).Direction = ParameterDirection.Output 'Максимальное значение по Y

        Dim dr As SqlDataReader = SqlHelper.ExecuteReader(строка подключения, CommandType.StoredProcedure, "UP_DiagramExp" _
        , StorPar)

...
as
set nocount on

create table #TempExp (....)

...

Dim dr As SqlDataReader = SqlHelper.ExecuteReader(строка подключения, CommandType.StoredProcedure, "UP_DiagramExp" _
        , StorPar)

Dim dr As DataSet = SqlHelper.ExecuteDataset(строка подключения, CommandType.StoredProcedure, "UP_DiagramExp" _
        , StorPar)