void CProcSet::DoFieldExchange(CFieldExchange* pFX)
{
	//{{AFX_FIELD_MAP(CAssetProcSet)
	pFX->SetFieldType(CFieldExchange::outputColumn);
	RFX_Text(pFX, _T( "S_OUT" ), m_strOut);
	pFX->SetFieldType(CFieldExchange::inoutParam);
	RFX_Text(pFX, _T( "S_IN_OUT" ), m_strInOutParam);
	pFX->SetFieldType(CFieldExchange::param);
	RFX_Text(pFX, _T( "S_IN" ), m_strInParam);
	//}}AFX_FIELD_MAP
}

CREATE PROCEDURE PREPARE_PERSONS_ADD_SP 
	@S_IN_OUT varchar( 3000 ) OUTPUT,
	@S_OPTION varchar( 255 ) = NULL
AS
 -- Declare var for control error arising
 
DECLARE @error int, @cur_error int
 -- Zeroize it
 
SET @error =  0 
SET @cur_error =  0 

 -- Start Transaction
 
BEGIN TRANSACTION
 /*
some code
*/ 
SELECT @S_IN_OUT = 'ID_PERSON = ' + CONVERT(varchar( 36 ), NEWID())
RUNOUT:
IF @error =  0 
BEGIN
	 -- Success. Commit the transaction.
 
	COMMIT TRANSACTION
	PRINT '{PREPARE_PERSONS_ADD_SP} - OK'
	SELECT '' AS S_OUT 
END
ELSE
BEGIN
	 -- An error occurred. Roll back the transaction.
 
	ROLLBACK TRANSACTION
	PRINT '{PREPARE_PERSONS_ADD_SP} - FAILURE'
	PRINT '   @S_IN_OUT = ' + @S_IN_OUT
	SELECT '###ERROR###' AS S_OUT
END
RETURN @error
GO

CProcSet* pProc = new CProcSet(m_pDatabase);
pProc->m_strProcName = _T( "PREPARE_PERSONS_ADD_SP" );
pProc->m_strInOutParam = _T( "{79BA974B-0DE6-4C4C-8B9E-3FC0232EB5CD}" );
pProc->Open();
AfxMessageBox(pProc->m_strInOutParam); // вот тут жопа
pProc->Close();
delete pProc;