PdcCalculation.Save: Difference between revisions

From External Bemet Wiki
Jump to navigation Jump to search
No edit summary
No edit summary
 
(One intermediate revision by one other user not shown)
Line 24: Line 24:
     msgbox "An error has occurred while saving calculation " & objCalc.CalculationNo & ": " & pdc.lasterror
     msgbox "An error has occurred while saving calculation " & objCalc.CalculationNo & ": " & pdc.lasterror
   end if
   end if
</source>
== Availability ==
== Availability ==
Available in version 1.5 onwards

Latest revision as of 13:00, 15 April 2014

Declaration

Save

Description

Store the calculation in the database

Notes

This method saves the calculation object. It is not necessary to have the calculation shown on screen to save it.

Code example

This code example creates a new calculation, adds a material and operation to it and saves it. Whether the save was succesful is reported to the user.

dim objCalc

  set objCalc = pdc.NewCalculation
  objCalc.MaterialList.Add("12345")
  objCalc.OperationList.Add 0,"3075"
  objCalc.Save
  if pdc.LastError = "" then
    msgbox "Calculation " & objCalc.CalculationNo & " was saved successfully"
    objCalc.Show
  else
    msgbox "An error has occurred while saving calculation " & objCalc.CalculationNo & ": " & pdc.lasterror
  end if

Availability

Available in version 1.5 onwards