동시성에러(3)

Private Sub AdvBandedGridView1_InitNewRow(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Grid.InitNewRowEventArgs) Handles xgSheetView.InitNewRow
        Dim drv As DataRowView = TryCast(Me.BaseBindingSource.Current, DataRowView)

        drv("OCCUR_DATE") = CMUX.CMShare.Fun.GetDateToStringYMD(CDate(dteSlipDate.EditValue))
        drv("PART_DIV") = Func.NVL(ctePartDiv.CodeEditValue, "")
        drv("BRAND") = Func.NVL(cteBrand.CodeEditValue, "")
        drv("CREDIT_ITEM") = Func.NVL(cteItem.CodeEditValue, "")
        drv("REVERT_DEPT") = Func.NVL(cteRevertDept.CodeEditValue, "")
        ' table default값이 0이므로 초기값을 넣어줘야 동시성에러가 나지 않는다
       

       drv("DEMAND_AMT") = 0
        drv("DEMAND_VAT") = 0
        drv("PROD_AMT") = 0
        drv("GOODS_AMT") = 0
        drv("COMPUTE_PROD_AMT") = 0    <= table default값이 설정 되었을 경우에 꼬옥 초기값을 주어야 한다