728x90
총합계 재계산 하기(1) : 조회 후 재계산
1) 목표 달성율
Dim douSale_amt As Double = Func.NVL(CType(colSALE_AMT.SummaryText, Double), 0)
Dim douPlan_amt As Double = Func.NVL(CType(colPLAN_AMT.SummaryText, Double), 0)
If douPlan_amt = 0 Then
colCURR_GOAL_RATE.SummaryItem.DisplayFormat = 0 & "%"
Else
colCURR_GOAL_RATE.SummaryItem.DisplayFormat = Func.Round((douSale_amt / douPlan_amt) * 100, 1) & "%"
End If
728x90