#include "stdafx.h"
#include "globalFunc.h"
#include "AcDbObjectPtr.h"
#include "DbWell.h"
#include "MSWORD8.h"
#include "xtext.h"
#include "DbPool.h"
#include "Dbpipe.h"
#include "layerdef.h"
#include "EntitySet.h"
#include "RBGroups.h"
#include "PickEntSet.h"
//#include "CalcSheetDlg.h"
//#include "TWordFormulasTemplet.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

//extern int DoSerialNumber(SSearchPipeList *pListLast, int idx, BOOL IsMainNode);
//extern double CalcPipeV(double nDn, double nI, double n);
//extern double CalcPipeV(double nQ, double nDn, double nI, double n);
//extern BOOL CheckWellSys(SSearchPipeList *pListAll, BOOL bChcekPool);
//
extern void SetPipeLabelType(CDbPipe *pPipe);

namespace
{
	double CalcPipeV(double nDn, double nI, double n)
	{
		double nTemp = 1 / n;
		nI = pow(nI, 0.5);
		double nR = pow(0.25 * nDn, 2.0 / 3.0);
		return nTemp * nI * nR;
	}

	double CalcPipeV(double nQ, double nDn, double nI, double n)
	{
		double nRet(-1);
		double nTemp = 1 / n;
		nI = pow(nI, 0.5);
		double nR = pow(0.25 * nDn, 2.0 / 3.0);
		nRet = nTemp * nI * nR;
		double nTempQ = (0.25 * nDn * nDn * PI) * nRet;
		if (nTempQ < nQ && nDn < 2.750)
			return -1;
		return nRet;
		//    double nRet(-1);
		//    double nArea(0);
		//    nArea = PI/4.0 * nDn * nDn;
		//    nRet = nQ / nArea;
		//    return nRet;
	}
}

//***************************************************************************************************
//                                        显示面积
//***************************************************************************************************
int g_iShowRainArea = 1;

int GetRainAreaState()
{
	ads_retint(g_iShowRainArea);
	return RTNORM;
}

/*int SetRainAreaState()
{
	CString csAreaLayer = LAY_CALC_AREA;  // 8.0发行之前要修改过来

	if(g_iShowRainArea == 1)
		g_iShowRainArea = 0;
	else
		g_iShowRainArea = 1;
	TDocLock vLock;
	RBList rbMask(RTDXF0, _T("ATS_SPACE"), 8, csAreaLayer, NULL);
	PickSet ssAll(SS_FREE);
	ssAll.Get(_T("X"), NULL, NULL, rbMask);
	for(long j=0;j<ssAll.Length();j++){
		Entity ent = ssAll[j];
		OPENOBJ_BEGIN(ent, AcDb::kForWrite, TDbSpace, pSpace);
		if(pSpace){
			if(g_iShowRainArea == 1)
				pSpace->setVisibility(AcDb::kVisible);
			else
				pSpace->setVisibility(AcDb::kInvisible);
			pSpace->SetHighlight(TRUE);
		}
		OPENOBJ_END();
	}
	SetLayerOnOff(csAreaLayer, g_iShowRainArea);

	return GetRainAreaState();
}*/

extern void UpdateRainWellArea();

//***************************************************************************************************
//                                        雨水水力
//***************************************************************************************************
//extern void GlobalFunc::GetPipeSpecList(DList<int> &lstSpec, const TCHAR* szMat);


int DoPlusRainDn(int dn, BOOL bPlus)
{
	int ret(0);
	if (bPlus) { //增大一级管径
		if (dn <= 250)
			ret = 300;
		else if (dn == 300)
			ret = 350;
		else if (dn == 350)
			ret = 400;
		else if (dn == 400)
			ret = 450;
		else if (dn == 450)
			ret = 500;
		else if (dn == 500)
			ret = 600;
		else if (dn == 600)
			ret = 700;
		else if (dn == 700)
			ret = 800;
		else if (dn == 800)
			ret = 900;
		else if (dn == 900)
			ret = 1000;
		else if (dn == 1000)
			ret = 1100;
		else if (dn == 1100)
			ret = 1200;
		else if (dn == 1200)
			ret = 1350;
		else if (dn == 1350)
			ret = 1500;
		else if (dn == 1500)
			ret = 1650;
		else if (dn == 1650)
			ret = 1800;
		else if (dn == 1800)
			ret = 2000;
		else if (dn == 2000)
			ret = 2100;
		else if (dn == 2100)
			ret = 2200;
		else if (dn == 2200)
			ret = 2300;
		else if (dn == 2300)
			ret = 2400;
		else if (dn == 2400)
			ret = 2500;
		else if (dn == 2500)
			ret = 2600;
		else if (dn == 2600)
			ret = 2700;
		else if (dn == 2700)
			ret = 2800;
		else if (dn == 2800)
			ret = 2900;
		else if (dn == 2900)
			ret = 3000;
		else
			ret = 3000;
	}
	else {
		if (dn <= 300)
			ret = 250;
		else if (dn == 350)
			ret = 300;
		else if (dn == 400)
			ret = 350;
		else if (dn == 450)
			ret = 400;
		else if (dn == 500)
			ret = 450;
		else if (dn == 600)
			ret = 500;
		else if (dn == 700)
			ret = 600;
		else if (dn == 800)
			ret = 700;
		else if (dn == 900)
			ret = 800;
		else if (dn == 1000)
			ret = 900;
		else if (dn == 1100)
			ret = 1000;
		else if (dn == 1200)
			ret = 1100;
		else if (dn == 1350)
			ret = 1200;
		else if (dn == 1500)
			ret = 1350;
		else if (dn == 1650)
			ret = 1500;
		else if (dn == 1800)
			ret = 1650;
		else if (dn == 2000)
			ret = 1800;
		else if (dn == 2100)
			ret = 2000;
		else if (dn == 2200)
			ret = 2100;
		else if (dn == 2300)
			ret = 2200;
		else if (dn == 2400)
			ret = 2300;
		else if (dn == 2500)
			ret = 2400;
		else if (dn == 2600)
			ret = 2500;
		else if (dn == 2700)
			ret = 2600;
		else if (dn == 2800)
			ret = 2700;
		else if (dn == 2900)
			ret = 2800;
		else if (dn == 3000)
			ret = 2900;
	}

	return ret;
}

int GetDnBySpecList(int dn)
{
	DList<int> lstSpec;
	GlobalFunc::GetPipeSpecList(lstSpec, _T("钢筋混凝土管"));
	int idx = -1;
	int len = lstSpec.Length();
	for (int j = 0; j < lstSpec.Length(); j++) {
		int iDnTmp = *lstSpec[j];
		if (iDnTmp == dn)
			return dn;
		if (iDnTmp > dn)
			return iDnTmp;
	}
	return dn;
}

int PlusRainDn(int dn, BOOL bPlus)
{
	DList<int> lstSpec;
	GlobalFunc::GetPipeSpecList(lstSpec, _T("钢筋混凝土管"));
	int idx = -1;
	int len = lstSpec.Length();
	for (int j = 0; j < lstSpec.Length(); j++) {
		int iDnTmp = *lstSpec[j];
		if (iDnTmp == dn) {
			idx = j;
			break;
		}
		if (iDnTmp > dn && bPlus) {
			return iDnTmp;
		}
		else if (iDnTmp > dn && !bPlus && j > 1) {
			iDnTmp = *lstSpec[j - 1];
			return iDnTmp;
		}
	}


	int ret(dn);
	if (bPlus && idx != len - 1)
		ret = *lstSpec[idx + 1];
	else if (!bPlus && idx != 0)
		ret = *lstSpec[idx - 1];
	return ret;
}

// 根据<<给水排水管网系统>> P55 按充满度为1 进行计算管径
int GetFirstPipeDnByQ2(double nQ, double nN, double nI, double &nRetV)
{
	int dn = 300;//小区道路最小是300

	double dTmp = pow(nQ / 1000.0, 3.0 / 8.0);
	double dTmp2 = pow(nI / 1000.0, 3.0 / 16.0);
	dTmp = dTmp / dTmp2 * 0.304 * 1000;


	dTmp -= 0.1;

	if (dTmp < 300)
		dn = 300;
	else if (dTmp < 350)
		dn = 350;
	else if (dTmp < 400)
		dn = 400;
	else if (dTmp < 450)
		dn = 450;
	else if (dTmp < 500)
		dn = 500;
	else if (dTmp < 600)
		dn = 600;
	else if (dTmp < 700)
		dn = 700;
	else if (dTmp < 800)
		dn = 800;
	else if (dTmp < 900)
		dn = 900;
	else if (dTmp < 1000)
		dn = 1000;
	else if (dTmp < 1100)
		dn = 1100;
	else if (dTmp < 1200)
		dn = 1200;
	else if (dTmp < 1350)
		dn = 1350;
	else if (dTmp < 1500)
		dn = 1500;
	else if (dTmp < 1650)
		dn = 1650;
	else if (dTmp < 1800)
		dn = 1800;
	else if (dTmp < 2000)
		dn = 2000;
	else if (dTmp < 2100)
		dn = 2100;
	else if (dTmp < 2200)
		dn = 2200;
	else if (dTmp < 2300)
		dn = 2300;
	else if (dTmp < 2400)
		dn = 2400;
	else if (dTmp < 2500)
		dn = 2500;
	else if (dTmp < 2600)
		dn = 2600;
	else if (dTmp < 2700)
		dn = 2700;
	else
		dn = 2800;




	double nRadius = (double)dn / 1000;
	nRetV = CalcPipeV(nQ / 1000.0, nRadius, nI / 1000.0, nN);
	return dn;
}

// 初算管径 已知坡度
// 已知流量 以及 粗糙系数  根据 流速不能小于 0.6 原则, 给出最大管径
int GetFirstPipeDnByQ3(double nQ, double nN, double nI, double &nRetV)
{
	BOOL bMetal = FALSE;
	if (fabs(nN - 0.012) < 0.001 || fabs(nN - 0.013) < 0.001 || fabs(nN - 0.014) < 0.001)
		bMetal = TRUE;

	//以下数字出自：《给水排水管网系统》P217 主要针对于污水管，所以经验流量×1。5 （污水充满度55％）
	int dn = 300;//小区道路最小是300
	if (nQ < 23.9)
		dn = 300;
	else if (nQ < 39.72 * 1.8)
		dn = 350;
	else if (nQ < 51.88 * 1.8)
		dn = 400;
	else if (nQ < 65.66 * 1.8)
		dn = 450;
	else if (nQ < 88.08 * 1.8)
		dn = 500;
	else if (nQ < 126.84 * 1.8)
		dn = 600;
	else if (nQ < 172.65 * 1.8)
		dn = 700;
	else if (nQ < 222.5 * 1.8)
		dn = 800;
	else if (nQ < 285.39 * 1.8)
		dn = 900;
	else if (nQ < 379.11 * 1.8)
		dn = 1000;
	else if (nQ < 458.72 * 1.8)
		dn = 1100;
	else if (nQ < 545.92 * 1.8)
		dn = 1200;
	else if (nQ < 690.93 * 1.8)
		dn = 1350;
	else if (nQ < 853 * 1.8)
		dn = 1500;
	else if (nQ < 1032.13 * 1.8)
		dn = 1650;
	else
		dn = 1800;
	nI = nI / 1000;
	nQ = nQ / 1000;// 把L/S 转化为 M3/S
	double nSlowV = 0.7;
	dn = GetDnBySpecList(dn);
	while (1) {
		double nV(0);
		double nRadius = (double)dn / 1000;
		nV = CalcPipeV(nQ, nRadius, nI, nN);
		while (nV < nSlowV || (nV > 10 && bMetal) || (nV > 5 && !bMetal)) {
			if (nV > nSlowV)
				dn = PlusRainDn(dn, FALSE);
			else
				dn = PlusRainDn(dn, TRUE);
			nRadius = (double)dn / 1000;
			nV = CalcPipeV(nQ, nRadius, nI, nN);
			if (dn == 250) {
				nRetV = nV;
				return dn;
			}
			if (nV < 0) {
				dn = PlusRainDn(dn, TRUE);
				nRadius = (double)dn / 1000;
				nV = CalcPipeV(nRadius, nI, nN);
				break;
			}
		}
		nRetV = nV;
		double nTempQ = (0.25 * nRadius * nRadius * PI) * nV;
		double nTmp = nTempQ - nQ;
		if (nTempQ < nQ && dn < 3000) {
			dn = PlusRainDn(dn, TRUE);   //设计流量不够，管径加大一号
			continue;
		}
		if (dn == 300)
			break;

		//把当前管径小2号，计算设计流量，如果设计流量仍然大于计算流量，就把当前管径小1号
		int iTempDn = PlusRainDn(dn, FALSE);
		iTempDn = PlusRainDn(iTempDn, FALSE);
		double nTempDn = (double)iTempDn / 1000;
		nTempQ = (0.25 * nTempDn * nTempDn * PI) * nV;
		if (nTempQ > nQ && dn > 300) {
			dn = PlusRainDn(dn, FALSE);
			break;
		}
		else
			break;

		if (dn == 300)
			break;
	}
	return dn;
}

// 初算管径
// 已知流量 以及 粗糙系数  根据 流速不能小于 0.6 原则, 给出最大管径
int GetFirstPipeDnByQ(double nQ, double nN, double &nRetI, double &nRetV)
{
	BOOL bMetal = FALSE;
	if (fabs(nN - 0.012) < 0.001 || fabs(nN - 0.013) < 0.001 || fabs(nN - 0.014) < 0.001)
		bMetal = TRUE;
	double nTempI = 0.003;
	//以下数字出自：《给水排水管网系统》P217 主要针对于污水管，所以经验流量×1。5 （污水充满度55％）
	int dn = 300;//小区道路最小是300
	if (nQ < 23.9)
		dn = 300;
	//  else if(nQ < 39.72*1.8)
	//      dn = 350;
	else if (nQ < 51.88 * 1.8) {
		dn = 400;
		nTempI = 0.0025;
	}
	//    else if(nQ < 65.66*1.8){
	//        dn = 450;
	//        nTempI = 0.002;
	//    }
	else if (nQ < 88.08 * 1.8) {
		dn = 500;
		nTempI = 0.0015;
	}
	else if (nQ < 126.84 * 1.8) {
		dn = 600;
		nTempI = 0.0015;
	}
	else if (nQ < 172.65 * 1.8) {
		dn = 700;
		nTempI = 0.001;
	}
	else if (nQ < 222.5 * 1.8) {
		dn = 800;
		nTempI = 0.001;
	}
	else if (nQ < 285.39 * 1.8) {
		dn = 900;
		nTempI = 0.001;
	}
	else if (nQ < 379.11 * 1.8) {
		dn = 1000;
		nTempI = 0.001;
	}
	else if (nQ < 458.72 * 1.8) {
		dn = 1100;
		nTempI = 0.001;
	}
	else if (nQ < 545.92 * 1.8) {
		dn = 1200;
		nTempI = 0.0005;
	}
	else if (nQ < 690.93 * 1.8) {
		dn = 1350;
		nTempI = 0.0005;
	}
	else if (nQ < 853 * 1.8) {
		dn = 1500;
		nTempI = 0.0005;
	}
	else if (nQ < 1032.13 * 1.8) {
		dn = 1650;
		nTempI = 0.0005;
	}
	else {
		dn = 1800;
		nTempI = 0.0005;
	}
	nQ = nQ / 1000;// 把L/S 转化为 M3/S
	double nSlowV = 0.7;
	dn = GetDnBySpecList(dn);

	while (1) {
		double nV(0);
		double nI = nTempI - 0.0005;
		double nRadius = (double)dn / 1000;
		while (nV < nSlowV || (nV > 10 && bMetal) || (nV > 5 && !bMetal)) {
			nI += 0.0005;
			nV = CalcPipeV(nRadius, nI, nN);
			if (dn == 300 && nRetI > 0.003) {
				nI = 0.003;
				nV = CalcPipeV(nRadius, nI, nN);
			}
		}
		nRetI = nI;
		nRetV = nV;
		double nTempQ = (0.25 * nRadius * nRadius * PI) * nV;
		double nTmp = nTempQ - nQ;
		if (nTempQ < nQ && dn < 3000) {
			int dn2 = dn;
			dn = PlusRainDn(dn2, TRUE);   //设计流量不够，管径加大一号
			if (dn == dn2)
				break;
			continue;
		}
		if (dn == 300)
			break;

		//把当前管径小2号，计算设计流量，如果设计流量仍然大于计算流量，就把当前管径小1号
		int iTempDn = PlusRainDn(dn, FALSE);
		iTempDn = PlusRainDn(iTempDn, FALSE);
		double nTempDn = (double)iTempDn / 1000;
		nTempQ = (0.25 * nTempDn * nTempDn * PI) * nV;
		if (nTempQ > nQ && dn > 300) {
			dn = PlusRainDn(dn, FALSE);
			if (dn == 300)
				break;
			else
				continue;
		}
		else
			break;

		if (dn == 300)
			break;
	}
	return dn;
}



//计算本节点往后有多少井
void CalcWellNum(SSearchPipeList *pListAll)
{
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	pListAll->m_iNum = 0;
	if (pListAll->m_iType == 3)
		pListAll->m_iNum = 1;
	ads_name ent;
	acdbGetAdsName(ent, id);
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		CalcWellNum(pList);
		pListAll->m_iNum += pList->m_iNum;
	}
}

extern void ShowPipe(const AcDbObjectId &idPipe);
extern bool HandlePipeDimType(CDbPipe *pPipe, int &nSelType);
bool g_bPipeShow = false; // cet 2012.1.9 add 图面赋值控制变量
int g_nSelType = -1;	  // cet 2012.1.9 add 图面赋值控制变量

//将初算结果标注在图中 管径 & 坡度
void DimRainCalcResult(SSearchPipeList *pListAll)
{
	BOOL bDrawLabel = false; // cet 2012.1.10 add 管线是否显示标注
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	if (pListAll->m_iType == 0) {
		ads_name ent;
		acdbGetAdsName(ent, id);
		XPoint ptStart, ptEnd;
		GlobalFunc::GetPipePoint(ent, ptStart, ptEnd);

		//对于接雨水口的支管，不需要标注
		BOOL bIsLink2Gully = FALSE;
		OPENOBJ_BEGIN(ent, AcDb::kForWrite, CDbPipe, pPipe);
		if (pPipe) {
			bDrawLabel = pPipe->IsDrawLabel(); // cet 2012.1.10 add 记录原始设置
			AcDbObjectId idNode1 = pPipe->GetNode(0);
			OPENOBJ_BEGIN(idNode1, AcDb::kForRead, CDbEquipment, pEquip);
			if (pEquip) {
				TCHAR* szLay = pEquip->layer();
				if (_tcsicmp(szLay, LAY_TWT_GULLY) == 0)
					bIsLink2Gully = TRUE;
				delete[] szLay;
			}
			OPENOBJ_END();
			AcDbObjectId idNode2 = pPipe->GetNode(1);
			OPENOBJ_BEGIN(idNode2, AcDb::kForRead, CDbEquipment, pEquip);
			if (pEquip) {
				TCHAR* szLay = pEquip->layer();
				if (_tcsicmp(szLay, LAY_TWT_GULLY) == 0)
					bIsLink2Gully = TRUE;
				delete[] szLay;
			}
			OPENOBJ_END();
		}
		OPENOBJ_END();

		if (!bIsLink2Gully)
			GlobalFunc::DoDimPipeDn(ent, pListAll->m_iDn, _T("自动"), g_Option::instance().g_nPipeDnHeight, FALSE, FALSE);
		BOOL bReverse = FALSE;
		if (pListAll->m_pPrevious != NULL) { //得到前一节点
			AcDbObjectId idFront = pListAll->m_pPrevious->m_ID;
			XPoint ptNode;
			OPENOBJ_BEGIN(idFront, AcDb::kForRead, CDbPipeNode, pNode);
			if (pNode) {
				ptNode = pNode->GetLocation();
			}
			OPENOBJ_END();
			if (ptStart == ptNode)
				bReverse = TRUE;  //如果前一节点位置等于本管线的起点位置,说明管线画反了
		}
		if (pListAll->m_nI > 0) {
			OPENOBJ_BEGIN(ent, AcDb::kForWrite, CDbPipe, pPipe);
			if (pPipe) {
				pPipe->SetPipeGradient(pListAll->m_nI / 1000);
			}
			OPENOBJ_END();
		}

		// cet 2012.1.10 add 在管线信息更新完毕后设置管线标注以防计算标注信息长度有误
		OPENOBJ_BEGIN(ent, AcDb::kForWrite, CDbPipe, pPipe);
		if (pPipe != NULL)
		{
			pPipe->EnableDrawLabel(bDrawLabel); // 设置为管线原有标注设置
			if (!pPipe->IsDrawLabel())
			{
				SetPipeLabelType(pPipe);
			}
			else
			{
				g_bPipeShow = HandlePipeDimType(pPipe, g_nSelType);
			}

			if (static_cast<int>(pPipe->GetSpare()) == -1)
			{
				pPipe->EnableDrawLabel(FALSE);
			}
			else
			{
				pPipe->EnableDrawLabel(TRUE);
			}
		}
		OPENOBJ_END();
		// 显示交叉线
		if (g_bPipeShow)
		{
			ShowPipe(id);
			GlobalFunc::AnyKeyReturn(_T("\n按任意键继续查找下一段待修改管标注..."));
		}
	}
	else if (pListAll->m_iType == 3) {
		if (pListAll->m_pPrevious != NULL) {
			ads_name ent;
			acdbGetAdsName(ent, pListAll->m_ID);
			GlobalFunc::WriteXdata(ent, _T("TG-DIRTWELLQ"), XString(_T("%.2f"), pListAll->m_pPrevious->m_nPipeQ));
		}
	}
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		DimRainCalcResult(pList);
	}
}

//将每个井的汇流面积写入链表
// m_nDang         记录本井汇流面积
// m_nStartPress   记录总汇流面积
// m_iNum          记录径流系数
BOOL SetWellArea(SSearchPipeList *pListAll, BOOL &bHasArea)
{
	BOOL bRet = TRUE;
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	if (GlobalFunc::IsWell(id))
		pListAll->m_iType = 3;
	if (pListAll->m_iType == 3) {
		ads_name ent;
		acdbGetAdsName(ent, id);
		CString csArea = GlobalFunc::ReadXdata(ent, _T("TG-WELLAREA"));
		CString csFactor = GlobalFunc::ReadXdata(ent, _T("TG-RAINWELLFACTOR"));
		CString csP = GlobalFunc::ReadXdata(ent, _T("TG-RAINWELLP"));
		CString csTime = GlobalFunc::ReadXdata(ent, _T("TG-WELLTIME"));
		int iFactor = int(_tstof(csFactor) * 1000);
		pListAll->m_nDang = _tstof(csArea);
		pListAll->m_iNum = iFactor;
		pListAll->m_iSpare = _ttoi(csP);
		if (csTime != _T("") && pListAll->m_lstNode.Length() == 0)//必须是末端井
			pListAll->m_nLost = _tstof(csTime);
		if (pListAll->m_nDang > 0.01)
			bHasArea = TRUE;
		pListAll->m_nStartPress = _tstof(csArea);
	}
	else if (pListAll->m_iType == 0) {
		OPENOBJ_BEGIN(id, AcDb::kForRead, CDbPipe, pPipe);
		if (pPipe) {
			pListAll->m_nLength = pPipe->Length();
			//			if(!DocGetMeterUnitDraw())
				//			pListAll->m_nLength = pListAll->m_nLength/1000;
		}
		OPENOBJ_END();
	}
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		bRet = SetWellArea(pList, bHasArea);
		pListAll->m_nStartPress += pList->m_nStartPress; //m_nStartPress记录总汇流面积
	}
	return bRet;
}


BOOL IsDirtPool(AcDbObjectId idNode)
{
	if (!idNode)
		return FALSE;
	OPENOBJ_BEGIN(idNode, AcDb::kForRead, CDbPool, pEquip);
	if (pEquip)
		return TRUE;
	else
		return FALSE;
	OPENOBJ_END();
}

//将井编号写入链表
BOOL SetWellName(SSearchPipeList *pListAll)
{
	BOOL bRet = TRUE;
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	if (GlobalFunc::IsWell(id))
		pListAll->m_iType = 3;

	if (IsDirtPool(id))
		pListAll->m_iType = 4;

	if (pListAll->m_iType == 3) {
		pListAll->m_csName = GlobalFunc::GetWellName(id);
		if (pListAll->m_csName == _T(""))
			return FALSE;
	}
	if (pListAll->m_iType == 4) {
		pListAll->m_csName = _T("HC");
	}
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		bRet = SetWellName(pList);
		if (!bRet)
			return FALSE;
	}
	return bRet;
}

//返回用户选择的最远井所在链表的位置
SSearchPipeList *GetWellNode(SSearchPipeList *pListAll, Entity entLongWell, SSearchPipeList *pNode)
{
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	ads_name ent;
	acdbGetAdsName(ent, id);
	Entity entTmp = ent;
	if (entTmp == entLongWell)
		return pListAll;
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		pNode = GetWellNode(pList, entLongWell, pNode);
	}
	return pNode;
}

//得到下一个计算支路的起点节点 根据流量是否为0且最远
SSearchPipeList *GetNextCalcWell(SSearchPipeList *pListAll, SSearchPipeList *pDisadvantage)
{
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	double nCurPipeLength(0);
	if (pListAll->m_nPipeQ == 0 && pListAll->m_iType == 3) {
		nCurPipeLength = pListAll->m_nLength;
		if (pDisadvantage) {
			if (nCurPipeLength > pDisadvantage->m_nLength)
				pDisadvantage = pListAll;
		}
		else
			pDisadvantage = pListAll;        //条件3: 临时节点为空
	}
	int len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		pDisadvantage = GetNextCalcWell(pList, pDisadvantage);
	}
	return pDisadvantage;
}

CString TransformDouble2String(double dDouble, int iPre)
{
	CString csRet;
	CString csNote;
	csNote.Format(_T("%d"), iPre--);
	CString sFormat = _T("%.") + csNote + _T("f");
	csRet.Format(sFormat, dDouble);
	while (csRet.ReverseFind(_T('0')) > 0 && iPre >= 0)
	{
		csNote.Format(_T("%d"), iPre--);
		CString sFormat = _T("%.") + csNote + _T("f");
		csRet.Format(sFormat, dDouble);
	}
	return csRet;
}

//输出计算书函数
/*
void ImportRainCalcWord(DList<SSearchPipeList> &lstNode, DList<SSearchPipeList> &lstWell, CCalcRainWellDlg &dlg)
{
	int len = lstNode.Length();
	if(len < 1)
		return;
	int len2 = lstWell.Length();
	if(len2 < 1)
		return;

	// 打开公式模板 zxl 2013.12.31 add
	TWordFormulasTemplet wdFormula;
	CString sPathName = g_csSysPath;
	sPathName += _T("formula.doc");
	if (!wdFormula.OpenWordFormulasTempletFile(sPathName))
	{
		return;
	}

	//初始化
	COleVariant vtOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR), vtTrue((short)TRUE), vtFalse((short)FALSE);
	_Application	wordApplication;
	Documents		wordDocuments;
	_Document       activeDocument;
	Paragraphs		wordParagraphs;
	Selection		wordSelection;

	if (!wordApplication.CreateDispatch(_T("Word.Application")))
	{
		AfxMessageBox(_T("不能执行Microsoft Word 8.0!"));
		return;
	}
	wordApplication.SetVisible(TRUE);
	wordDocuments = wordApplication.GetDocuments();
	activeDocument = wordDocuments.Add(vtOptional,vtOptional);

	wordSelection = wordApplication.GetSelection();
	wordParagraphs = wordSelection.GetParagraphs();
	wordParagraphs.SetAlignment(1);  // 0: 居左  1：居中  2：居右

	CString csFisrt = lstWell[0]->m_csName;
	CString csLast = lstWell[len2-1]->m_csName;
	CString csTitle = _T("室外雨水井") + csFisrt + _T(" ~ ") + csLast +  _T("水力计算书\n\n");


	wordSelection.TypeText(csTitle);

	//写一行字
	wordSelection = wordApplication.GetSelection();
	wordParagraphs = wordSelection.GetParagraphs();
	wordParagraphs.SetAlignment(0);  // 0: 居左  1：居中  2：居右

	// zxl 2014.01.03 add
	_Font font;
	font = wordSelection.GetFont();
	wordSelection.TypeText(_T("计算原理参照《室外排水设计规范》GB 50014-2006（2011版），《给水排水设计手册》（第五册城镇排水） \n"));
	wordSelection.TypeText(_T("一、基本计算公式 \n"));
	wordSelection.TypeText(_T("1、降雨强度公式： \n"));
	wordSelection.TypeText(_T("                    "));
	wdFormula.InsertFormula(WORD_FORMULA30, wordSelection);
	wordSelection.TypeText(_T("mm/min"));
	wordSelection.TypeText(_T(""));
	wordSelection.TypeText(_T("\n		式中：		i —— 降雨强度（mm/min）"));
	wordSelection.TypeText(_T("\n					其中：1mm/min=1L/（m"));
	font.SetSuperscript(2); //处理上标
	wordSelection.TypeText(_T("2"));
	font.SetSuperscript(0);
	wordSelection.TypeText(_T("·min）= 10000L/（min·公顷）"));
	wordSelection.TypeText(_T("\n					t —— 降雨历时（min）"));
	wordSelection.TypeText(_T("\n					雨水管渠的设计降雨历时公式："));
	wordSelection.TypeText(_T("\n									"));
	wdFormula.InsertFormula(WORD_FORMULA31, wordSelection);
	wordSelection.TypeText(_T("\n					t —— 降雨历时（min）；"));
	wordSelection.TypeText(_T("\n					t"));
	font.SetSubscript(2); //处理下标
	wordSelection.TypeText(_T("1"));
	font.SetSubscript(0);
	wordSelection.TypeText(_T(" —— 地面集水时间（min），视距离长短、地形坡度和地面铺盖情"));
	wordSelection.TypeText(_T("							况而定，一般采用5～10min"));
	wordSelection.TypeText(_T("\n					m —— 折减系数"));
	wordSelection.TypeText(_T("\n					t"));
	font.SetSubscript(2); //处理下标
	wordSelection.TypeText(_T("2"));
	font.SetSubscript(0);
	wordSelection.TypeText(_T(" —— 管渠内雨水流行时间（min）\n									"));
	wdFormula.InsertFormula(WORD_FORMULA32, wordSelection);
	wordSelection.TypeText(_T("\n					L"));
	font.SetSubscript(2); //处理下标
	wordSelection.TypeText(_T("i"));
	font.SetSubscript(0);
	wordSelection.TypeText(_T(" —— 为设计断面上游各管道的长度（m）"));
	wordSelection.TypeText(_T("\n					v"));
	font.SetSubscript(2); //处理下标
	wordSelection.TypeText(_T("i"));
	font.SetSubscript(0);
	wordSelection.TypeText(_T(" —— 为上游管段的设计流速（m/s）"));
	wordSelection.TypeText(_T("\n					P —— 设计重现期（年）"));
	wordSelection.TypeText(_T("\n		  A，C，n，B —— 参数，根据统计方法进行计算确定."));
	wordSelection.TypeText(_T("\n2、暴雨强度公式："));
	wordSelection.TypeText(_T("\n                    "));
	wdFormula.InsertFormula(WORD_FORMULA33, wordSelection);
	wordSelection.TypeText(_T("	 L/（s·公顷）"));
	wordSelection.TypeText(_T("\n		式中：		q —— 设计暴雨强度L/（s·公顷）、L/（s·hm"));
	font.SetSuperscript(2); //处理上标
	wordSelection.TypeText(_T("2"));
	font.SetSuperscript(0);
	wordSelection.TypeText(_T("）、L/（s·10"));
	font.SetSuperscript(2); //处理上标
	wordSelection.TypeText(_T("4"));
	font.SetSuperscript(0);
	wordSelection.TypeText(_T("m"));
	font.SetSuperscript(2); //处理上标
	wordSelection.TypeText(_T("2"));
	font.SetSuperscript(0);
	wordSelection.TypeText(_T("）"));
	wordSelection.TypeText(_T("\n3、雨水设计流量公式："));
	wordSelection.TypeText(_T("\n		                    "));
	wdFormula.InsertFormula(WORD_FORMULA34, wordSelection);
	wordSelection.TypeText(_T("\n		式中："));
	wordSelection.TypeText(_T("      Q —— 雨水设计流量（L/s）"));
	wordSelection.TypeText(_T("\n                    q —— 设计降雨强度  L/（s·公顷）"));
	wordSelection.TypeText(_T("\n					ψ—— 径流系数"));
	wordSelection.TypeText(_T("\n                    F —— 汇水面积（ha 、10"));
	font.SetSuperscript(2); //处理上标
	wordSelection.TypeText(_T("4"));
	font.SetSuperscript(0);
	wordSelection.TypeText(_T("m"));
	font.SetSuperscript(2); //处理上标
	wordSelection.TypeText(_T("2"));
	font.SetSuperscript(0);
	wordSelection.TypeText(_T("）"));
	wordSelection.TypeText(_T("\n4、流速公式："));
	wordSelection.TypeText(_T("\n							"));
	wdFormula.InsertFormula(WORD_FORMULA35, wordSelection);
	wordSelection.TypeText(_T("\n		式中："));
	wordSelection.TypeText(_T("		V —— 流速（m/s）"));
	wordSelection.TypeText(_T("\n					R —— 水力半径（m）"));
	wordSelection.TypeText(_T("\n					I —— 水力坡度"));
	wordSelection.TypeText(_T("\n					n —— 粗糙系数"));
	wordSelection.TypeText(_T("\n5、泄流量公式："));
	wordSelection.TypeText(_T("\n							"));
	wdFormula.InsertFormula(WORD_FORMULA36, wordSelection);
	wordSelection.TypeText(_T("\n		式中："));
	wordSelection.TypeText(_T("      Q —— 泄流量（m"));
	font.SetSuperscript(2); //处理上标
	wordSelection.TypeText(_T("3"));
	font.SetSuperscript(0);
	wordSelection.TypeText(_T("/s）"));
	wordSelection.TypeText(_T("\n					V —— 流速（m/s）"));
	wordSelection.TypeText(_T("\n					A —— 管截面积（m"));
	font.SetSuperscript(2); //处理上标
	wordSelection.TypeText(_T("2"));
	font.SetSuperscript(0);
	wordSelection.TypeText(_T("）"));
	wordSelection.TypeText(_T("\n二、计算参数"));
	wordSelection.TypeText(_T("\n1、地区："));
	wordSelection.TypeText(dlg.m_csProvince);
	wordSelection.TypeText(_T(" "));
	wordSelection.TypeText(dlg.m_csCity);
	wdFormula.CloseFile();

	Selection wSelection = wordApplication.GetSelection();
	wSelection.TypeParagraph();
	//画表格
	int nrows(2), ncolumns(4);
	wSelection = wordApplication.GetSelection();
	Range	oRange = wSelection.GetRange();
	Tables	oTables = activeDocument.GetTables();
	_Table	oTable = oTables.Add(oRange, nrows, ncolumns);

	Borders oBordersn = oTable.GetBorders();
	oBordersn.SetInsideLineStyle(1); // 设置表格线型
	oBordersn.SetOutsideLineStyle(1);

	Columns		oColumns;
	Column		oColumn;
	oColumns = oTable.GetColumns();
	oColumn = oColumns.Item(1);
	oColumn.SetWidth(110, 0);   // 0 = wdAdjustNone
	oColumn = oColumns.Item(2);
	oColumn.SetWidth(110, 0);
	oColumn = oColumns.Item(3);
	oColumn.SetWidth(110, 0);
	oColumn = oColumns.Item(4);
	oColumn.SetWidth(110, 0);


	Cell		oCell;
	oCell = oTable.Cell(1, 1);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("A"));

	oCell = oTable.Cell(1, 2);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("B"));

	oCell = oTable.Cell(1, 3);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("C"));

	oCell = oTable.Cell(1, 4);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("n"));

	oCell = oTable.Cell(2, 1);
	oRange = oCell.GetRange();
	oRange.InsertAfter(dlg.m_csA);

	oCell = oTable.Cell(2, 2);
	oRange = oCell.GetRange();
	oRange.InsertAfter(dlg.m_csB);

	oCell = oTable.Cell(2, 3);
	oRange = oCell.GetRange();
	oRange.InsertAfter(dlg.m_csC);

	oCell = oTable.Cell(2, 4);
	oRange = oCell.GetRange();
	oRange.InsertAfter(dlg.m_csN);

	wordSelection = wordApplication.GetSelection();
	wordSelection.GoTo(COleVariant((short)3),       // 3 = wdGoToLine
		COleVariant((short)-1),vtOptional,vtOptional);  // -1 = wdGoToLast

	wordSelection.TypeText(XString(_T("2、重现期：%s年"), TransformDouble2String(dlg.m_nP, 3)));
	wordSelection.TypeText(XString(_T("\n3、汇流时间：%smin"), TransformDouble2String(dlg.m_dTime, 3)));
	wordSelection.TypeText(XString(_T("\n4、径流系数：%s"), TransformDouble2String(dlg.m_nFactor, 3)));
	wordSelection.TypeText(XString(_T("\n5、折减系数：%s"), TransformDouble2String(dlg.m_dM, 3)));
	wordSelection.TypeText(_T("\n6、粗糙系数："));

	wSelection = wordApplication.GetSelection();
	wSelection.TypeParagraph();

	//画表格
	nrows = dlg.m_mapMeratialN.size() + 1, ncolumns = 2;
	wSelection = wordApplication.GetSelection();
	oRange = wSelection.GetRange();
	oTables = activeDocument.GetTables();
	oTable = oTables.Add(oRange, nrows, ncolumns);

	oBordersn = oTable.GetBorders();
	oBordersn.SetInsideLineStyle(1); // 设置表格线型
	oBordersn.SetOutsideLineStyle(1);

	oColumns = oTable.GetColumns();
	oColumn = oColumns.Item(1);
	oColumn.SetWidth(200, 0);   // 0 = wdAdjustNone
	oColumn = oColumns.Item(2);
	oColumn.SetWidth(100, 0);

	oCell = oTable.Cell(1, 1);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管材"));

	oCell = oTable.Cell(1, 2);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("粗糙系数"));
	std::map<CString, double>::iterator it;
	int iIndex = 0;
	for ( it = dlg.m_mapMeratialN.begin(); it != dlg.m_mapMeratialN.end(); it++)
	{
		oCell = oTable.Cell(iIndex+2, 1);
		oRange = oCell.GetRange();
		oRange.InsertAfter(it->first);

		oCell = oTable.Cell(iIndex+2, 2);
		oRange = oCell.GetRange();
		oRange.InsertAfter(XString(_T("%.3f"), it->second));
		iIndex++;
	}

	wordSelection = wordApplication.GetSelection();
	wordSelection.GoTo(COleVariant((short)3),       // 3 = wdGoToLine
		COleVariant((short)-1),vtOptional,vtOptional);  // -1 = wdGoToLast
	wSelection = wordApplication.GetSelection();
	wSelection.TypeParagraph();

	wordSelection.TypeText(_T("三、计算结果："));
	Selection wSelection2 = wordApplication.GetSelection();
	wSelection2.TypeParagraph();
	wordSelection.TypeText(_T("主干管线信息：\n"));    //画表格
	int rows(len+1), columns(7);

	wSelection = wordApplication.GetSelection();
	oRange = wSelection.GetRange();
	oTables = activeDocument.GetTables();
	oTable = oTables.Add(oRange, rows, columns);
	// cet 2010.3.25 add
	Borders oBorders = oTable.GetBorders();
	oBorders.SetInsideLineStyle(1); // 设置表格线型
	oBorders.SetOutsideLineStyle(1);

	oColumns = oTable.GetColumns();
	oColumn = oColumns.Item(1);
	oColumn.SetWidth(60, 0);   // 0 = wdAdjustNone
	oColumn = oColumns.Item(2);
	oColumn.SetWidth(60, 0);
	oColumn = oColumns.Item(3);
	oColumn.SetWidth(70, 0);
	oColumn = oColumns.Item(4);
	oColumn.SetWidth(50, 0);
	oColumn = oColumns.Item(5);
	oColumn.SetWidth(50, 0);
	oColumn = oColumns.Item(6);
	oColumn.SetWidth(65, 0);
	oColumn = oColumns.Item(7);
	oColumn.SetWidth(75, 0);

	oCell = oTable.Cell(1, 1);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管段名称"));

	oCell = oTable.Cell(1, 2);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管径mm"));

	oCell = oTable.Cell(1, 3);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管道流量L/s"));

	oCell = oTable.Cell(1, 4);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管长m"));



	oCell = oTable.Cell(1, 5);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("流速m/s"));

	oCell = oTable.Cell(1, 6);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("水力坡降‰"));

	oCell = oTable.Cell(1, 7);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("管材"));


	for(int i=0; i<len; i++){
		CString csTmp;
		oCell = oTable.Cell(i+2, 1);  //管段名称
		oRange = oCell.GetRange();
		oRange.InsertAfter(lstNode[i]->m_csName);

		csTmp.Format(_T("%d"), lstNode[i]->m_iDn);
		oCell = oTable.Cell(i+2, 2);
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.2f"), lstNode[i]->m_nPipeQ);
		oCell = oTable.Cell(i+2, 3);  //管道流量L/s
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

	   // if(DocGetMeterUnitDraw())
		//	csTmp.Format(_T("%.2f"), lstNode[i]->m_nLength);
	//	else
		csTmp.Format(_T("%.2f"), lstNode[i]->m_nLength);

		oCell = oTable.Cell(i+2, 4);  //管长m
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);


		csTmp.Format(_T("%.2f"), lstNode[i]->m_nV);
		oCell = oTable.Cell(i+2, 5);  //流速m/s
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.3f"), lstNode[i]->m_nI);
		oCell = oTable.Cell(i+2, 6);   //水力坡降mH2O/m
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);


		OPENOBJ_BEGIN(lstNode[i]->m_ID, AcDb::kForRead, CDbPipe, pPipe);
		if(pPipe){
			csTmp = GetPipeMaterialByIdx(pPipe->GetMaterial());
		}
		OPENOBJ_END();
		oCell = oTable.Cell(i+2, 7);   //管材
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

	}

	wordSelection = wordApplication.GetSelection();
	wordSelection.GoTo(COleVariant((short)3),       // 3 = wdGoToLine
		COleVariant((short)-1),vtOptional,vtOptional);  // -1 = wdGoToLast

	wSelection = wordApplication.GetSelection();
	wSelection.TypeParagraph();

	wordSelection.TypeText(_T("主要井信息:\n"));

	//画表格
	rows = len2+1;
	columns = 6;

	wSelection = wordApplication.GetSelection();
	oRange = wSelection.GetRange();
	oTables = activeDocument.GetTables();
	oTable = oTables.Add(oRange, rows, columns);
	// cet 2010.3.25 add
	oBorders = oTable.GetBorders();
	oBorders.SetInsideLineStyle(1); // 设置表格线型
	oBorders.SetOutsideLineStyle(1);

	oColumns = oTable.GetColumns();
	oColumn = oColumns.Item(1);
	oColumn.SetWidth(50, 0);   // 0 = wdAdjustNone
	oColumn = oColumns.Item(2);
	oColumn.SetWidth(55, 0);
	oColumn = oColumns.Item(3);
	oColumn.SetWidth(85, 0);
	oColumn = oColumns.Item(4);
	oColumn.SetWidth(85, 0);
	oColumn = oColumns.Item(5);
	oColumn.SetWidth(75, 0);
	oColumn = oColumns.Item(6);
	oColumn.SetWidth(88, 0);



	oCell = oTable.Cell(1, 1);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("井编号"));


	oCell = oTable.Cell(1, 2);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("流量L/s"));


	oCell = oTable.Cell(1, 3);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("汇流面积平方米"));

	oCell = oTable.Cell(1, 4);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("总面积平方米"));

	oCell = oTable.Cell(1, 5);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("汇流时间min"));

	oCell = oTable.Cell(1, 6);
	oRange = oCell.GetRange();
	oRange.InsertAfter(_T("暴雨强度L/s/顷"));


	for(i=0; i<len2; i++){
		CString csTmp;
		oCell = oTable.Cell(i+2, 1);  //管段名称
		oRange = oCell.GetRange();
		oRange.InsertAfter(lstWell[i]->m_csName);

		csTmp.Format(_T("%.2f"), lstWell[i]->m_nPipeQ);
		oCell = oTable.Cell(i+2, 2);  //管道流量L/s
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);


		csTmp.Format(_T("%.0f"), lstWell[i]->m_nDang);
		oCell = oTable.Cell(i+2, 3);  //当量长度m
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.0f"), lstWell[i]->m_nStartPress);
		oCell = oTable.Cell(i+2, 4);
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.2f"), lstWell[i]->m_nLost);
		oCell = oTable.Cell(i+2, 5);
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

		csTmp.Format(_T("%.2f"), lstWell[i]->m_nSpare);
		oCell = oTable.Cell(i+2, 6);   //暴雨强度
		oRange = oCell.GetRange();
		oRange.InsertAfter(csTmp);

	}

	wordSelection = wordApplication.GetSelection();
	wordSelection.GoTo(COleVariant((short)3),       // 3 = wdGoToLine
		COleVariant((short)-1),vtOptional,vtOptional);  // -1 = wdGoToLast

	wSelection = wordApplication.GetSelection();
	wSelection.TypeParagraph();

}
*/

//将其它井加入输出列表
void GetOtherWellNode(SSearchPipeList *pListAll, DList<SSearchPipeList> &lstWell)
{
	if (pListAll->m_iType == 3) {
		SSearchPipeList *pNodeNew = new SSearchPipeList();
		pNodeNew->m_iDn = pListAll->m_iDn;
		pNodeNew->m_csName = pListAll->m_csName;
		pNodeNew->m_nLength = pListAll->m_nLength;
		pNodeNew->m_nPipeQ = pListAll->m_nPipeQ;
		pNodeNew->m_nDang = pListAll->m_nDang;
		pNodeNew->m_nStartPress = pListAll->m_nStartPress;
		pNodeNew->m_nI = pListAll->m_nI;
		pNodeNew->m_nV = pListAll->m_nV;
		pNodeNew->m_nLost = pListAll->m_nLost;
		pNodeNew->m_nSpare = pListAll->m_nSpare;

		int len = lstWell.Length();
		BOOL bFlag = FALSE;
		for (int i = 0; i < len; i++) {
			if (pNodeNew->m_csName == lstWell[i]->m_csName) {
				bFlag = TRUE;
				break;
			}
		}
		if (!bFlag)
			lstWell.Append(pNodeNew);
	}
	long len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		GetOtherWellNode(pList, lstWell);
	}
}

//得到下一个标注节点   根据节点编号是否为空
//3个条件
SSearchPipeList *GetLongestWell(SSearchPipeList *pListAll, SSearchPipeList *pDisadvantage)
{
	AcDbObjectId id = NULL;
	id = pListAll->m_ID;
	double nCurPipeLength(0);
	nCurPipeLength = pListAll->m_nLength;

	if (pListAll->m_csName == _T("") && pListAll->m_iType == 3) {
		int idx = GlobalFunc::GetFirstAncestorSerial(pListAll);
		if (pDisadvantage) {
			int idx2 = GlobalFunc::GetFirstAncestorSerial(pDisadvantage);
			if (idx < idx2) {                  //条件1: 当前节点的祖先编号小于临时节点的祖先编号
				pDisadvantage = pListAll;
			}
			else if (idx == 0) {               //条件2: 
				if (pDisadvantage && nCurPipeLength > pDisadvantage->m_nLength)
					pDisadvantage = pListAll;
			}
			else if (idx == idx2) {//条件3: 当前节点的祖先编号等于临时节点的祖先编号, 但离起始节点最远
				int iParentIdx1 = GlobalFunc::GetAncestorSerial(pListAll);
				int iParentIdx2 = GlobalFunc::GetAncestorSerial(pDisadvantage);
				if (iParentIdx1 == iParentIdx2) {
					if (pDisadvantage && nCurPipeLength > pDisadvantage->m_nLength)
						pDisadvantage = pListAll;
				}
				else if (iParentIdx1 < iParentIdx2 || iParentIdx2 == idx2) {
					pDisadvantage = pListAll;
				}
			}
		}
		else
			pDisadvantage = pListAll;        //条件3: 临时节点为空
	}


	int len = pListAll->m_lstNode.Length();
	for (long i = 0; i < len; i++) {
		SSearchPipeList *pList = pListAll->m_lstNode[i];
		pDisadvantage = GetLongestWell(pList, pDisadvantage);
	}
	return pDisadvantage;
}



extern BOOL SetWellData(SSearchPipeList *pListAll, BOOL bFeedSys);

//主函数
/*void RainCalc()
{
	Entity entMainPipe, entLongWell;
	//RBList rbMaskPipe(RTDXF0, _T("AEC_ZT_PIPE"), 8, LAY_PIPE_RAIN, NULL);
	RBList rbMask(RTDXF0, _T("AEC_ZT_WELL"), NULL);

	RBList rbMaskMain = ads_buildlist( -4, _T("<or"),
		-4, _T("<and"), RTDXF0, _T("AEC_ZT_PIPE"), 8, LAY_PIPE_RAIN, -4, _T("and>"),
		-4, _T("<and"), RTDXF0, _T("AEC_ZT_WELL"), 8, LAY_WELL_RAIN, -4, _T("and>"),
		-4, _T("or>"), NULL);

	if(GlobalFunc::SelectEntity(_T("\n请选择排出干管或排出井<退出>"), entMainPipe, rbMaskMain) != RTNORM)   {
		return;
	}


	SSearchPipeList *pListAll = new SSearchPipeList();
	PickSet ssAll(SS_FREE);
	ssAll += entMainPipe;
	if(!GlobalFunc::SearchSprinkPipeSys(entMainPipe, NULL, pListAll, ssAll)){
		AfxMessageBox(_T("雨水系统有回路！"));
		delete pListAll;
		return;
	}


	if(!GlobalFunc::CalcLstPipeLength(pListAll, NULL, ssAll)){
		AfxMessageBox(_T("雨水系统没有标注管径,请先执行命令[管径标注]"));
		delete pListAll;
		return;
	}


	if(pListAll->m_lstNode.Length() == 2 && entMainPipe.Is(_T("AEC_ZT_PIPE"))){
		ssAll.Free();
		//计算源头应为节点,而不是管线. 以下计算管线2节点哪个是源头
		CalcWellNum(pListAll);
		SSearchPipeList *p1 = pListAll->m_lstNode[0];
		SSearchPipeList *p2 = pListAll->m_lstNode[1];
		SSearchPipeList *p3 = p1->m_iNum > p2->m_iNum ? p2 : p1;

		ads_name ent;
		acdbGetAdsName(ent, p3->m_ID);
		delete pListAll;
		pListAll = new SSearchPipeList();
		//重新搜索系统
		if(!GlobalFunc::SearchSprinkPipeSys(ent, NULL, pListAll, ssAll)){
			AfxMessageBox(_T("雨水系统有回路！"));
			delete pListAll;
			return;
		}

		GlobalFunc::CalcLstPipeLength(pListAll, NULL, ssAll);
		pListAll->m_iType = GlobalFunc::GetNodeType(ent);
	}
	XPoint ptLow, ptUp;
	ssAll.GetExtend(ptLow, ptUp);
	GlobalFunc::AssureInCurrentView(ptLow, ptUp);
	//UpdateRainWellArea(); zxl 20131218 del 汇流面积新实体能实时更新井的汇流面积

	ssAll.Redraw(3);
	SSearchPipeList *pNodeLong = GetLongestWell(pListAll, NULL);
	if(pNodeLong == NULL){
		ssAll.Redraw(4);
		delete pListAll;
		return;
	}
	if(!SetWellName(pListAll)){
		AfxMessageBox(_T("没有完整输入井编号！"));
		delete pListAll;
		return;
	}

	BOOL bHasArea(FALSE);
	SetWellArea(pListAll, bHasArea);
	if(!bHasArea){
		AfxMessageBox(_T("没有完整输入汇流面积！"));
		delete pListAll;
		return;
	}

	if(CheckWellSys(pListAll, TRUE) == FALSE){
		ssAll.Redraw(4);
		delete pListAll;
		return;
	}
	CString csDwb = g_csDwbPath + _T("TwtSys");
	XString xsTmp;
	Entity entBlk;
	if(GlobalFunc::LoadDwbBlock(csDwb, _T("00000069"), xsTmp) != RTNORM ){
		delete pListAll;
		return;
	}
	OPENOBJ_BEGIN(pNodeLong->m_ID, AcDb::kForRead, CDbPipeNode, pNode);
	if(pNode){
		XPoint pt = pNode->GetLocation();
		GlobalFunc::InsertBlock((const TCHAR*)xsTmp, asPnt3d(pt), 20*GlobalFunc::DocGetPScale(), 20*GlobalFunc::DocGetPScale(), 0, _T("0"));
		entBlk.GetLast();
	}
	OPENOBJ_END();
	if(GlobalFunc::SelectEntity(_T("\n请选择最远井<系统搜索>:"), entLongWell, rbMask) != RTNORM || !entLongWell.In(&ssAll))   {
		AcDbObjectId id = pNodeLong->m_ID;
		ads_name entTmp;
		acdbGetAdsName(entTmp, id);
		entLongWell = entTmp;
	}
	DoDimPipeSerialNumber(pListAll);
	//2008-6-5 SB 改到对话框参数实现
  //  ssAll.Redraw(3);
//    double nTime(10);
//	ads_getreal(_T("\n请输入最远井汇流时间<10分钟>:"), &nTime);
//    ssAll.Redraw(4);
//    GlobalFunc::WriteXdata(entLongWell, _T("TG-WELLTIME"), XString(_T("%.1f"), nTime));
	pNodeLong = GetWellNode(pListAll, entLongWell, NULL);
//    pNodeLong->m_nLost = nTime;

  //  ssAll.Redraw(4);
	entBlk.Erase();
	CTemporaryResourceOverride vTemp;
	CCalcRainWellDlg dlg;
	dlg.m_pListAll = pListAll;

	dlg.m_ssAll += ssAll;
	dlg.m_pNodeLong = pNodeLong;
	if(dlg.DoModal() != IDOK){
		delete pListAll;
		return;
	}
	delete pListAll;
	return;
}
*/