형별성능내역 삭제 오류 해결

대지외 신재생 계산 오류 해결
순생산량, 총소요량 문구 수정

ArinWarev1/Forms_Input/Frm_YK.vb

@@ -27,14 +27,16 @@
 
         '// 입력면데이터중에 열관류율을 사용한 데이터 업데이트(131009)
         For Each dr As DS.tbl_myounRow In DSET1.tbl_myoun.Select("열관류율2 <> '0'")
+            If dr.RowState = DataRowState.Deleted Then Continue For
             Dim ykcode As String = dr.열관류율2
             Dim ykrow() As DS.tbl_ykRow = DSET1.tbl_yk.Select("code='" + ykcode + "'")
             If ykrow.Length = 1 Then
                 dr.투과율 = ykrow(0).투과율
             End If
-            dr.AcceptChanges()
+            dr.EndEdit()
         Next
-
+        BaseDT.AcceptChanges()
+        BaseDS.AcceptChanges()
         Update_열관류율_140409()
 
         Return True
@@ -903,6 +905,7 @@
             Next
         End If
         Me.bs.RemoveCurrent()
+        Me.bs.EndEdit()
 
     End Sub