401 lines
13 KiB
C++
401 lines
13 KiB
C++
// CalcFeedDataDlg.cpp : implementation file
|
||
//
|
||
|
||
#include "stdafx.h"
|
||
#include <xtext.h>
|
||
#include <DbEquipment.h>
|
||
|
||
#include "CalcFeedDataDlg.h"
|
||
#include "SanitaryDangDlg.h"
|
||
|
||
#ifdef _DEBUG
|
||
#define new DEBUG_NEW
|
||
#undef THIS_FILE
|
||
static char THIS_FILE[] = __FILE__;
|
||
#endif
|
||
|
||
/////////////////////////////////////////////////////////////////////////////
|
||
// 修改当量
|
||
/////////////////////////////////////////////////////////////////////////////
|
||
//判断这根管线是不是连接立管的干管，GetSysLabel＝＝“”
|
||
BOOL IsMainPipeLink2VPipe(Entity ent)
|
||
{
|
||
BOOL bRet = FALSE;
|
||
OPENOBJ_BEGIN(ent, AcDb::kForRead, TDbPipe, pPipe);
|
||
if(pPipe){
|
||
AcDbObjectId id1 = pPipe->GetNode(0);
|
||
AcDbObjectId id2 = pPipe->GetNode(1);
|
||
OPENOBJ_BEGIN(id1, AcDb::kForRead, TDbPipeNode, pNode);
|
||
if(pNode){
|
||
int num = pNode->GetInterfaceNum();
|
||
for(int m=0;m<num;m++){
|
||
TPipeInterface iFace;
|
||
pNode->GetInterface(m, iFace);
|
||
AcDbObjectId idPipe = iFace.m_idPipe;
|
||
CString csPipeName;
|
||
OPENOBJ_BEGIN(idPipe, AcDb::kForRead, TDbPipe, pPipe);
|
||
if(pPipe){
|
||
CString csPipeName = pPipe->GetSysLabel();
|
||
// cet 2012.6.5 modify 不指定楼层号，否则从非一楼无法计算
|
||
// if(csPipeName.Find(_T("1楼立管")) > -1)
|
||
// return TRUE;
|
||
if (csPipeName.Find(_T("楼立管")) > -1)
|
||
{
|
||
return TRUE;
|
||
}
|
||
}
|
||
OPENOBJ_END();
|
||
}
|
||
}
|
||
OPENOBJ_END();
|
||
|
||
OPENOBJ_BEGIN(id2, AcDb::kForRead, TDbPipeNode, pNode);
|
||
if(pNode){
|
||
int num = pNode->GetInterfaceNum();
|
||
for(int m=0;m<num;m++){
|
||
TPipeInterface iFace;
|
||
pNode->GetInterface(m, iFace);
|
||
AcDbObjectId idPipe = iFace.m_idPipe;
|
||
CString csPipeName;
|
||
OPENOBJ_BEGIN(idPipe, AcDb::kForRead, TDbPipe, pPipe);
|
||
if(pPipe){
|
||
CString csPipeName = pPipe->GetSysLabel();
|
||
// cet 2012.6.5 modify 不指定楼层号，否则从非一楼无法计算
|
||
// if(csPipeName.Find(_T("1楼立管")) > -1)
|
||
// return TRUE;
|
||
if (csPipeName.Find(_T("楼立管")) > -1)
|
||
{
|
||
return TRUE;
|
||
}
|
||
}
|
||
OPENOBJ_END();
|
||
}
|
||
}
|
||
OPENOBJ_END();
|
||
}
|
||
OPENOBJ_END();
|
||
return bRet;
|
||
}
|
||
|
||
//修改住宅立管编号，因为有的系统是由用户拼接完成
|
||
void ModifyVPipeIdx()
|
||
{
|
||
RBList rbMask(RTDXF0, _T("ATS_PIPE"), 8, GetLayerNames(_T("管")), NULL);
|
||
|
||
Entity entMainPipe;
|
||
if(SelectEntity(_T("\n请选择给水总干管<退出>"), entMainPipe, rbMask) != RTNORM) {
|
||
return;
|
||
}
|
||
PickSet ssAll(SS_FREE);
|
||
ssAll += entMainPipe;
|
||
SSearchPipeList *pListAll = new SSearchPipeList();
|
||
SearchSprinkPipeSys(entMainPipe, NULL, pListAll, ssAll);
|
||
delete pListAll;
|
||
|
||
long len = ssAll.Length();
|
||
for(long i=0;i<len;i++){
|
||
Entity ent = ssAll[i];
|
||
//首先判断管线是不是由【住宅原理】绘制的
|
||
OPENOBJ_BEGIN(ent, AcDb::kForRead, TDbPipe, pPipe);
|
||
if(pPipe){
|
||
CString csLabel = pPipe->GetSysLabel();
|
||
if(csLabel == _T("")){
|
||
if(IsMainPipeLink2VPipe(ent)){
|
||
if(pPipe->upgradeOpen()==Acad::eOk) {
|
||
pPipe->SetSysLabel(_T("干管-1"));
|
||
pPipe->SetModelType(TPipeSys::kSystem);
|
||
pPipe->downgradeOpen();
|
||
}
|
||
}
|
||
}
|
||
}
|
||
OPENOBJ_END();
|
||
|
||
// OPENOBJ_BEGIN(ent, AcDb::kForWrite, TDbPipe, pPipe);
|
||
// if(pPipe){
|
||
// CString csLabel = pPipe->GetSysLabel();
|
||
// int idx = csLabel.Find(_T("-"));
|
||
// if(idx > -1){
|
||
// CString csVPipeName = csLabel.Right(csLabel.GetLength()-idx-1);
|
||
// int iDn = _ttoi(csVPipeName);
|
||
// pPipe->SetDnDiameter(iDn);
|
||
// }
|
||
// }
|
||
// OPENOBJ_END();
|
||
// DoDimPipeDn(ent,-1,_T(""),3,TRUE);
|
||
}
|
||
|
||
|
||
PickSet ss(SS_FREE);
|
||
while(SelectEntities(_T("\n请选择要修改楼栋编号的管线:<退出>"), ss, rbMask) == RTNORM){
|
||
int iStart(1);
|
||
ads_getint(_T("\n请输入立管(楼栋)编号<1>"), &iStart);
|
||
len = ss.Length();
|
||
for(i=0;i<len;i++){
|
||
Entity ent = ss[i];
|
||
OPENOBJ_BEGIN(ent, AcDb::kForWrite, TDbPipe, pPipe);
|
||
if(pPipe){
|
||
CString csLabel = pPipe->GetSysLabel();
|
||
int idx = csLabel.Find(_T("-"));
|
||
if(idx > -1){
|
||
CString csFloor = csLabel.Left(idx+1);
|
||
csFloor.Format(_T("%s%d"), csFloor, iStart);
|
||
pPipe->SetSysLabel(csFloor);
|
||
// pPipe->SetDnDiameter(iStart);
|
||
}
|
||
}
|
||
OPENOBJ_END();
|
||
}
|
||
}
|
||
|
||
len = ssAll.Length();
|
||
for(i=0;i<len;i++){
|
||
Entity ent = ssAll[i];
|
||
OPENOBJ_BEGIN(ent, AcDb::kForWrite, TDbPipe, pPipe);
|
||
if(pPipe){
|
||
pPipe->EnableDrawLabel(FALSE);
|
||
}
|
||
OPENOBJ_END();
|
||
}
|
||
}
|
||
|
||
void ModifyNg()
|
||
{
|
||
PickSet ss(SS_FREE);
|
||
RBList rbMask = ads_buildlist( -4, _T("<or"),
|
||
-4, _T("<and"), RTDXF0, _T("ATS_EQUIPMENT"), 8, _T("*"), 2, _T("$TwtSys$00000132"), -4, _T("and>"),
|
||
-4, _T("<and"), RTDXF0, _T("ATS_EQUIPMENT"), 8, _T("*"), 2, _T("$TwtSys$00000005"), -4, _T("and>"),
|
||
-4, _T("or>"), NULL);
|
||
|
||
RBList rbMask2(RTDXF0, _T("TEXT"), 8, LAY_CALC_TEXT, NULL);
|
||
if(SelectEntities(_T("\n请选择每层支管末端的断管符号或水龙头:<修改楼栋编号>"), ss, rbMask) != RTNORM){
|
||
ModifyVPipeIdx();
|
||
return;
|
||
}
|
||
|
||
if(ss.Length() < 1)
|
||
return;
|
||
BOOL bIsResidence = FALSE;
|
||
BOOL bIsFeedSys = TRUE;
|
||
OPENOBJ_BEGIN(ss[0L], AcDb::kForRead, TDbEquipment, pEquip);
|
||
if(pEquip){
|
||
if(pEquip->GetInterfaceNum() > 0){
|
||
TPipeInterface face;
|
||
pEquip->GetInterface(0, face);
|
||
AcDbObjectId nextPipeId = face.m_idPipe;
|
||
OPENOBJ_BEGIN(nextPipeId, AcDb::kForRead, TDbPipe, pPipe);
|
||
if(pPipe){
|
||
if(pPipe->GetSysType() != TPipeSys::kFeedWater)
|
||
bIsFeedSys = FALSE;
|
||
}
|
||
OPENOBJ_END();
|
||
|
||
}
|
||
double nNg = pEquip->GetDang();
|
||
if(nNg < 0)
|
||
bIsResidence = TRUE;
|
||
else{
|
||
double nPeopleNum = pEquip->GetPipeLength();
|
||
if(nPeopleNum > 0 && bIsFeedSys)
|
||
bIsResidence = TRUE;
|
||
}
|
||
}
|
||
OPENOBJ_END();
|
||
|
||
double nNewDang(0), dBigQ(0);
|
||
double nPeopleNum(0);
|
||
double nFactor(2.8);
|
||
int iRation(250), iDoorNum(1);
|
||
double nU0(0);
|
||
CString csDim;
|
||
if(!bIsResidence){
|
||
if(bIsFeedSys){//公建给水
|
||
CTemporaryResourceOverride vTemp;
|
||
|
||
CSanitaryDangDlg dlg;
|
||
dlg.m_bMultSel = TRUE;
|
||
if(dlg.DoModal() == IDOK){
|
||
nNewDang = dlg.m_nRet;
|
||
dBigQ = dlg.m_nBigQ;
|
||
if(dBigQ > 1.0)
|
||
nPeopleNum = -1;//如果是公建，要问当量是否包含“自闭式冲洗阀”
|
||
}
|
||
|
||
|
||
// csDim.Format(_T("Ng=%.1f"), nNewDang);
|
||
// //如果是公建，要问当量是否包含“自闭式冲洗阀”
|
||
// ads_getstring(0, _T("\n本层洁具是否包括自闭式冲洗阀？<N>: "), szText);
|
||
// if(_tcsicmp(szText, _T("Y")) == 0){
|
||
// nPeopleNum = -1;
|
||
// }
|
||
}
|
||
else{//排水
|
||
TCHAR szText[32];
|
||
ads_getreal(_T("\n请输入器具的当量值:<退出>"), &nNewDang);
|
||
ads_getstring(0, _T("\n本层最大卫生器具的排水流量(L/s): "), szText);
|
||
nPeopleNum = _tstof(szText);
|
||
csDim.Format(_T("Ng=%.1f Q=%.2f"), nNewDang, nPeopleNum);
|
||
}
|
||
}
|
||
else{
|
||
CTemporaryResourceOverride vTemp;
|
||
CCalcFeedDataDlg dlg;
|
||
if(dlg.DoModal() != IDOK)
|
||
return;
|
||
bIsResidence = TRUE;
|
||
nNewDang = dlg.m_nNg;
|
||
iDoorNum = dlg.m_iDoorNum;
|
||
nPeopleNum = dlg.m_nNumPeople;
|
||
iRation = dlg.m_iRation;
|
||
nFactor = dlg.m_nFactor;
|
||
//U0 = (q0*m*Kh)/(0.2*Ng*T*3600)
|
||
if(iDoorNum < 0.001 || nNewDang < 0.001)
|
||
nU0 = 0;
|
||
else
|
||
nU0 = (iDoorNum * iRation * nPeopleNum * nFactor) / (0.2*iDoorNum * nNewDang*24*3600);
|
||
if(dlg.m_bDim)
|
||
csDim.Format(_T("%d户/%.1f人每户/q0=%d/Ng=%.1f每户/Kh=%.1f/U0=%.3f"), iDoorNum, nPeopleNum, iRation, nNewDang, nFactor, nU0);
|
||
}
|
||
|
||
|
||
XPoint ptLow, ptUp;
|
||
ss.GetExtend(ptLow, ptUp);
|
||
AssureInCurrentView(ptLow, ptUp);
|
||
InitTwtTextStyle(g_csTwtDimStyle);
|
||
for(long i=0;i<ss.Length();i++){
|
||
Entity ent = ss[i];
|
||
double nNg(0);
|
||
XPoint ptLoc;
|
||
|
||
OPENOBJ_BEGIN(ent, AcDb::kForWrite, TDbEquipment, pEquip);
|
||
if(pEquip){
|
||
nNg = pEquip->GetDang();
|
||
if(bIsFeedSys){
|
||
pEquip->SetSpare(dBigQ);
|
||
pEquip->SetDang(nNewDang); //总当量 SetDang
|
||
pEquip->SetPipeLength(nPeopleNum); //每户人数 SetPipeLength
|
||
pEquip->SetNumber(XString(_T("%.2f"), nFactor)); //小时变化系数 SetNumber
|
||
pEquip->SetSysBlock(XString(_T("%.d"), iRation));//用水定额 SetSysBlock
|
||
pEquip->SetICookie(0, iDoorNum); //该户型户数 SetICookie
|
||
}
|
||
else
|
||
pEquip->SetSpare(nPeopleNum); //最大排水流量
|
||
ptLoc = pEquip->GetLocation();
|
||
}
|
||
OPENOBJ_END();
|
||
if(bIsResidence && csDim == _T(""))
|
||
continue;
|
||
PickSet ssText(SS_FREE);
|
||
|
||
ads_polar(ptLoc, 0, g_nTwtDimHeight * DocGetPScale(), ptLoc);
|
||
XPoint ptUcs = Wcs2Ucs(ptLoc);
|
||
GetPointPickSet(ptUcs, ssText, rbMask2, 100);
|
||
if(ssText.Length() == 1){
|
||
Entity entTmp = ssText[0L];
|
||
TCHAR szText[256];
|
||
entTmp.GetData(1, szText);
|
||
CString csNg = szText;
|
||
csNg = csNg.Right(csNg.GetLength() - 3);
|
||
if(fabs(nNg - _tstof(csNg)) < 0.01 || bIsResidence){
|
||
entTmp.SetData(1, csDim);
|
||
entTmp.Modify();
|
||
}
|
||
}
|
||
else{
|
||
XText text(csDim, ptLoc, g_nTwtDimHeight * DocGetPScale(), g_nDimScale, g_csTwtDimStyle, LAY_CALC_TEXT);
|
||
text.Draw();
|
||
Entity entLast;
|
||
entLast.GetLast();
|
||
WriteXdata(entLast, _T("TG-LAYER"), LAY_PIPE_FEED);
|
||
}
|
||
}
|
||
}
|
||
|
||
|
||
|
||
/////////////////////////////////////////////////////////////////////////////
|
||
// CCalcFeedDataDlg dialog
|
||
|
||
CCalcFeedDataDlg::CCalcFeedDataDlg(CWnd* pParent /*=NULL*/)
|
||
: CDialog(CCalcFeedDataDlg::IDD, pParent)
|
||
{
|
||
//{{AFX_DATA_INIT(CCalcFeedDataDlg)
|
||
m_iRation = 250;
|
||
m_nFactor = 2.8;
|
||
m_nNg = 4;
|
||
m_nNumPeople = 3.5;
|
||
m_bDim = TRUE;
|
||
m_iDoorNum = 1;
|
||
//}}AFX_DATA_INIT
|
||
}
|
||
|
||
|
||
void CCalcFeedDataDlg::DoDataExchange(CDataExchange* pDX)
|
||
{
|
||
CDialog::DoDataExchange(pDX);
|
||
//{{AFX_DATA_MAP(CCalcFeedDataDlg)
|
||
DDX_Control(pDX, IDC_SPIN_DOORNUM, m_spinDoorNum);
|
||
DDX_Text(pDX, IDC_EDIT_RATION, m_iRation);
|
||
DDX_Text(pDX, IDC_EDIT_HOUR_FACTOR, m_nFactor);
|
||
DDX_Text(pDX, IDC_EDIT_DOOR_DANG, m_nNg);
|
||
DDX_Text(pDX, IDC_EDIT_PEOPLE_NUM, m_nNumPeople);
|
||
DDX_Check(pDX, IDC_CHECK_DIM, m_bDim);
|
||
DDX_Text(pDX, IDC_EDIT_DOOR_NUM, m_iDoorNum);
|
||
//}}AFX_DATA_MAP
|
||
}
|
||
|
||
|
||
BEGIN_MESSAGE_MAP(CCalcFeedDataDlg, CDialog)
|
||
//{{AFX_MSG_MAP(CCalcFeedDataDlg)
|
||
ON_BN_CLICKED(IDC_BUTTON_RATION, OnButtonRation)
|
||
ON_BN_CLICKED(IDC_BUTTON_FACTOR, OnButtonFactor)
|
||
ON_BN_CLICKED(IDC_BUTTON_DANG, OnButtonDang)
|
||
//}}AFX_MSG_MAP
|
||
END_MESSAGE_MAP()
|
||
|
||
/////////////////////////////////////////////////////////////////////////////
|
||
// CCalcFeedDataDlg message handlers
|
||
|
||
void CCalcFeedDataDlg::OnButtonRation()
|
||
{
|
||
//AfxMessageBox(_T("住宅最高日生活用水定额\n\n1.普通住宅Ⅰ （有大便器、洗涤盆） 85～150\n2.普通住宅Ⅱ（有大便器、洗脸盆、洗涤盆、洗衣机、 热水器和沐浴设备） 130～300\n3.普通住宅Ⅲ（有大便器、洗脸盆、洗涤盆、洗衣机、 集中热水供应和沐浴设备） 180～320\n4.别墅 （有大便器、洗脸盆、洗涤盆、洗衣机、洒水栓，家用热水机组和沐浴设备） 200～350\n\n"));
|
||
RBList rbCmd=ads_buildlist(RTSTR, _T("IPrincipleFeed"), NULL);
|
||
resbuf *rbRes=NULL;
|
||
if(ads_invoke(rbCmd, &rbRes) == RTNORM && rbRes)
|
||
{
|
||
ads_relrb(rbRes);
|
||
}
|
||
}
|
||
|
||
void CCalcFeedDataDlg::OnButtonFactor()
|
||
{
|
||
//AfxMessageBox(_T("住宅最高日生活用水小时变化系数Kh\n\n1.普通住宅Ⅰ （有大便器、洗涤盆） 3.0～2.5\n2.普通住宅Ⅱ（有大便器、洗脸盆、洗涤盆、洗衣机、 热水器和沐浴设备） 2.8～2.3\n3.普通住宅Ⅲ（有大便器、洗脸盆、洗涤盆、洗衣机、 集中热水供应和沐浴设备） 2.5～2.0\n4.别墅 （有大便器、洗脸盆、洗涤盆、洗衣机、洒水栓，家用热水机组和沐浴设备） 2.3～1.8\n\n"));
|
||
RBList rbCmd=ads_buildlist(RTSTR, _T("IPrincipleFeed"), NULL);
|
||
resbuf *rbRes=NULL;
|
||
if(ads_invoke(rbCmd, &rbRes) == RTNORM && rbRes)
|
||
{
|
||
ads_relrb(rbRes);
|
||
}
|
||
}
|
||
|
||
void CCalcFeedDataDlg::OnButtonDang()
|
||
{
|
||
CTemporaryResourceOverride vTemp;
|
||
CSanitaryDangDlg dlg;
|
||
dlg.m_bMultSel = TRUE;
|
||
if(dlg.DoModal() == IDOK){
|
||
m_nNg = dlg.m_nRet;
|
||
UpdateData(FALSE);
|
||
}
|
||
}
|
||
|
||
BOOL CCalcFeedDataDlg::OnInitDialog()
|
||
{
|
||
CDialog::OnInitDialog();
|
||
|
||
m_spinDoorNum.SetRange(1, 20);
|
||
|
||
return TRUE; // return TRUE unless you set the focus to a control
|
||
// EXCEPTION: OCX Property Pages should return FALSE
|
||
}
|