#include "StdAfx.h"
#include "aecPipeSupport.h"
#include "DZSTDlg.h"
#include "DZTTDlg.h"
#include "FlangeDlg.h"
#include "EarThwormDef.h"
#include "KTModelLayoutXData.h"
#include "coretools.h"

TDbPipeSupport::TDbPipeSupport(void)
{
}

TDbPipeSupport::~TDbPipeSupport(void)
{
}

double TDbPipeSupport::MakeSureMMUnit(double& dDn)
{
	return CoreTools::MakeSureMMUnit(dDn);
}

BOOL TDbPipeSupport::XData2PipeParam(WPipe::PipeParam* pParamL,const AecDbObjXDataMap* pXDataMapSrc)
{
	double dDn = pParamL->m_dDN;

	//D
	double dVal = 100.0;
	pXDataMapSrc->GetAt(PIPE_D,dVal);
	pParamL->m_dD = dVal;

	//eD
	int nDir = 0;
	pXDataMapSrc->GetAt(PIPE_DRAWDIR,nDir);
	pParamL->m_eD = (WPipe::EDia)(nDir);

	//DN
	dVal = 100.0;
	pXDataMapSrc->GetAt(PIPE_DN,dVal);
	pParamL->m_dDN = dVal;

	//OD
	dVal = 100.0;
	pXDataMapSrc->GetAt(PIPE_OD,dVal);
	pParamL->m_dOD = dVal;

	//Thick
	dVal = 100.0;
	pXDataMapSrc->GetAt(PIPE_THICK,dVal);
	pParamL->m_dThick = dVal;

	//补充风管壁厚
	dVal = 0.0;
	if ( pXDataMapSrc->GetAt(DUCT_THICK, dVal) )
		pParamL->m_dThick = dVal;

	if (pParamL->m_eD == WPipe::eDN)
		pParamL->m_dD = pParamL->m_dDN;
	else if (pParamL->m_eD == WPipe::eOD)
		pParamL->m_dD = pParamL->m_dOD;
	else if (pParamL->m_eD == WPipe::eID)
		pParamL->m_dD = pParamL->m_dOD - 2.0 * pParamL->m_dThick;

	//EL

	//Ratio
	dVal = 1.5;
	pXDataMapSrc->GetAt(PIPE_RATIO,dVal);
	pParamL->m_dRRatio = dVal;

	pXDataMapSrc->GetAt(KEY_RadRatio, pParamL->m_nRadioOn);
	if (!pXDataMapSrc->GetAt(PIPE_ODSN, pParamL->szODSn))
	{
		//兼容旧版本
		pXDataMapSrc->GetAt(PIPE_OD_SN, pParamL->szODSn);
		pParamL->szODSn[16] = _T('\0');
	}
	pXDataMapSrc->GetAt(PIPE_SHTNO, pParamL->szShtNo);
	pXDataMapSrc->GetAt(PIPE_GASKET, pParamL->m_szGastInf);
	//dW
	dVal = 0.0;
	pXDataMapSrc->GetAt(DUCT_W, dVal);
	pParamL->m_dW = dVal;

	//dH
	dVal = 0.0;
	pXDataMapSrc->GetAt(DUCT_H, dVal);
	pParamL->m_dH = dVal;

	//app
	nDir = 0;
	pXDataMapSrc->GetAt(PIPE_EAPP, nDir);
	pParamL->m_app = (WPipe::EApp)nDir;

	//nConnectType
	nDir = 0;
	pXDataMapSrc->GetAt(PIPE_CONNECT,nDir);
	pParamL->m_nConnectType = nDir;

	//dInterfaceL
	dVal = 0.0;
	pXDataMapSrc->GetAt(PIPE_INTERFACEL,dVal);
	pParamL->m_dInterfaceL = dVal;

	//dInterfaceD
	dVal = 0.0;
	pXDataMapSrc->GetAt(PIPE_INTERFACED,dVal);
	pParamL->m_dInterfaceD = dVal;

	//dInterfaceD2
	dVal = 0.0;
	pXDataMapSrc->GetAt(PIPE_INTERFACED2,dVal);
	pParamL->m_dInterfaceD2 = dVal;

	//dInterfaceL2
	dVal = 0.0;
	pXDataMapSrc->GetAt(PIPE_INTERFACEL2,dVal);
	pParamL->m_dInterfaceL2 = dVal;

	//dInsThk
	dVal = 1.0;
	pXDataMapSrc->GetAt(PIPE_INSTHICK,dVal);
	pParamL->m_dInsThk = dVal;

	//dInterfaceL3
	dVal = 0.0;
	pXDataMapSrc->GetAt(PIPE_INTERFACEL3,dVal);
	pParamL->m_dInterfaceL3 = dVal;

	//m_eRed
	//m_vtECCen
	//m_vtDir
	//m_eElBase

	//szPipeno
	CString sVal;
	pXDataMapSrc->GetAt(PIPE_NO,sVal);
	_tcscpy(pParamL->szPipeno,sVal);

	//szMertial
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_MATERIAL,sVal);
	_tcscpy(pParamL->szMertial,sVal);

	//szMertialFit
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_MATERIALFT,sVal);
	_tcscpy(pParamL->szMertialFit,sVal);

	//szZoneNo
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_ZONE,sVal);
	_tcscpy(pParamL->szZoneNo,sVal);

	//szInsMtr
	sVal = _T("");
	pXDataMapSrc->GetAt(DOC_INSMATER,sVal);
	_tcscpy(pParamL->szInsMtr,sVal);

	//szDescr
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_DESCR,sVal);
	_tcscpy(pParamL->szDescr,sVal);

	//szSys
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_SYS,sVal);
	_tcscpy(pParamL->szSys,sVal);

	//m_nGroupID
	//?

	//LEVEL
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_LEVEL,sVal);
	_tcscpy(pParamL->szLevel,sVal);

	dVal = 1.0;
	pXDataMapSrc->GetAt(PID_PIPE_DPRESS,dVal);
	pParamL->m_dPress = dVal;

	//szZone
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_ZONE,sVal);
	_tcscpy(pParamL->szZone,sVal);

	//szMedia
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_MEDIA,sVal);
	_tcscpy(pParamL->szMedia,sVal);

	//szNo
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_NO,sVal);
	_tcscpy(pParamL->szNo,sVal);

	//Spec
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_SPEC,sVal);
	_tcscpy(pParamL->szSpec,sVal);

	//LineNo
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_LINENO,sVal);
	_tcscpy(pParamL->szLineNo,sVal);

	//szInsTag
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_INSTAG,sVal);
	_tcscpy(pParamL->szInsTag,sVal);

	//szInsDim
	sVal = _T("");
	pXDataMapSrc->GetAt(DOC_INSDIM,sVal);
	_tcscpy(pParamL->szInsDim,sVal);

	//szInsMateral
	sVal = _T("");
	pXDataMapSrc->GetAt(DOC_INSMATER,sVal);
	_tcscpy(pParamL->szInsMateral,sVal);

	//szInsSpec
	sVal = _T("");
	pXDataMapSrc->GetAt(DOC_INSSPEC,sVal);
	_tcscpy(pParamL->szInsSpec,sVal);

	//DOC_TRAMTOINF
	sVal = _T("");
	pXDataMapSrc->GetAt(DOC_TRAMTOINF,sVal);
	_tcscpy(pParamL->szTraMtoInfo,sVal);

	//szTraDescr
	sVal = _T("");
	pXDataMapSrc->GetAt(DOC_TRADESCR,sVal);
	_tcscpy(pParamL->szTraDescr,sVal);

	//szFitType
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_FITTYPE,sVal);
	_tcscpy(pParamL->szFitType,sVal);

	//szMtoInfo
	sVal = _T("");
	pXDataMapSrc->GetAt(PIPE_MTOALL,sVal);
	_tcscpy(pParamL->szMtoInfo,sVal);

	//以下是全局设置信息,Param中没有对应
	nDir = 0;
	pXDataMapSrc->GetAt(KEY_2DSTYLE,nDir);
	//??

	nDir = 0;
	pXDataMapSrc->GetAt(PIPE_COLOR,nDir);
	pParamL->m_nPipeColor = nDir;

	nDir = 0;
	pXDataMapSrc->GetAt(KEY_SINGLE,nDir);
	//??

	double dTDn = 100.0;
	pXDataMapSrc->GetAt(PIPE_TDN, dTDn);
	//??

	double dTOd = 100.0;
	pXDataMapSrc->GetAt(PIPE_TOD, dTOd);
	//??

	//根据变径取舍
	if (dDn > 1.0 && fabs(dDn - dTDn) < 1.e-1)
	{
		pParamL->m_dDN = dTDn;
		pParamL->m_dOD = dTOd;
	}

	nDir = 0;
	pXDataMapSrc->GetAt(PIPE_ELBOWFLG,nDir);
	//??

	nDir = 0;
	pXDataMapSrc->GetAt(PIPE_BWELDDOT,nDir);
	//??

	dVal = 1.0;
	pXDataMapSrc->GetAt(DOC_PLOTWIDTH,dVal);
	//??

	dVal = 1.0;
	pXDataMapSrc->GetAt(DOC_DPLOTWIDTH,dVal);
	//??

	dVal = 1.0;
	pXDataMapSrc->GetAt(DOC_WELDDIA,dVal);
	//??

	dVal = 1.0;
	pXDataMapSrc->GetAt(PIPE_PIDD,dVal);
	//??

	return TRUE;
} 

BOOL TDbPipeSupport::QueryElbowL(CUIISQLiteServer *pDb, double dDN, double &dL, double dRadio,int nCn,LPCTSTR pszLevel,LPCTSTR pszODNo, AecDbObjXDataMap *pXData)
{
	//附加替换的数据
	double dAng = 0.0;
	pXData->GetAt(PIPE_ELBOWANG, dAng); //角度-弧度

	//继续按默认90度设置
	BOOL bOk = FALSE;
	CString sSQL,sODNo = pszODNo;
	if (pszLevel != NULL && _tcslen(pszLevel) > 0)//
	{
		sSQL.Format(_T("select distinct [外径系列] from AecSpecFit where [类型]='弯头' and [等级名称]='%s'"), pszLevel);
		pDb->GetSelData(sSQL, sODNo);
		if (sODNo.IsEmpty()) sODNo = pszODNo;
	}

	BOOL bRdioOn = FALSE;
	pXData->GetAt(KEY_RadRatio, bRdioOn);
	if (bRdioOn)
	{
		dRadio = 1.0;//最小
	}

	static CStringList lstField;
	if (lstField.IsEmpty())
	{
		pDb->GetTableStru(_T("AecElbowData"), lstField);
	}

	if (lstField.Find(_T("r")) != NULL ||
		lstField.Find(_T("R")) != NULL)//兼容旧版
	{
		sSQL.Format(_T("select [结构长度],R,F,H from [AecElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
			(int)(dDN + 0.5),dRadio - 0.01 , sODNo);
	}
	else
	{
		sSQL.Format(_T("select [结构长度] from [AecElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
			(int)(dDN + 0.5), dRadio - 0.01, sODNo);
	}

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 3)
	{
		dL = _ttof(arVals.GetAt(0));

		if (arVals.GetSize() >= 4)
		{
			if (_ttof(arVals.GetAt(1)) > 1.e-6)
			{
				pXData->SetAt(_T("R"), _ttof(arVals.GetAt(1)) );
				pXData->SetAt(_T("F"), _ttof(arVals.GetAt(2)) );
				pXData->SetAt(_T("H"), _ttof(arVals.GetAt(3)) );
			}
		}
		bOk = TRUE;
	}
	else//没有按最近曲率查, 原因法兰管曲率不能太小，防止法兰碰，比如衬塑管
	{
		if (lstField.Find(_T("r")) != NULL ||
			lstField.Find(_T("R")) != NULL)//兼容旧版
		{
			sSQL.Format(_T("select [结构长度],R,F,H from [AecElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
				(int)(dDN + 0.5), dRadio, sODNo);
		}
		else
		{
			sSQL.Format(_T("select [结构长度] from [AecElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
				(int)(dDN + 0.5), dRadio, sODNo);
		}

		CStringArray arVals;
		pDb->GetSelData(sSQL, arVals);

		if (arVals.GetSize() > 0)
		{
			dL = _ttof(arVals.GetAt(0));

			if (arVals.GetSize() >= 4)
			{
				if (_ttof(arVals.GetAt(1)) > 1.e-6)
				{
					pXData->SetAt(_T("R"), _ttof(arVals.GetAt(1)));
					pXData->SetAt(_T("F"), _ttof(arVals.GetAt(2)));
					pXData->SetAt(_T("H"), _ttof(arVals.GetAt(3)));
				}
			}

			bOk = TRUE;
		}
		else
		{
			//acutPrintf(_T("\n没有查到%s系列公称直径=%d曲率=%.1f的弯头结构长度数据,采用B系列数据代替!"), sODNo,(int)(dDN+0.5),dRadio);
			//没有一律 按B 系列再查
			if (lstField.Find(_T("r")) != NULL ||
				lstField.Find(_T("R")) != NULL)//兼容旧版
			{
				sSQL.Format(_T("select [结构长度],R,F,H from [AecElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='B' order by [弯头曲率]"),
					(int)(dDN + 0.5), dRadio - 0.01 );
			}
			else
			{
				sSQL.Format(_T("select [结构长度] from [AecElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='B' order by [弯头曲率]"),
					(int)(dDN + 0.5), dRadio - 0.01);
			}

			pDb->GetSelData(sSQL, arVals);
			if (arVals.GetSize() > 0)
			{
				dL = _ttof(arVals.GetAt(0));

				if (arVals.GetSize() >= 4)
				{
					if (_ttof(arVals.GetAt(1)) > 1.e-6)
					{
						pXData->SetAt(_T("R"), _ttof(arVals.GetAt(1)));
						pXData->SetAt(_T("F"), _ttof(arVals.GetAt(2)));
						pXData->SetAt(_T("H"), _ttof(arVals.GetAt(3)));
					}
				}

				bOk = TRUE;
			}
			else
			{
				dL = dRadio * dDN;
				bOk = TRUE;
			}
		}
	}

	if (fabs(dAng - PI / 8.0) < 1.e-3)//22.5
	{
		if (TDbPipeSupport::Query225ElbowL(pDb, dDN, dL, dRadio, nCn, pszLevel, pszODNo, pXData))
			return TRUE;
	}
	else if (fabs(dAng - PI / 6.0) < 1.e-3)//30
	{
		if (TDbPipeSupport::Query30ElbowL(pDb, dDN, dL, dRadio, nCn, pszLevel, pszODNo, pXData))
			return TRUE;
	}
	else if (fabs(dAng - PI / 4.0) < 1.e-3)//45
	{
		if (TDbPipeSupport::Query45ElbowL(pDb, dDN, dL, dRadio, nCn, pszLevel, pszODNo, pXData))
			return TRUE;
	}
	else if (fabs(dAng - PI / 3.0) < 1.e-3)//60
	{
		if (TDbPipeSupport::Query60ElbowL(pDb, dDN, dL, dRadio, nCn, pszLevel, pszODNo, pXData))
			return TRUE;
	}

	return bOk;
}

BOOL TDbPipeSupport::QueryRElbowL(CUIISQLiteServer *pDb, double dDNL, double dDNs,double &dL, double dRadio, int nCn, LPCTSTR pszLevel, LPCTSTR pszODNo, AecDbObjXDataMap *pXData)
{
	//附加替换的数据
	double dAng = 0.0;
	pXData->GetAt(PIPE_ELBOWANG, dAng); //角度-弧度

	//继续按默认90度设置
	BOOL bOk = FALSE;
	CString sSQL, sODNo = pszODNo;
	if (pszLevel != NULL && _tcslen(pszLevel) > 0)//
	{
		sSQL.Format(_T("select distinct [外径系列] from AecSpecFit where [类型]='弯头' and [等级名称]='%s'"), pszLevel);
		pDb->GetSelData(sSQL, sODNo);
		if (sODNo.IsEmpty()) sODNo = pszODNo;
	}

	BOOL bRdioOn = FALSE;
	pXData->GetAt(KEY_RadRatio, bRdioOn);
	if (bRdioOn)
	{
		dRadio = 1.0;//最小
	}

	static CStringList lstField;
	if (lstField.IsEmpty())
	{
		pDb->GetTableStru(_T("AecRElbowData"), lstField);
	}

	if (lstField.Find(_T("r")) != NULL ||
		lstField.Find(_T("R")) != NULL)//兼容旧版
	{
		sSQL.Format(_T("select [长度],R,F,H from [AecRElbowData] where [公称直径L]=%d and [公称直径S]=%d and [外径系列]='%s'"),
			(int)(dDNL+0.5),(int)(dDNs+0.5), sODNo);
	}
	else
	{
		sSQL.Format(_T("select [长度] from [AecRElbowData] where [公称直径L]=%d and [公称直径S]=%d and [外径系列]='%s'"),
			(int)(dDNL + 0.5), (int)(dDNs + 0.5), sODNo);
	}

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 3)
	{
		dL = _ttof(arVals.GetAt(0));

		if (arVals.GetSize() >= 4)
		{
			if (_ttof(arVals.GetAt(1)) > 1.e-6)
			{
				pXData->SetAt(_T("R"), _ttof(arVals.GetAt(1)));
				pXData->SetAt(_T("F"), _ttof(arVals.GetAt(2)));
				pXData->SetAt(_T("H"), _ttof(arVals.GetAt(3)));
			}
		}
		bOk = TRUE;
	}

	return bOk;
}

BOOL TDbPipeSupport::Query45ElbowL(CUIISQLiteServer *pDb, double dDN, double &dL, double dRadio, int nCn, LPCTSTR pszLevel, LPCTSTR pszDNo, AecDbObjXDataMap *pXData)
{
	static CStringList lstField;
	if (lstField.IsEmpty())
	{
		pDb->GetTableStru(_T("Aec45ElbowData"), lstField);
	}

	CString sSQL;

	if (lstField.Find(_T("r")) != NULL ||
		lstField.Find(_T("R")) != NULL)//兼容旧版
	{
		sSQL.Format(_T("select [结构长度],R,F,H from [Aec45ElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
			(int)(dDN + 0.5), dRadio - 0.01, pszDNo);
	}
	else
	{
		sSQL.Format(_T("select [结构长度] from [Aec45ElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
			(int)(dDN + 0.5), dRadio - 0.01, pszDNo);
	}

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);
	if (arVals.GetSize() > 0 )
	{
		dL = _ttof(arVals.GetAt(0));
		if (arVals.GetSize() >= 4)
		{
			if (_ttof(arVals.GetAt(1)) > 1.e-6)
			{
				pXData->SetAt(_T("R"), _ttof(arVals.GetAt(1)));
				pXData->SetAt(_T("F"), _ttof(arVals.GetAt(2)));
				pXData->SetAt(_T("H"), _ttof(arVals.GetAt(3)));
			}
		}
		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::Query225ElbowL(CUIISQLiteServer *pDb, double dDN, double &dL, double dRadio, int nCn, LPCTSTR pszLevel, LPCTSTR pszDNo, AecDbObjXDataMap *pXData)
{
	CString sSQL;
	sSQL.Format(_T("select [结构长度],R,F,H from [Aec22_5ElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
		(int)(dDN + 0.5), dRadio - 0.01, pszDNo);

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);
	if (arVals.GetSize() >= 4)
	{
		dL = _ttof(arVals.GetAt(0));
		if (_ttof(arVals.GetAt(1)) > 1.e-6)
		{
			pXData->SetAt(_T("R"), _ttof(arVals.GetAt(1)));
			pXData->SetAt(_T("F"), _ttof(arVals.GetAt(2)));
			pXData->SetAt(_T("H"), _ttof(arVals.GetAt(3)));
		}
		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::Query30ElbowL(CUIISQLiteServer *pDb, double dDN, double &dL, double dRadio, int nCn, LPCTSTR pszLevel, LPCTSTR pszDNo, AecDbObjXDataMap *pXData)
{
	CString sSQL;
	sSQL.Format(_T("select [结构长度],R,F,H from [Aec30ElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
		(int)(dDN + 0.5), dRadio - 0.01, pszDNo);

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);
	if (arVals.GetSize() >= 4)
	{
		dL = _ttof(arVals.GetAt(0));
		if (_ttof(arVals.GetAt(1)) > 1.e-6)
		{
			pXData->SetAt(_T("R"), _ttof(arVals.GetAt(1)));
			pXData->SetAt(_T("F"), _ttof(arVals.GetAt(2)));
			pXData->SetAt(_T("H"), _ttof(arVals.GetAt(3)));
		}
		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::Query60ElbowL(CUIISQLiteServer *pDb, double dDN, double &dL, double dRadio, int nCn, LPCTSTR pszLevel, LPCTSTR pszDNo, AecDbObjXDataMap *pXData)
{
	CString sSQL;
	sSQL.Format(_T("select [结构长度],R,F,H from [Aec60ElbowData] where [公称直径]=%d and [弯头曲率]>=%.2f and [外径系列]='%s' order by [弯头曲率]"),
		(int)(dDN + 0.5), dRadio - 0.01, pszDNo);

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);
	if (arVals.GetSize() >= 4)
	{
		dL = _ttof(arVals.GetAt(0));
		if (_ttof(arVals.GetAt(1)) > 1.e-6)
		{
			pXData->SetAt(_T("R"), _ttof(arVals.GetAt(1)));
			pXData->SetAt(_T("F"), _ttof(arVals.GetAt(2)));
			pXData->SetAt(_T("H"), _ttof(arVals.GetAt(3)));
		}
		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryFitSpecInf(CUIISQLiteServer *pDb, double dDn, WPipe::FITSPEC& fitSpec,WPipe::Trade &eTrade, LPCTSTR pszFitName, LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	if (eTrade == WPipe::eCivial)//市政 不考虑等级 Z系列 暂 A
		return FALSE;

	/*
	    TCHAR szODSN[7];	//外径系列
		TCHAR szShtNo[33];	//表号
		TCHAR szStdNo[33];	//标准号
		TCHAR szMat[33];	//材质
		TCHAR szDesc[128];	//描述
	*/
	memset(&fitSpec, 0, sizeof(WPipe::FITSPEC));

	CString sSQL, sTip;

	BOOL bFind = FALSE;
	if (pszProName != NULL && pszPreSpecName != NULL)
	{
		CStringArray arVals;
		if (_tcscmp(pszFitName, _T("法兰")) == 0)
		{
			sSQL.Format(_T("select distinct [制造类型],[标准号],[材质],[描述] from AecSpecFlange where [项目名称]='%s' and [类别]='%s' and [等级名称]='%s' and [公称直径]=%d"), pszProName, pszFitName, pszPreSpecName, (int)(dDn + 0.5));

			if (pDb->GetSelData(sSQL, arVals))
			{
				if (arVals.GetSize() >= 4)
				{
					_tcscpy(fitSpec.szODSN, _T("A"));
					_tcscpy(fitSpec.szShtNo, arVals.GetAt(0));
					_tcscpy(fitSpec.szStdNo, arVals.GetAt(1));
					_tcscpy(fitSpec.szMat, arVals.GetAt(2));
					_tcscpy(fitSpec.szDesc, arVals.GetAt(3));
					bFind = TRUE;
				}
			}
		}
		else
		{
			sSQL.Format(_T("select distinct [外径系列],[表号],[标准号],[材质],[描述] from AecSpecFit where [项目名称]='%s' and [类型]='%s' and [等级名称]='%s' and [公称直径]=%d"), pszProName, pszFitName, pszPreSpecName, (int)(dDn + 0.5));

			if (pDb->GetSelData(sSQL, arVals))
			{
				if (arVals.GetSize() >= 5)
				{
					_tcscpy(fitSpec.szODSN, arVals.GetAt(0));
					_tcscpy(fitSpec.szShtNo, arVals.GetAt(1));
					_tcscpy(fitSpec.szStdNo, arVals.GetAt(2));
					_tcscpy(fitSpec.szMat, arVals.GetAt(3));
					_tcscpy(fitSpec.szDesc, arVals.GetAt(4));
					bFind = TRUE;
				}
			}
		}

		if (!bFind)
		{
			sTip.Format(_T("缺少项目名称=%s 等级名称=%s DN=%d 等级数据!\n请设置该项目和等级需要的%s等级数据!\n参见 KTSpeEdit\\等级生成器\\管件 设置"), pszProName, pszPreSpecName,(int)(dDn + 0.5), pszFitName);
			AfxMessageBox(sTip);
			return FALSE;
		}
	}
	else
	{
		//没有项目 等级 设置，默认取A系列
		//CString sSNo = _T("A");
	}
	return bFind;
}

BOOL TDbPipeSupport::QueryPipeSpecInf(CUIISQLiteServer *pDb, double dDn, WPipe::PIPESPEC &pipeSpec, WPipe::Trade &eTrade, LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	if (eTrade == WPipe::eCivial)//市政 不考虑等级 Z系列 暂 A
		return FALSE;

	/*
	* TCHAR szODSN[7];	//外径系列
		TCHAR szShtNo[33];	//表号
		TCHAR szStdNo[33];	//标准号
		TCHAR szMat[33];	//材质
		TCHAR szDesc[128];	//描述
	*/
	memset(&pipeSpec, 0, sizeof(WPipe::FITSPEC));

	CString sSQL, sTip;

	BOOL bFind = FALSE;
	if (pszProName != NULL && pszPreSpecName != NULL)
	{
		CStringArray arVals;
		sSQL.Format(_T("select distinct [外径系列],[表号],[标准号],[材质],[描述] from AecSpecPipe where [项目名称]='%s' and [类别]='管道' and [等级名称]='%s' and [公称直径]=%d"), pszProName, pszPreSpecName, (int)(dDn + 0.5));

		if (pDb->GetSelData(sSQL, arVals))
		{
			if (arVals.GetSize() >= 5)
			{
				_tcscpy(pipeSpec.szODSN, arVals.GetAt(0));
				_tcscpy(pipeSpec.szShtNo, arVals.GetAt(1));
				_tcscpy(pipeSpec.szStdNo, arVals.GetAt(2));
				_tcscpy(pipeSpec.szMat, arVals.GetAt(3));
				_tcscpy(pipeSpec.szDesc, arVals.GetAt(4));
				bFind = TRUE;
			}
		}

		if (!bFind)
		{
			sTip.Format(_T("缺少项目名称=%s 等级名称=%s DN=%d 等级数据!\n请设置该项目和等级需要的%s等级数据!\n参见 KTSpeEdit\\等级生成器\\管道 设置"), pszProName, pszPreSpecName, (int)(dDn + 0.5));
			AfxMessageBox(sTip);
			return FALSE;
		}
	}
	else
	{
		//没有项目 等级 设置，默认取A系列
		//CString sSNo = _T("A");
	}
	return bFind;
}

BOOL TDbPipeSupport::QueryFitSpecsNo(CUIISQLiteServer *pDb, double dDn, CString &sSNo, WPipe::Trade &eTrade, LPCTSTR pszFitName, LPCTSTR pszDNo, LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	CString sSQL, sTip;
	//行业 全局
	AecDbObjXDataMap xInitMap;
	KTModelLayoutXData::ReadModelXData(KT_PIPEINIT, xInitMap);

	int nTrade = 4;
	xInitMap.GetAt(DOC_PIDTRADE, nTrade);	//应用行业，石油

	sSNo = _T("A");
	eTrade = (WPipe::Trade)nTrade;
	if (eTrade == WPipe::eCivial)//市政 不考虑等级 Z系列 暂 A
	{
		if (pszDNo == NULL)
			sSNo = _T("A");
		else
			sSNo = pszDNo;
	}
	else
	{
		bool bFind = false;
		if (pszProName != NULL && pszPreSpecName != NULL)
		{
			CString sSNo1 = _T(""), sSQL1;
			sSQL1.Format(_T("select distinct [外径系列] from AecSpecFit where [项目名称]='%s' and [类型]='%s' and [等级名称]='%s' and [公称直径]=%d"), pszProName, pszFitName, pszPreSpecName, (int)(dDn + 0.5));

			if (pDb->GetSelData(sSQL1, sSNo1) )
			{
				sSNo = sSQL1;
				bFind = true;
			}

			if (!bFind)
			{
				sTip.Format(_T("\n缺少项目名称=%s 等级名称=%s 的%s外径系列 DN%d 选型数据!\n请设置该项目和等级需要的%s选型数据!\n参见 KTSpeEdit\\等级生成器\\管件 设置"), pszProName, pszPreSpecName, pszFitName, (int)(dDn + 0.5), pszFitName);
				acutPrintf(sTip);
				if (pszDNo != NULL)
					sSNo = pszDNo;
				return FALSE;
			}
			return TRUE;
		}
		else
		{
			if (pszDNo != NULL)
				sSNo = pszDNo;
			//没有项目 等级 设置，默认取A系列
			//CString sSNo = _T("A");
		}
	}
	return TRUE;
}

BOOL TDbPipeSupport::QueryFitSpecsNo(CUIISQLiteServer *pDb, double dDn1, double dDn2, CString& sSNo, WPipe::Trade& eTrade,LPCTSTR pszFitName, LPCTSTR pszDNo,LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	CString sSQL,sTip;
	//行业 全局
	AecDbObjXDataMap xInitMap;
	KTModelLayoutXData::ReadModelXData(KT_PIPEINIT, xInitMap);

	int nTrade = 4;
	xInitMap.GetAt(DOC_PIDTRADE, nTrade);	//应用行业，石油

	sSNo = _T("A");
	eTrade = (WPipe::Trade)nTrade;
	if (eTrade == WPipe::eCivial)//市政 不考虑等级 Z系列 暂 A
	{
		if (pszDNo != NULL)
			sSNo = pszDNo;
		else
			sSNo = _T("A");
	}
	else
	{
		bool bFind = false;
		if (pszProName != NULL && pszPreSpecName != NULL)
		{
			CString sSNo1 = _T(""), sSNo2 = _T(""), sSQL1, sSQL2;
			sSQL1.Format(_T("select distinct [外径系列] from AecSpecFit where [项目名称]='%s' and [类型]='%s' and [等级名称]='%s' and [公称直径]=%d"), pszProName, pszFitName, pszPreSpecName, (int)(dDn1 + 0.5));
			sSQL2.Format(_T("select distinct [外径系列] from AecSpecFit where [项目名称]='%s' and [类型]='%s' and [等级名称]='%s' and [公称直径]=%d"), pszProName, pszFitName, pszPreSpecName, (int)(dDn2 + 0.5));

			if (pDb->GetSelData(sSQL1, sSNo1) && pDb->GetSelData(sSQL2, sSNo2))
			{
				if (sSNo1.CompareNoCase(sSNo2) == 0)
				{
					sSNo = sSNo1;
					bFind = true;
				}
				else
				{
					sSNo = sSNo1;
					bFind = true;
					//...
				}
			}

			if (!bFind)
			{
				sTip.Format(_T("\n缺少项目名称=%s 等级名称=%s 的%s外径系列 DN%d : DN%d 选型数据!\n请设置该项目和等级需要的%s选型数据!\n参见 KTSpeEdit\\等级生成器\\管件 设置"), pszProName, pszPreSpecName, pszFitName,(int)(dDn1 + 0.5), (int)(dDn2 + 0.5), pszFitName);
				acutPrintf(sTip);
				if (pszDNo != NULL)
					sSNo = pszDNo;
				return FALSE;
			}
			return TRUE;
		}
		else
		{
			if (pszDNo != NULL)
				sSNo = pszDNo;

			//没有项目 等级 设置，默认取A系列
			//CString sSNo = _T("A");
		}
	}
	return TRUE;
}

BOOL TDbPipeSupport::QueryFitSpecsNo(CUIISQLiteServer* pDb, LPCTSTR pszLevel, double dDn, CString &sODn)
{
	CString sSQL;
	sSQL.Format(_T("select distinct [外径系列] from [AecSpecFit] where [公称直径]=%d and [类别]='管件' and [等级名称]='%s'"),(int)(dDn+0.5),pszLevel);

	sODn = _T("A");
	pDb->GetSelData(sSQL, sODn);

	return TRUE;
}

BOOL TDbPipeSupport::QueryTeeData(CUIISQLiteServer* pDb,double dDn1,double dDn2,double& dL,double& dS, LPCTSTR pszDNo/* = _T("A")*/, LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	double dUnit = MakeSureMMUnit(dDn1);
	MakeSureMMUnit(dDn2);

	CString sSQL, sSNo = _T("A"), sTip;
	CStringArray arValues;

	WPipe::Trade eTrade = WPipe::eCivial;
	if (!QueryFitSpecsNo(pDb, dDn1, dDn2, sSNo, eTrade,_T("三通"), pszDNo,pszProName, pszPreSpecName))
	{
		//默认
		if (pszDNo != NULL)
			sSNo = pszDNo;
	}

	//A B 系列    Z系列位市政,无等级
	//查询三通尺寸
	sSQL.Format(_T("select [长度L],[长度S],f1,f2 from AecTeeData where [公称直径L] = %d and")
		_T(" [公称直径S] = %d and [外径系列] = '%s'"),(int)(dDn1+0.5),(int)(dDn2+0.5), sSNo);

	pDb->GetSelData(sSQL,arValues);

	if (arValues.GetSize() < 4 && eTrade == WPipe::eCivial) //再反查B
	{
		sSQL.Format(_T("select [长度L],[长度S],f1,f2 from AecTeeData where [公称直径L] = %d and")
			_T(" [公称直径S] = %d and [外径系列] = 'B'"),(int)(dDn1+0.5),(int)(dDn2+0.5));
		pDb->GetSelData(sSQL,arValues);
	}
	
	if (arValues.GetSize() < 4)
	{
		if (fabs(dDn1 - dDn2) < 1.e-1)
		{
			sSQL.Format(_T("select [长度L],[长度S],f1,f2 from AecTeeData where [公称直径L] = %d and [外径系列] = '%s'"), (int)(dDn1 + 0.5), sSNo);
			pDb->GetSelData(sSQL, arValues);

			if (arValues.GetSize() < 4)
			{
				sTip.Format(_T("缺少公称直径L=%d 公称直径S=%d 外径系列='%s' 的三通选型数据!\
				\n请完善三通的安装数据!\n参见KTSpeEdit\\安装数据\\三通数据!"), (int)(dDn1 + 0.5), (int)(dDn2 + 0.5), sSNo);
				AfxMessageBox(sTip);
				return FALSE;
			}
		}
	}
	 
	//对方是主尺寸,自己是支尺寸
	if (arValues.GetSize() >= 4) //有
	{
		dL = _ttof(arValues.GetAt(0)); //M 尺寸
		dS = _ttof(arValues.GetAt(1)); //B 尺寸

		dL += _ttof(arValues.GetAt(2));
		dS += _ttof(arValues.GetAt(3));

		dL /= dUnit;
		dS /= dUnit;

		return TRUE;
	}
	else
	{
		//自行添加 只适合 市政 Z系列
		CAcModuleResourceOverride myResources;
		CDZTTDlg dlg;
		dlg.m_nDN = (int)(dDn1+0.5);
		dlg.m_nDN2 = (int)(dDn2+0.5);
		if (IDOK == dlg.DoModal() )
		{
			if (!dlg.m_bWeldTo)
			{
				sSQL.Format(_T("insert into AecTeeData ([长度L],[长度S],[公称直径L],[公称直径S],[外径系列]) values (%d,%d,%d,%d,'Z')"),
					dlg.m_nL,dlg.m_nS,(int)(dDn1+0.5),(int)(dDn2+0.5));
				pDb->ExecuteSQL(sSQL);

				dL = dlg.m_nL;
				dS = dlg.m_nS;

				dL /= dUnit;
				dS /= dUnit;

				return TRUE;
			}

			//焊接搭接
			dS = -1000.0;// 特殊标志
			return FALSE;
		}
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryCrossData(CUIISQLiteServer* pDb,double dDN1,double dDN2,double& dL,double& dB, LPCTSTR pszDNo, LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	double dUnit = MakeSureMMUnit(dDN1);
	MakeSureMMUnit(dDN2);

	CString sSQL, sSNo = pszDNo, sTip;
	CStringArray arValues;

	WPipe::Trade eTrade = WPipe::eCivial;
	if (!QueryFitSpecsNo(pDb, dDN1, dDN2, sSNo, eTrade, _T("四通"), pszDNo, pszProName, pszPreSpecName))
	{
		return FALSE;
	}

	//param1.
	if ( ((int)(dDN1+0.5)) == ((int)(dDN2+0.5)) )
	{
		sSQL.Format(_T("select [结构长度L],[结构长度S],f1,f2 from AecCross where [公称直径] = %d and [外径系列] = '%s'"),(int)(dDN1+0.5), sSNo);
		pDb->GetSelData(sSQL,arValues);

		if (arValues.GetSize() < 4)
		{
			//从三通中取
			if (QueryTeeData(pDb, dDN1, dDN2, dL, dB, pszDNo, pszProName, pszPreSpecName))
			{
				return TRUE;
			}

			sTip.Format(_T("\n数据库中缺少系列=%s公称直径=%dx%d类型的四通!"), sSNo, (int)(dDN1 + 0.5), (int)(dDN2 + 0.5));
			AfxMessageBox(sTip);

			//如果是市政
			//弹出界面，用户添加定制
			CAcModuleResourceOverride myResources;
			CDZSTDlg dlg;
			dlg.m_nDN = (int)(dDN1 + 0.5);
			dlg.m_nDN2 = (int)(dDN1 + 0.5);
			if (IDOK == dlg.DoModal())
			{
				dL = dlg.m_nL;
				dB = dlg.m_nS;

				sSQL.Format(_T("insert into AecCross ([结构长度L],[结构长度S],[公称直径],[外径系列]) values (%d,%d,%d,'%s')"),
					(int)(dL + 0.5), (int)(dB + 0.5), (int)(dDN1 + 0.5), sSNo);
				pDb->ExecuteSQL(sSQL);

				dL /= dUnit;
				dB /= dUnit;

				return TRUE;
			}
			else
			{
				return FALSE;
			}
		}
		else
		{
			dL = _ttof(arValues.GetAt(0));
			dB = _ttof(arValues.GetAt(1));

			dL += _ttof(arValues.GetAt(2));
			dB += _ttof(arValues.GetAt(3));

			dL /= dUnit;
			dB /= dUnit;

			return TRUE;
		}
	}
	else
	{
		sSQL.Format(_T("select [结构长度L],[结构长度S] from AecCrossR \
					   where [公称直径L] = %d and [公称直径S] = %d and [外径系列] = '%s'"),(int)(dDN1+0.5),(int)(dDN2+0.5),sSNo);
		pDb->GetSelData(sSQL,arValues);
		if (arValues.GetSize() < 2)
		{
			arValues.RemoveAll();
			sSQL.Format(_T("select [结构长度L],[结构长度S] from AecCrossR \
						   where [公称直径L] = %d and [公称直径S] = %d and [外径系列] = '%s'"),(int)(dDN2+0.5),(int)(dDN1+0.5),sSNo);
			pDb->GetSelData(sSQL,arValues);

			if (arValues.GetSize() < 2)
			{
				//从三通中取
				if (QueryTeeData(pDb, dDN1, dDN2, dL, dB, pszDNo, pszProName, pszPreSpecName) )
				{
					return TRUE;
				}
				else
				{

					//弹出界面，用户添加定制
					//弹出界面，用户添加定制
					CAcModuleResourceOverride myResources;
					CDZSTDlg dlg;
					dlg.m_nDN = (int)(dDN1 + 0.5);
					dlg.m_nDN2 = (int)(dDN2 + 0.5);
					if (IDOK == dlg.DoModal())
					{
						dL = dlg.m_nL;
						dB = dlg.m_nS;

						sSQL.Format(_T("insert into AecCrossR ([结构长度L],[结构长度S],[公称直径L],[公称直径S],[外径系列]) values (%d,%d,%d,%d,'%s')"),
							(int)(dL + 0.5), (int)(dB + 0.5), (int)(dDN1 + 0.5), (int)(dDN2 + 0.5), sSNo);
						pDb->ExecuteSQL(sSQL);

						dL /= dUnit;
						dB /= dUnit;

						return TRUE;
					}
					else
					{
						return FALSE;
					}
				}
			}
			else
			{
				dB = _ttof(arValues.GetAt(0));
				dL = _ttof(arValues.GetAt(1));

				dL /= dUnit;
				dB /= dUnit;
				return TRUE;
			}
		}
		else
		{
			dL = _ttof(arValues.GetAt(0));
			dB = _ttof(arValues.GetAt(1));

			dL /= dUnit;
			dB /= dUnit;

			return TRUE;
		}
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryFlangSpecs(CUIISQLiteServer *pDb
	, double dDN
	, WPipe::Trade &eTrade
	, CString &sStd
	, CString &sTyp
	, LPCTSTR pszProName
	, LPCTSTR pszPreSpecName)
{
	return CoreTools::QueryFlangSpecs(pDb
		, dDN
		, eTrade
		, sStd
		, sTyp
		, pszPreSpecName
		, pszPreSpecName);
}

BOOL TDbPipeSupport::QueryFlangData(CUIISQLiteServer* pDb
	, double dDN
	, double dPre
	, double& dWD
	, double& dWh
	, double& dThk
	, double& dN
	, LPCTSTR pszProName
	, LPCTSTR pszPreSpecName
	, LPCTSTR pszDNo )
{
	return CoreTools::QueryFlangData(pDb
		, dDN
		, dPre
		, dWD
		, dWh
		, dThk
		, dN
		, pszProName
		, pszPreSpecName
		, pszDNo);
}

BOOL TDbPipeSupport::QueryGasketSpec(CUIISQLiteServer* pDb, WPipe::Trade& eTrade,double dDN, double dPre, LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	CString sSQL, sTip;
	//行业 全局
	AecDbObjXDataMap xInitMap;
	KTModelLayoutXData::ReadModelXData(KT_PIPEINIT, xInitMap);

	int nTrade = 4;
	xInitMap.GetAt(DOC_PIDTRADE, nTrade);	//应用行业，石油

	eTrade = (WPipe::Trade)nTrade;
	if (eTrade == WPipe::eCivial)//市政 不考虑等级 Z系列 暂 A
	{
		return TRUE;
	}

	if (pszProName != NULL && pszPreSpecName != NULL)
	{
		sSQL.Format(_T("select * from AecSpecGasket where [项目名称]='%s' and [等级名称]='%s' and [公称直径]=%d and [压力]>%.2f and [压力]<%.2f"),
			pszProName,pszPreSpecName,(int)(dDN+0.5),dPre-0.1,dPre+0.1);

		if (!pDb->IsSelEmpty(sSQL))
		{
			return TRUE;
		}
		else
		{
			sTip.Format(_T("缺少项目名称=%s 等级名称=%s 公称直径=%d 压力=%.1f 的垫片等级选型设置!"),pszProName,pszPreSpecName, (int)(dDN + 0.5),dPre);
			AfxMessageBox(sTip);
		}
	}
	else
	{
		//AfxMessageBox(_T("查询垫片缺少项目名称,等级名称!"));
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryGasketData(CUIISQLiteServer* pDb,double dDN,double dPre,CStringArray& arGasketG, LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	double dUnit = MakeSureMMUnit(dDN);

	WPipe::Trade eTrade = WPipe::eCivial;
	if (!QueryGasketSpec(pDb, eTrade,dDN,dPre,pszProName,pszPreSpecName))
	{
		return FALSE;
	}

	CString sSQL, sTemp;
	if (eTrade == WPipe::eCivial) //从垫片数据库中查
	{
		sSQL.Format(_T("select [公称直径],[材质],[压力],[垫片厚度],[描述],[类别],[类型],[标准号] from AecSpecGasket \
				   where [公称直径]=%d and [压力]>%g and [压力]<%g"), (int)(dDN + 0.5), dPre - 0.1, dPre + 0.1);

		CUIIValueTable table;
		pDb->GetSelData(sSQL, table);

		CStringArray arValues;
		if (table.GetTableLogicSize() > 0)
		{
			arGasketG.RemoveAll();
			table.GetValueRecord(0, arGasketG);

			CString sText;
			if (arGasketG.GetSize() >= 5)
			{
				sText.Format(_T("%.1f"), dDN);
				arGasketG.SetAt(0, sText);

				sText = arGasketG.GetAt(3);
				double dVal = dUnit * _ttof(sText);

				sText.Format(_T("%.1f"), dVal);
				arGasketG.SetAt(3, sText);
			}
			return TRUE;
		}
		else
		{
			sSQL.Format(_T("select [公称直径],[材质],[压力],[垫片厚度],[描述],[类别],[类型],[标准号] from AecSpecGasket \
				   where [公称直径]=%d"), (int)(dDN + 0.5));

			pDb->GetSelData(sSQL, table);
			if (table.GetTableLogicSize() > 0)
			{
				arGasketG.RemoveAll();
				table.GetValueRecord(0, arGasketG);

				CString sText;
				if (arGasketG.GetSize() >= 5)
				{
					sText.Format(_T("%.1f"), dDN);
					arGasketG.SetAt(0, sText);

					sText = arGasketG.GetAt(3);
					double dVal = dUnit * _ttof(sText);

					sText.Format(_T("%.1f"), dVal);
					arGasketG.SetAt(3, sText);
				}
				return TRUE;
			}
			else
			{
				acutPrintf(_T("\n没有查到公称直径:%d 压力%g 的垫片参数!"), (int)dDN, dPre);
			}
		}
	}
	else
	{
		if (pszProName != NULL && pszPreSpecName != NULL)
		{
			sSQL.Format(_T("select [公称直径],[材质],[压力],[垫片厚度],[描述],[类别],[类型],[标准号] from AecSpecGasket where [项目名称]='%s' and [等级名称]='%s' and [公称直径]=%d and [压力]>%.2f and [压力]<%.2f"),
				pszProName, pszPreSpecName, (int)(dDN + 0.5), dPre - 0.1, dPre + 0.1);

			CUIIValueTable table;
			pDb->GetSelData(sSQL, table);

			CStringArray arValues;
			if (table.GetTableLogicSize() > 0)
			{
				arGasketG.RemoveAll();
				table.GetValueRecord(0, arGasketG);

				CString sText;
				if (arGasketG.GetSize() >= 5)
				{
					sText.Format(_T("%.1f"), dDN);
					arGasketG.SetAt(0, sText);

					sText = arGasketG.GetAt(3);
					double dVal = dUnit * _ttof(sText);

					sText.Format(_T("%.1f"), dVal);
					arGasketG.SetAt(3, sText);
				}
				return TRUE;
			}
		}
	}

	return FALSE;
}

BOOL TDbPipeSupport::IsPointHitWPipe(ads_point ptRes,AcDbObjectId& id)
{
	ads_point pt[4];
	ads_point_set(ptRes,pt[0]);
	pt[0][X] += 10.0;
	pt[0][Y] += 10.0;//??
	pt[1][X] = pt[0][X] - 20.0;
	pt[1][Y] = pt[0][Y];
	pt[2][X] = pt[1][X];
	pt[2][Y] = pt[1][Y] - 20.0;
	pt[3][X] = pt[0][X];
	pt[3][Y] = pt[2][Y];

	TCHAR szBuf[64];
	memset(szBuf,0,sizeof(szBuf));
	_tcscpy(szBuf, _T("AEC_EWPIPE"));

	struct resbuf rb;
	rb.restype = 0;
	rb.resval.rstring = szBuf;
	rb.rbnext = NULL; 

	struct resbuf* pointlist = NULL; 
	pointlist = acutBuildList(RTPOINT, pt[0], RTPOINT, pt[1], 
		RTPOINT, pt[2], RTPOINT, pt[3], 0); 

	ads_name ss;
	acedSSGet(_T("CP"),pointlist,NULL,&rb,ss);
	acutRelRb(pointlist);

	Adesk::Int32 lLen = 0;
	acedSSLength(ss,&lLen);

	if (lLen > 0)
	{
		ads_name ent;
		acedSSName(ss,0,ent);
		acdbGetObjectId(id,ent);
		acedSSFree(ss);

		return TRUE;
	}
	acedSSFree(ss);
	return FALSE;
}

BOOL TDbPipeSupport::InsertFlangeAndGasketData(CUIISQLiteServer *pDb, const int &Dn,CString& sODNo,CString& sPro,CString& sLevel)
{
	CAcModuleResourceOverride myResources;
	CFlangeDlg flgDlg;
	flgDlg.SetAdoDb(pDb);
	flgDlg.SetDN(Dn);
	flgDlg.SetPressure(1.6);
	flgDlg.SetLevel(sODNo,sPro, sLevel);

	if (flgDlg.DoModal() == IDOK)
	{
		double d(.0);
		CStringArray ar;
		BOOL bRel = QueryFlangData(pDb, Dn, 1.6, d, d, d, d,sPro,sLevel);
		if (!bRel) return bRel;
		return QueryGasketData(pDb, Dn, 1.6, ar,sPro,sLevel);
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryLateralData(CUIISQLiteServer* pDb,double dDn,double& dE,double& dM,double& dB,double& dInsL,double& dInfD,int nType,LPCTSTR pszODSn,LPCTSTR pszProName,LPCTSTR pszPreSpecName)
{
	double dUnit = MakeSureMMUnit(dDn);

	CString sSQL, sSNo = pszODSn, sTip;
	CStringArray arValues;

	WPipe::Trade eTrade = WPipe::eCivial;
	if (!QueryFitSpecsNo(pDb, dDn, dDn, sSNo, eTrade, _T("斜三通"), _T("A"),pszProName, pszPreSpecName))
	{
		return FALSE;
	}

	if (eTrade == WPipe::eCivial)//市政
	{
		if (nType == 0)
		{
			sSQL.Format(_T("select [结构长度E],[结构长度M],[结构长度B] from aeclateral where [公称直径]=%d "),(int)(dDn+0.5));
		}
		else if (nType == 1)
		{
			sSQL.Format(_T("select [结构长度E],[结构长度M],[结构长度B],[承插长度],[接口直径] from aeclaterals where [公称直径]=%d"),(int)(dDn+0.5));
		}
		else if(nType == 2)
		{
			sSQL.Format(_T("select [结构长度E],[结构长度M],[结构长度B],[螺纹长度],[接口直径] from aeclateralt where [公称直径]=%d"),(int)(dDn+0.5));
		}
	}
	else
	{
		if (nType == 0)
		{
			sSQL.Format(_T("select [结构长度E],[结构长度M],[结构长度B] from aeclateral where [公称直径]=%d and 外径系列='%s'"), (int)(dDn + 0.5),sSNo);
		}
		else if (nType == 1)
		{
			sSQL.Format(_T("select [结构长度E],[结构长度M],[结构长度B],[承插长度],[接口直径] from aeclaterals where [公称直径]=%d and 外径系列='%s'"), (int)(dDn + 0.5), sSNo);
		}
		else if (nType == 2)
		{
			sSQL.Format(_T("select [结构长度E],[结构长度M],[结构长度B],[螺纹长度],[接口直径] from aeclateralt where [公称直径]=%d and 外径系列='%s'"), (int)(dDn + 0.5), sSNo);
		}
	}

	CStringArray arVals;
	pDb->GetSelData(sSQL,arVals);

	if (arVals.GetSize() >= 3)
	{
		dE = _ttof(arVals.GetAt(0));
		dM = _ttof(arVals.GetAt(1));
		dB = _ttof(arVals.GetAt(2));

		if (arVals.GetSize() >= 5)
		{
			dInsL = _ttof(arVals.GetAt(3));
			dInfD = _ttof(arVals.GetAt(4));
		}

		dE /= dUnit;
		dM /= dUnit;
		dB /= dUnit;

		dInsL /= dUnit;
		dInfD /= dUnit;

		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryWYeData(CUIISQLiteServer* pDb,double dDn,double& dM,double& dB,double& dInsL,double& dInfD,int nType,LPCTSTR pszODSn,LPCTSTR pszProName,LPCTSTR pszPreSpecName)
{
	double dUnit = MakeSureMMUnit(dDn);

	CString sSQL, sSNo = _T("A"), sTip;
	CStringArray arValues;

	WPipe::Trade eTrade = WPipe::eCivial;
	if (!QueryFitSpecsNo(pDb, dDn, dDn, sSNo, eTrade, _T("Y三通"), _T("A"),pszProName, pszPreSpecName))
	{
		return FALSE;
	}

	if (eTrade == WPipe::eCivial)
	{
		if (nType == 0)
		{
			sSQL.Format(_T("select [结构长度M],[结构长度B] from AecWye where [公称直径]=%d"),(int)(dDn+0.5));
		}
		else if (nType == 1)
		{
			sSQL.Format(_T("select [结构长度M],[结构长度B],[承插长度],[接口直径] from AecWyes where [公称直径]=%d"),(int)(dDn + 0.5));
		}
		else if(nType == 2)
		{
			sSQL.Format(_T("select [结构长度M],[结构长度B],[螺纹长度],[接口直径] from AecWyet where [公称直径]=%d"),(int)(dDn + 0.5));
		}
	}
	else
	{
		if (nType == 0)
		{
			sSQL.Format(_T("select [结构长度M],[结构长度B] from AecWye where [公称直径]=%d and 外径系列='%s'"), (int)(dDn + 0.5),sSNo);
		}
		else if (nType == 1)
		{
			sSQL.Format(_T("select [结构长度M],[结构长度B],[承插长度],[接口直径] from AecWyes where [公称直径]=%d and 外径系列='%s'"), (int)(dDn + 0.5), sSNo);
		}
		else if (nType == 2)
		{
			sSQL.Format(_T("select [结构长度M],[结构长度B],[螺纹长度],[接口直径] from AecWyet where [公称直径]=%d and 外径系列='%s'"), (int)(dDn + 0.5), sSNo);
		}
	}
	
	CStringArray arVals;
	pDb->GetSelData(sSQL,arVals);

	if (arVals.GetSize() >= 2)
	{
		dM = _ttof(arVals.GetAt(0));
		dB = _ttof(arVals.GetAt(1));

		if (arVals.GetSize() >= 4)
		{
			dInsL = _ttof(arVals.GetAt(2));
			dInfD = _ttof(arVals.GetAt(3));
		}

		dM /= dUnit;
		dB /= dUnit;

		dInsL /= dUnit;
		dInfD /= dUnit;

		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryCapData(CUIISQLiteServer* pDb,double dDn,double& dL,LPCTSTR pszSDN )
{
	MakeSureMMUnit(dDn);

	dL = dDn * 0.3;//经验值 

	CString sSQL;
	sSQL.Format(_T("select [结构长度] from [AecCapData] where [公称直径]=%d and [外径系列] ='%s'"),
		(int)(dDn+0.5),pszSDN);

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() > 0)
	{
		dL = _ttof(arVals.GetAt(0));
	}

	return TRUE;
}

BOOL TDbPipeSupport::QueryReduceData(CUIISQLiteServer* pDb, int nCntype, double dDn, double dTDN, double& dL, AecDbObjXDataMap *pXData, LPCTSTR pszSDN /*= _T("A")*/ )
{
	CString sSQL,sTbl;
	CStringArray arVals;

	if (nCntype == 0)
	{
		sTbl = _T("AecReduceData");
		if (IsPlasticsMat(pszSDN))
			sTbl = _T("AecReduceSData");
	}
	else if (nCntype == 1)
	{
		sTbl = _T("AecReduceSData");
	}
	else if (nCntype == 2)
	{
		sTbl = _T("AecReduceTData");
	}
	else
	{
		sTbl = _T("AecReduceData");
	}

	//如果是偏心
	AcGeVector3d vtOff(0,0,0);
	pXData->GetAt(KEY_OFFSET,vtOff);
	if (!vtOff.isZeroLength())
	{
		if (_tcscmp(pszSDN, _T("S") ) == 0)
		{
			sTbl = _T("AecEccReduceData");
		}
	}

	bool bLS = false;
	if (nCntype == 3 || nCntype == 5)
		bLS = true;

	if (sTbl.CompareNoCase(_T("AecReduceData")) == 0 ||
		sTbl.CompareNoCase(_T("AecEccReduceData")) == 0)
	{
		sSQL.Format(_T("select [长度],[H],[H2],[H1] from %s where [外径系列] = '%s' and [公称直径L]=%d and [公称直径S]=%d and [长度] > 0"), sTbl, pszSDN,__max((int)(dDn+0.5), (int)(dTDN+0.5)),__min((int)(dDn + 0.5), (int)(dTDN + 0.5)));
		pDb->GetSelData(sSQL, arVals);

		if (arVals.IsEmpty())
		{
			bLS = false;
			sSQL.Format(_T("select [长度],[H],[H1],[H2] from %s where [公称直径L]=%d and [公称直径S]=%d and [长度] > 0"), sTbl, (int)(dTDN + 0.5), (int)(dDn + 0.5));
			pDb->GetSelData(sSQL, arVals);
		}
	}
	else
	{
		sSQL.Format(_T("select [长度] from %s where [外径系列] = '%s' and [公称直径L]=%d and [公称直径S]=%d and [长度] > 0"), sTbl, pszSDN, __max((int)(dDn + 0.5), (int)(dTDN + 0.5)), __min((int)(dDn + 0.5), (int)(dTDN + 0.5)));
		pDb->GetSelData(sSQL, arVals);

		if (arVals.IsEmpty())
		{
			bLS = false;
			sSQL.Format(_T("select [长度] from %s where [公称直径L]=%d and [公称直径S]=%d and [长度] > 0"), sTbl, (int)(dTDN + 0.5), (int)(dDn + 0.5));
			pDb->GetSelData(sSQL, arVals);
		}
	}
	
	if (!arVals.IsEmpty())
	{
		dL = _ttof(arVals.GetAt(0));

		if (arVals.GetSize() >= 4)
		{
			if (bLS)
			{
				pXData->SetAt(_T("H"), _ttof(arVals.GetAt(1)));
				pXData->SetAt(_T("H2"), _ttof(arVals.GetAt(2)));
				pXData->SetAt(_T("H1"), _ttof(arVals.GetAt(3)));

				dL += 2.0 * _ttof(arVals.GetAt(1));
				dL += _ttof(arVals.GetAt(2));
				dL += _ttof(arVals.GetAt(3));
			}
			else
			{
				pXData->SetAt(_T("H"), _ttof(arVals.GetAt(1)));
				pXData->SetAt(_T("H1"), _ttof(arVals.GetAt(2)));
				pXData->SetAt(_T("H2"), _ttof(arVals.GetAt(3)));

				//焊接不需要
				//dL += 2.0 * _ttof(arVals.GetAt(1));
				//dL += _ttof(arVals.GetAt(2));
				//dL += _ttof(arVals.GetAt(3));
			}
		}
		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryFlxJoinData(CUIISQLiteServer *pDb, double dDN, double dPre, AecDbObjXDataMap* pXDataMap)
{
	CString sSQL;

	sSQL.Format(_T("select [尺寸A],[尺寸B],[尺寸C],[型号],[标准号] from AecFlxJoin where [公称直径]=%d and [压力]>%.3f and [压力]<%.3f"),
		(int)(dDN + 0.5), dPre - 0.01, dPre + 0.01);

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 5)
	{
		pXDataMap->SetAt(KEY_A, _ttof(arVals.GetAt(0)));
		pXDataMap->SetAt(KEY_B, _ttof(arVals.GetAt(1)));
		pXDataMap->SetAt(KEY_C, _ttof(arVals.GetAt(2)));
		pXDataMap->SetAt(KEY_TYPE, arVals.GetAt(3));
		pXDataMap->SetAt(PIPE_STDNO, arVals.GetAt(4));
		pXDataMap->SetAt(PIPE_DN, dDN);
		return TRUE;
	}
	return FALSE;
}

bool TDbPipeSupport::IsPlasticsMat(LPCTSTR pszODNO)
{
	const CString sPlastic = _T("UPVC CPVC PVC-C PP-H (PE) HDPE");
	CStringArray arNos;
	CoreTools::SplitStrintToArray(sPlastic, arNos, _T(' '));
	for (int i = 0; i < arNos.GetSize(); i++)
	{
		if (arNos.GetAt(i).CompareNoCase(pszODNO) == 0)
		{
			return true;
		}
	}
	return false;
}

BOOL TDbPipeSupport::QueryInfFDFL(CUIISQLiteServer* pDb,int nObjectKind,int nCntype,double dDN,double& dFD,double& dFL, LPCTSTR pszODNo,LPCTSTR pszProName, LPCTSTR pszPreSpecName)
{
	double dUnit = MakeSureMMUnit(dDN);
	CString sTablename = _T(""),sFitName = _T(""), sSNo = pszODNo;

	EFittingType eKind = (EFittingType)nObjectKind;
	switch(eKind)
	{
	case eElbow:
		{
			if (nCntype == 1)
			{
				sTablename = _T("AecElbowSData");
				sFitName = _T("承插弯头");
		}
			else if(nCntype == 2)
			{
				sTablename = _T("AecElbowTData");
				sFitName = _T("螺纹弯头");
			}
			break;
		}
	case eReduce:
		{
			if (nCntype == 1)
			{
				sTablename = _T("AecReduceSData");
				sFitName = _T("承插变径");
				
			}
			else if(nCntype == 2)
			{
				sTablename = _T("AecReduceTData");
				sFitName = _T("螺纹变径");
			}
			break;
		}
	case eCross:
		{
			if (nCntype == 1)
			{
				sTablename = _T("AecCrossS");
				sFitName = _T("承插四通");
			}
			else if(nCntype == 2)
			{
				sTablename = _T("AecCrossT");
				sFitName = _T("螺纹四通");
				
			}
			break;
		}
	case eTee:
		{
			if (nCntype == 1)
			{
				sTablename = _T("AecTeeSData");
				sFitName = _T("承插三通");
			}
			else if(nCntype == 2)
			{
				sTablename = _T("AecTeeTData");
				sFitName = _T("螺纹三通");
				
			}
			break;
		}
	case eLateral:
		{
			if (nCntype == 1)
			{
				sTablename = _T("AecLateralS");
				sFitName = _T("承插斜三通");
			}
			else if(nCntype == 2)
			{
				sTablename = _T("AecLateralT");
				sFitName = _T("螺纹斜三通");
				
			}
			break;
		}
	case eWye:
		{
			if (nCntype == 1)
			{
				sTablename = _T("AecWyes");
				sFitName = _T("承插Y三通");
			}
			else if(nCntype == 2)
			{
				sTablename = _T("AecWyeT");
				sFitName = _T("螺纹Y三通");
				
			}
			break;
		}
	default:
		break;
	}

	if (!sTablename.IsEmpty())
	{
		//等级系列 查询系列
		WPipe::Trade eTrade = WPipe::eCivial;
		if (!QueryFitSpecsNo(pDb, dDN, dDN, sSNo, eTrade, sFitName, _T("A"),pszProName, pszPreSpecName))
		{
			return FALSE;
		}

		CString sSQL;
		CStringArray arVals;

		if (eTrade == WPipe::eCivial)
		{
			if (eKind == eReduce)
			{
				if (nCntype == 1) //cheng cha
				{
					sSQL.Format(_T("select [接口直径L],[承插长度L] from [%s] where [公称直径L]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5),pszODNo);
				}
				else if (nCntype == 2)//luo wen
				{
					sSQL.Format(_T("select [接口直径L],[螺纹长度L] from [%s] where [公称直径L]=%d and [外径系列]='%s'" ), sTablename, (int)(dDN + 0.5),pszODNo);
				}

				pDb->GetSelData(sSQL, arVals);
				if (arVals.GetSize() == 0)
				{
					if (nCntype == 1) //cheng cha
					{
						sSQL.Format(_T("select [接口直径S],[承插长度S] from [%s] where [公称直径S]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5),pszODNo);
					}
					else if (nCntype == 2)//luo wen
					{
						sSQL.Format(_T("select [接口直径S],[螺纹长度S] from [%s] where [公称直径S]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5),pszODNo);
					}
					pDb->GetSelData(sSQL, arVals);
				}
			}
			else
			{
				if (nCntype == 1) //cheng cha
				{
					sSQL.Format(_T("select [接口直径],[承插长度] from [%s] where [公称直径]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5), pszODNo);
				}
				else if (nCntype == 2)//luo wen
				{
					sSQL.Format(_T("select [接口直径],[螺纹长度] from [%s] where [公称直径]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5), pszODNo);
				}
				pDb->GetSelData(sSQL, arVals);
			}

		}
		else
		{
			if (eKind == eReduce)
			{
				if (nCntype == 1) //cheng cha
				{
					sSQL.Format(_T("select [接口直径L],[承插长度L] from [%s] where [公称直径L]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5),sSNo);
				}
				else if (nCntype == 2)//luo wen
				{
					sSQL.Format(_T("select [接口直径L],[螺纹长度L] from [%s] where [公称直径L]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5), sSNo);
				}

				pDb->GetSelData(sSQL, arVals);
				if (arVals.GetSize() == 0)
				{
					if (nCntype == 1) //cheng cha
					{
						sSQL.Format(_T("select [接口直径S],[承插长度S] from [%s] where [公称直径S]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5), sSNo);
					}
					else if (nCntype == 2)//luo wen
					{
						sSQL.Format(_T("select [接口直径S],[螺纹长度S] from [%s] where [公称直径S]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5), sSNo);
					}
					pDb->GetSelData(sSQL, arVals);
				}
			}
			else
			{
				if (nCntype == 1) //cheng cha
				{
					sSQL.Format(_T("select [接口直径],[承插长度] from [%s] where [公称直径]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5), sSNo);
				}
				else if (nCntype == 2)//luo wen
				{
					sSQL.Format(_T("select [接口直径],[螺纹长度] from [%s] where [公称直径]=%d and [外径系列]='%s'"), sTablename, (int)(dDN + 0.5), sSNo);
				}
				pDb->GetSelData(sSQL, arVals);
			}
		}
		
		if (arVals.GetSize() >= 2)
		{
			dFD = _ttof(arVals.GetAt(0));
			dFL = _ttof(arVals.GetAt(1));

			dFD /= dUnit;
			dFL /= dUnit;

			return TRUE;
		}
		else
		{
			acutPrintf(_T("\n没有查到管件结构参数!"));
			acutPrintf(_T("\n%s"),sSQL);
		}
	}
	else
	{
		if (nCntype == 3 || nCntype == 5)//法兰管
		{
			//水池暂时取压力小于2
			double dThk = 0.0,dN = 0.0;
			dDN /= dUnit;
			return QueryFlangData(pDb,dDN,1.0,dFD,dFL,dThk,dN);
		}
	}
	return FALSE;
}

//设置法兰垫片
BOOL TDbPipeSupport::SetGasketData(CUIISQLiteServer *pDb, int iInf,double dDn, double dPre, LPCTSTR pszProj, LPCTSTR pszLevel, AecDbObjXDataMap *pXDataMap)
{
	BOOL bSet = FALSE;
	CStringArray arGasket;
	if (QueryGasketData(pDb, dDn, dPre, arGasket, pszProj, pszLevel))
	{
		//公称直径],[材质],[压力],[垫片厚度],[描述]

		CString sGasketInf,sKey;
		for (int i = 0;i < arGasket.GetSize();i++)
		{
			sGasketInf += arGasket.GetAt(i);
			sGasketInf += _T("#");
		}
		sGasketInf.TrimRight(_T('#'));

		sKey.Format(_T("%s%d"), PIPE_GASKETINF,iInf);
		pXDataMap->SetAt(sKey, sGasketInf);
		bSet = TRUE;
	}
	arGasket.RemoveAll();

	return bSet;
}

BOOL TDbPipeSupport::QueryFBoltData(CUIISQLiteServer *pDb, double dDn, double dPre, LPCTSTR pszProj, LPCTSTR pszLevel, CStringArray &arBoltData)
{
	CString sSQL;
	//类型 材质 标准号 描述
	sSQL.Format(_T("select [类型],[材质],[标准号],[描述] from AecSpecBolt where [项目名称]='%s' and [等级名称]='%s' and [类别]='螺栓' and [公称直径]=%d and [压力]>%.2f and [压力]<%.2f"),
		pszProj,pszLevel,(int)(dDn+0.5),dPre-0.1,dPre + 0.1);
	
	CUIIValueTable table;
	pDb->GetSelData(sSQL, table);

	if (table.GetTableLogicSize() > 0)
	{
		table.GetValueRecord(0, arBoltData);

		return TRUE;
	}

	//类型 材质 标准号 描述
	sSQL.Format(_T("select [类型],[材质],[标准号],[描述] from AecSpecBolt where [项目名称]='%s' and [等级名称]='%s' and [类别]='螺母' and [公称直径]=%d and [压力]>%.2f and [压力]<%.2f"),
		pszProj, pszLevel, (int)(dDn + 0.5), dPre - 0.1, dPre + 0.1);

	CUIIValueTable table2;
	pDb->GetSelData(sSQL, table2);

	if (table2.GetTableLogicSize() > 0)
	{
		table2.GetValueRecord(0, arBoltData);

		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryBoltData(CUIISQLiteServer *pDb, double dDn, double dPre, CStringArray &arBoltData)
{
	CString sSQL;

	//螺栓规格 螺栓长度 螺栓数量
	sSQL.Format(_T("select [螺栓规格],[螺栓长度],[螺栓数量] from AecBoltData where [公称直径]=%d and [压力]>%.2f and [压力]<%.2f"),
		(int)(dDn+0.5),dPre - 0.1,dPre + 0.1);

	return pDb->GetSelData(sSQL, arBoltData);
}

//设置法兰螺栓
BOOL TDbPipeSupport::SetBoltData(CUIISQLiteServer *pDb, int iInf,double dDn, double dPre, LPCTSTR pszProj, LPCTSTR pszLevel, AecDbObjXDataMap *pXDataMap)
{
	//螺栓信息
	BOOL bSet = FALSE;
	CStringArray arBoltData;

	//[类型],[材质],[标准号],[描述]
	if (QueryFBoltData(pDb, dDn, dPre, pszProj, pszLevel, arBoltData))
	{
		//螺栓规格 螺栓长度 数量
		if (QueryBoltData(pDb,dDn,dPre,arBoltData))
		{
			CString sKey, sBoltData;
			for (int i = 0;i < arBoltData.GetSize();i++)
			{
				sBoltData += arBoltData.GetAt(i);
				sBoltData += _T("#");
			}
			sBoltData.TrimRight(_T("#"));

			sKey.Format(_T("%s%d"), PIPE_BOLTINF, iInf);
			pXDataMap->SetAt(sKey, sBoltData);

			bSet = TRUE;
		}
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryPVCReducerData(CUIISQLiteServer* pDb, double dDN, double dEDN, AecDbObjXDataMap* pXDataMap,LPCTSTR pszSDNo)
{
	double dUnit = MakeSureMMUnit(dDN);

	int nConnectType = 0;//焊接0 承插1 螺纹2 法兰管3
	pXDataMap->GetAt(PIPE_CONNECT, nConnectType);

	CString sSQL;
	if (nConnectType <= 1)
	{
		sSQL.Format(_T("select [长度],[承插长度L],[承插长度S],[接口直径L],[接口直径S] from [AecReduceSData] where [公称直径L]=%d and [公称直径S]=%d and [外径系列]='%s'"),
			(int)(dDN + 0.5),(int)(dEDN + 0.5), pszSDNo);
	}
	else if (nConnectType == 2)
	{
		sSQL.Format(_T("select [长度],[螺纹长度L],[螺纹长度S],[接口直径L],[接口直径S] from [AecReduceTData] where [公称直径L]=%d and [公称直径S]=%d and [外径系列]='%s'"),
			(int)(dDN + 0.5), (int)(dEDN + 0.5), pszSDNo);
	}

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 4)
	{
		pXDataMap->SetAt(KEY_Length,_ttof(arVals.GetAt(0)) / dUnit);

		pXDataMap->SetAt(PIPE_INTERFACEL, _ttof(arVals.GetAt(1)) / dUnit);
		pXDataMap->SetAt(PIPE_INTERFACEL2, _ttof(arVals.GetAt(2)) / dUnit);

		pXDataMap->SetAt(PIPE_INTERFACED, _ttof(arVals.GetAt(3)) / dUnit);
		pXDataMap->SetAt(PIPE_INTERFACED2, _ttof(arVals.GetAt(4)) / dUnit);

		return TRUE;
	}
	
	return FALSE;
}

BOOL TDbPipeSupport::QueryPVCElbow(CUIISQLiteServer* pDb, double dDN, AecDbObjXDataMap* pXDataMap,LPCTSTR pszSDNo)
{
	double dUnit = MakeSureMMUnit(dDN);

	int nConnectType = 0;//焊接0 承插1 螺纹2 法兰管3
	pXDataMap->GetAt(PIPE_CONNECT, nConnectType);

	CString sSQL;

	if (nConnectType <= 1)
	{
		sSQL.Format(_T("select [结构长度],[承插长度],[接口直径] from [AecElbowSData] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dDN + 0.5),pszSDNo);

	}
	else if (nConnectType == 2)
	{
		sSQL.Format(_T("select [结构长度],[螺纹长度],[接口直径] from [AecElbowTData] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dDN + 0.5), pszSDNo);
	}

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 3)
	{
		pXDataMap->SetAt(KEY_L, _ttof(arVals.GetAt(0) ) / dUnit);
		pXDataMap->SetAt(PIPE_INTERFACEL, _ttof(arVals.GetAt(1)) / dUnit);
		pXDataMap->SetAt(PIPE_INTERFACED, _ttof(arVals.GetAt(2)) / dUnit);
		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryPVCTeeData(CUIISQLiteServer* pDb, double dDn1, double dDn2, AecDbObjXDataMap* pXDataMap,LPCTSTR pszSDNo)
{
	double dUnit = MakeSureMMUnit(dDn1);

	double dMaxD = __max(dDn1, dDn2);
	double dMinD = __min(dDn1, dDn2);

	int nConnectType = 0;//焊接0 承插1 螺纹2 法兰管3
	pXDataMap->GetAt(PIPE_CONNECT, nConnectType);

	CString sSQL;
	if (nConnectType <= 1)
	{
		sSQL.Format(_T("select [承插长度],[接口直径] from [AecTeeSData] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dMaxD + 0.5), pszSDNo);
	}
	else if (nConnectType == 2)
	{
		sSQL.Format(_T("select [螺纹长度],[接口直径] from [AecTeeTData] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dMaxD + 0.5), pszSDNo);
	}

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 2)
	{
		pXDataMap->SetAt(PIPE_INTERFACEL, _ttof(arVals.GetAt(0)) / dUnit);
		pXDataMap->SetAt(PIPE_INTERFACED, _ttof(arVals.GetAt(1)) / dUnit);
	}

	if (nConnectType <= 1)
	{
		sSQL.Format(_T("select [承插长度],[接口直径] from [AecTeeSData] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dMinD + 0.5), pszSDNo);
	}
	else if (nConnectType == 2)
	{
		sSQL.Format(_T("select [螺纹长度],[接口直径] from [AecTeeTData] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dMinD + 0.5), pszSDNo);
	}

	arVals.RemoveAll();
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 2)
	{
		pXDataMap->SetAt(PIPE_INTERFACEL2, _ttof(arVals.GetAt(0)) / dUnit);
		pXDataMap->SetAt(PIPE_INTERFACED2, _ttof(arVals.GetAt(1)) / dUnit);
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryPVCCrossData(CUIISQLiteServer* pDb, double dDn1, double dDn2, AecDbObjXDataMap* pXDataMap, LPCTSTR pszSDNo)
{
	double dUnit = MakeSureMMUnit(dDn1);

	double dMaxD = __max(dDn1, dDn2);
	double dMinD = __min(dDn1, dDn2);

	int nConnectType = 0;//焊接0 承插1 螺纹2 法兰管3
	pXDataMap->GetAt(PIPE_CONNECT, nConnectType);

	CString sSQL;
	if (nConnectType <= 1)
	{
		sSQL.Format(_T("select [结构长度],[承插长度],[接口直径] from [AecCrossS] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dMaxD + 0.5), pszSDNo);
	}
	else if (nConnectType == 2)
	{
		sSQL.Format(_T("select [结构长度],[螺纹长度],[接口直径] from [AecCrossT] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dMaxD + 0.5), pszSDNo);
	}

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 2)
	{
		pXDataMap->SetAt(PIPE_INTERFACEL, _ttof(arVals.GetAt(1)) / dUnit);
		pXDataMap->SetAt(PIPE_INTERFACED, _ttof(arVals.GetAt(2)) / dUnit);
	}

	if (nConnectType <= 1)
	{
		sSQL.Format(_T("select [承插长度],[接口直径] from [AecCrossS] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dMinD + 0.5), pszSDNo);
	}
	else if (nConnectType == 2)
	{
		sSQL.Format(_T("select [螺纹长度],[接口直径] from [AecCrossT] where [公称直径]=%d and [外径系列]='%s'"),
			(int)(dMinD + 0.5), pszSDNo);
	}

	arVals.RemoveAll();
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 2)
	{
		pXDataMap->SetAt(PIPE_INTERFACEL2, _ttof(arVals.GetAt(0)) / dUnit);
		pXDataMap->SetAt(PIPE_INTERFACED2, _ttof(arVals.GetAt(1)) / dUnit);
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryPVCSpecFit(CUIISQLiteServer* pDb, double dDN, LPCTSTR pszSDNo,EFittingType eType, AecDbObjXDataMap* pXDFit)
{
	double dUnit = MakeSureMMUnit(dDN);
	CString sSQL;
	CStringArray arVals;

	switch (eType)
	{
		case eThrough:
		{
			sSQL.Format(_T("select [结构长度],D from [AecThrough] where [公称直径]=%d and [外径系列] ='%s'"), (int)(dDN + 0.5), pszSDNo);
			pDb->GetSelData(sSQL, arVals);

			if (arVals.GetSize() >= 2)
			{
				pXDFit->SetAt(KEY_L, _ttof(arVals.GetAt(0))/ dUnit);
				pXDFit->SetAt(KEY_WD, _ttof(arVals.GetAt(1)) / dUnit);
			}
			break;
		}
		case eUJoin:
		{
			sSQL.Format(_T("select [结构长度],D from [AecUJoin] where [公称直径]=%d and [外径系列] ='%s'"), (int)(dDN + 0.5), pszSDNo);
			pDb->GetSelData(sSQL, arVals);
			if (arVals.GetSize() >= 2)
			{
				pXDFit->SetAt(KEY_L, _ttof(arVals.GetAt(0)) / dUnit);
				pXDFit->SetAt(KEY_WD, _ttof(arVals.GetAt(1)) / dUnit);
			}
			break;
		}
		case eRJoin:
		{
			sSQL.Format(_T("select [结构长度],D from [AecRJoin] where [公称直径]=%d and [外径系列] ='%s'"), (int)(dDN + 0.5), pszSDNo);
			pDb->GetSelData(sSQL, arVals);
			if (arVals.GetSize() >= 2)
			{
				pXDFit->SetAt(KEY_L, _ttof(arVals.GetAt(0)) / dUnit);
				pXDFit->SetAt(KEY_WD, _ttof(arVals.GetAt(1)) / dUnit);
			}
			break;
		}
		case eOJoin:
		{
			sSQL.Format(_T("select [结构长度],[螺纹长度],[螺纹外径],[螺母S] from [AecOJoin] where [公称直径]=%d and [外径系列] ='%s'"), (int)(dDN + 0.5), pszSDNo);
			pDb->GetSelData(sSQL, arVals);
			if (arVals.GetSize() >= 4)
			{
				pXDFit->SetAt(KEY_L, _ttof(arVals.GetAt(0)) / dUnit);
				pXDFit->SetAt(KEY_D1, _ttof(arVals.GetAt(2)) / dUnit);
				pXDFit->SetAt(KEY_WD, _ttof(arVals.GetAt(3)) / dUnit);

				pXDFit->SetAt(PIPE_INTERFACEL, _ttof(arVals.GetAt(1)) / dUnit);
				pXDFit->SetAt(PIPE_INTERFACED, dDN / dUnit);
			}
			break;
		}
		case eIJoin:
		{
			sSQL.Format(_T("select [结构长度],[螺纹长度],[螺纹外径],[螺母S] from [AecIJoin] where [公称直径]=%d and [外径系列] ='%s'"), (int)(dDN + 0.5), pszSDNo);
			pDb->GetSelData(sSQL, arVals);
			if (arVals.GetSize() >= 4)
			{
				pXDFit->SetAt(KEY_L, _ttof(arVals.GetAt(0)) / dUnit);
				pXDFit->SetAt(PIPE_INTERFACEL, _ttof(arVals.GetAt(1)) / dUnit);
				pXDFit->SetAt(PIPE_INTERFACED, dDN / dUnit);
				pXDFit->SetAt(KEY_D1, _ttof(arVals.GetAt(2)) / dUnit);
				pXDFit->SetAt(KEY_WD, _ttof(arVals.GetAt(3)) / dUnit);
			}
			break;
		}
	default:
		break;
	}
	return !arVals.IsEmpty();
}

int TDbPipeSupport::QueryRPorHP(CUIISQLiteServer *pDb, LPCTSTR pszLevel, double dDn, double ddn)
{
	//[AecSpecBranch] (
	//[等级] CHAR(256), 
	//[主管] INTEGER, 
	//[支管] INTEGER, 
	//[结构] CHAR(17));

	/*
	RT REDUCING TEE
	T EQUAL TEE
	H HALF COUPLING
	P BRANCH WELD
	RP REINFORCING PAD
	*/
	static LPCTSTR ssBs[] = { _T("RT"),_T("T"),_T("H"),_T("P"),_T("RP"),NULL };

	CString sSQL, sB;
	sSQL.Format(_T("select [结构] from AecSpecBranch where [等级]='%s' and [主管]=%d and [支管]=%d"), pszLevel, (int)(dDn + 0.5), (int)(ddn + 0.5));

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 1)
	{
		sB = arVals.GetAt(0);

		for (int i = 0; i < 5; i++)
		{
			if (sB.CompareNoCase(ssBs[i]) == 0)
			{
				return i;
			}
		}
	}
	else//无等级查询
	{
		sSQL.Format(_T("select [结构] from AecSpecBranch where [主管]=%d and [支管]=%d"), (int)(dDn + 0.5), (int)(ddn + 0.5));
		pDb->GetSelData(sSQL, arVals);

		if (arVals.GetSize() >= 1)
		{
			sB = arVals.GetAt(0);

			for (int i = 0; i < 5; i++)
			{
				if (sB.CompareNoCase(ssBs[i]) == 0)
				{
					return i;
				}
			}
		}
	}
	return 0;
}

BOOL TDbPipeSupport::QueryRP(CUIISQLiteServer *pDb, double dDn, AecDbObjXDataMap *pXDataMap)
{
	CString sSQL;
	sSQL.Format(_T("select [外径D2],[壁厚] from [AecRp] where [接管公称直径]=%d"), (int)(dDn + 0.5));

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 2)
	{
		pXDataMap->SetAt(PIPE_D, _ttof(arVals.GetAt(0)));
		pXDataMap->SetAt(PIPE_THICK, _ttof(arVals.GetAt(1)));
		return TRUE;
	}
	return FALSE;
}

BOOL TDbPipeSupport::QueryHP(CUIISQLiteServer *pDb, double dDn, AecDbObjXDataMap *pXDataMap)
{
	CString sSQL;
	sSQL.Format(_T("select [外径],[长度] from [AecHp] where [接管公称直径]=%d"), (int)(dDn + 0.5));

	CStringArray arVals;
	pDb->GetSelData(sSQL, arVals);

	if (arVals.GetSize() >= 2)
	{
		pXDataMap->SetAt(PIPE_D, _ttof(arVals.GetAt(0)));
		pXDataMap->SetAt(KEY_L, _ttof(arVals.GetAt(1)));
		return TRUE;
	}
	return FALSE;
}