- 2018.901.5 버전에서 신규버전 별도 설치 가능 버전으로 개발
 - 침기율을 6 에서 3.5로 수정
 - 공동주택 냉방운전시간을 3.8 시간으로 수정
 - 대기전력차단장치 삭제

 - 결과물 양식 수정(창면적비, 대기전력차단장치)
This commit is contained in:
ykh
2025-06-25 22:45:19 +09:00
parent e25bde7292
commit 4819e4ce22
9 changed files with 177 additions and 572 deletions

View File

@@ -806,6 +806,12 @@
Else
Dim Dr월에너지요구량 As DSR.월별에너지분석Row = CType(DSETR1.월별에너지분석.Select("월='" & Mon & "' and 존='" & DR존.code & "'")(0), DSR.월별에너지분석Row)
If DR존.프로필 = "5000" Then '주거부문일 경우 냉방 가동시간 3.8시간 250625
Q_h_b_op = TOSG(Q_h_b_op) * 3.8 / 24
Q_vh_b_op = TOSG(Q_vh_b_op) * 3.8 / 24
End If
If DR존.냉난방방식 = "냉난방" Or DR존.냉난방방식 = "냉방" Then '//냉난방/냉방
Dr월에너지요구량.냉방요구량열 = TOSG(T, (Q_h_b_op) / 1000) '=================== Q_h_b_we 2010.2.21 삭제
Dr월에너지요구량.냉방요구량공조 = TOSG(T, Q_vh_b_op / 1000)
@@ -827,7 +833,7 @@
End If
'MsgBox("냉방요구량" & Dr월에너지요구량.냉방요구량공조, MsgBoxStyle.Information, i_count_month & "CZONE")
End If
End If
End If
Next '(3)