MsgBox ("Ograniczenie Kredit Tidak Cukup…!" & _
vbCrLf & _
"Sisa Piutang =" & ERV_Global.Format_Number (dblSisaPiutang) & _
vbCrLf & _
"W TEN SPOSÓB Belum Faktur =" & ERV_Global.Format_Number (dblSisaSOBelumFaktur) & _
vbCrLf & _
"Suma =" & ERV_Global.Format_Number (dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) & _
vbCrLf & _
"Ograniczać Kredit =" & ERV_Global.Format_Number (dblLimitKredit) & _
vbCrLf & _
"Sisa Ograniczenie =" & ERV_Global.Format_Number (dblLimitKredit - dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) & _
vbCrLf, _
MsgBoxStyle.Information, Me.Text)
|