утечка памяти

		for(MSXML::IXMLDOMNodePtr pLine = pDocRoot->firstChild; pLine != NULL; pLine = pLine->nextSibling)
		{
			log_id = GetSingleInt("SELECT GEN_ID(L_LOG_GEN,1) FROM rdb$database;");
			mStatement.SetStatement((LPCTSTR)GetAttributes(pLine,log_id));
			mStatement.ExecuteImmediate();

	for(MSXML::IXMLDOMNodePtr pChild = pLine->firstChild; pChild != NULL; pChild = pChild->nextSibling)
	{
		list_id = GetSingleInt("SELECT GEN_ID(L_LIST_GEN,1) FROM rdb$database;");
		stmt.Format("INSERT INTO l_list(l_list_id,l_log_id,l_name,l_value) VALUES (%d ,%d , \'%s\', \'%s\');",
					list_id,log_id, GetNodeName(pChild),GetNodeText(pChild));
			
		mStatement.SetStatement((LPCTSTR)stmt);
		mStatement.ExecuteImmediate();	
	}
		}// end for

int CLogAnalyserDoc::GetSingleInt(CString statement)
{
	fbStatement st;
	st.SetDatabase(&mDatabase);
	st.SetTransaction(&mTransaction);
	st.SetStatement((LPCTSTR)statement);
	st.AllocXSQLDA(1);
	st.Allocate();
	st.Prepare();
	st.Describe();
	st.Execute();
	st.FetchRow();
	int ret = *(int*)st.GetValue(0);
	st.Free();

	return ret;
}

	isc_dsql_allocate_statement(mStatus.GetStatus(), pDatabase->GetDBHandlePtr(), &mHandle);
	if (mStatus.IsError())
		{throw fbException("Statement::Allocate", "isc_allocate_statement failed!");}

void fbStatement::Free(void)
{

	FreeXSQLVAR();
	
	// Free statement handle.
	isc_dsql_free_statement(mStatus.GetStatus(), &mHandle, DSQL_close);
	if (mStatus.IsError())
		{throw fbException("Statement::Free", "isc_dsql_free failed!");}
		
	FreeXSQLDA();
}