exec ssss @ttt  = ?lnPerc
            , @ppp =  ?lnTTTT
            , @ffff = ?lnRRRR

	private pnResult
	pnResult =  0 
	text to lcSelectCmd textmerge noshow pretext  7 
	     {?@pnResult = CALL dbo.mmmmm( 4555 , 5555 )}
	endtext
	if SQLEXEC (......,lcSelectCmd)< 0  
	     return - 1 
	endif
             ? pnResult

local lcConnString, lnConnection, ;
	  laErrors[ 1 ]
text to lcConnString noshow pretext  15 
	Driver=SQL Server;
	SERVER=.\SQLSERVER2005;
	DATABASE=Test;
	uid=sa;
	pwd=as;
endtext	
lnConnection = sqlstringconnect(lcConnString)
if lnConnection<= 0 
   messagebox('не подцепился')
   return 
endif


? test(  10  ,lnConnection) 
? test(  20  ,lnConnection) 
? test(  30  ,lnConnection) 


Return

*************
Function test
*************
lParameters tnValue, tnConnection
local lnResult
lnResult =  0 
text to lcSelectCmd textmerge noshow pretext  7 
     {?@lnResult = CALL dbo.test(?tnValue)}
endtext
if SQLEXEC (tnConnection,lcSelectCmd)< 0  
     return - 1 
endif
Return lnResult

SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[test]') and OBJECTPROPERTY(id, N'IsProcedure') =  1 )
drop procedure [dbo].[test]
GO


CREATE PROCEDURE dbo.test
	-- Add the parameters for the stored procedure here
	@Param1 int =  0 
AS
BEGIN

	SET NOCOUNT ON
	Declare @nResult int 
	
	set @nResult = @Param1 *  10 

	return @nResult

END
GO