PdcCalculation.ChangeDeliveryDate

From External Bemet Wiki
Revision as of 10:12, 3 June 2014 by TC (talk | contribs) (Created page with " dim objCalc set objCalc= pdc.OpenCalculation("01281") if objCalc.changedeliverydate(CDate("2015-10-08"), "KL") then msgbox "OK" else msgbox pdc.LastError end if ...")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to navigation Jump to search


dim objCalc

set objCalc= pdc.OpenCalculation("01281")
if objCalc.changedeliverydate(CDate("2015-10-08"), "KL") then
  msgbox "OK"
else
  msgbox pdc.LastError
end if
objCalc.Save
objCalc.show