MsgBox („Begrenzung Kredit Tidak Cukup…!“ u. _
vbCrLf u. _
„Sisa Piutang =“ u. ERV_Global.Format_Number (dblSisaPiutang) u. _
vbCrLf u. _
„SO Belum Faktur =“ u. ERV_Global.Format_Number (dblSisaSOBelumFaktur) u. _
vbCrLf u. _
„Gesamtmenge =“ u. ERV_Global.Format_Number (dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) u. _
vbCrLf u. _
„Kredit =“ u. ERV_Global.Format_Number (dblLimitKredit) u. _ begrenzen
vbCrLf u. _
„Sisa Begrenzung =“ u. ERV_Global.Format_Number (dblLimitKredit - dblSisaSOBelumFaktur + dblSisaSOBelumFaktur) u. _
vbCrLf, _
MsgBoxStyle.Information, Me.Text)
|