PdcProductReport.ProcessReport: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
Line 9: | Line 9: | ||
1 = Create a new calculation en show it.<br /> | 1 = Create a new calculation en show it.<br /> | ||
2 = Do nothing, the productreport is only for registration.<br /> | 2 = Do nothing, the productreport is only for registration.<br /> | ||
Every method does following things:<br /> | <br /> | ||
Every process method does following things:<br /> | |||
1. Turns a productreport into processed (Don't forget to save the product report).<br /> | 1. Turns a productreport into processed (Don't forget to save the product report).<br /> | ||
2. If there raises any error, the return value is false and the error can be shown.<br /> | 2. If there raises any error, the return value is false and the error can be shown.<br /> | ||
== Code example == | == Code example == | ||
<source lang="vb"> | <source lang="vb"> | ||
dim objReport | |||
set objReport = pdc.ProductRegistration.ProductReports.Open("250", True) | |||
if objReport.ProcessReport(0) then 'Herstel calculatie | |||
objReport.Save | |||
else | |||
msgbox pdc.LastError | |||
end if | |||
</source> | |||
<source lang="vb"> | |||
</source> | |||
dim objReport | |||
set objReport = pdc.ProductRegistration.ProductReports.Open("251", True) | |||
if objReport.ProcessReport(1) then 'Nieuwe calculatie | |||
objReport.Save | |||
else | |||
msgbox pdc.LastError | |||
end if | |||
<source lang="vb"> | |||
dim objReport | |||
set objReport = pdc.ProductRegistration.ProductReports.Open("251", True) | |||
if objReport.ProcessReport(2) then | |||
objReport.Save | |||
else | |||
msgbox pdc.LastError | |||
end if | |||
</source> | </source> | ||
== Availability == | == Availability == |
Revision as of 09:23, 17 July 2013
Declaration
ProcessReport(ProcessMethod as long) as Boolean
Description
This method settles a productreport with a specific applied process method.
Notes
Three different methods are defined:
0 = Create a repair calculation, which is a copy from the productreports calculation. After the calculation is created, it is shown. When the productreport doesn't have a calculation, the return value is false.
1 = Create a new calculation en show it.
2 = Do nothing, the productreport is only for registration.
Every process method does following things:
1. Turns a productreport into processed (Don't forget to save the product report).
2. If there raises any error, the return value is false and the error can be shown.
Code example
dim objReport
set objReport = pdc.ProductRegistration.ProductReports.Open("250", True)
if objReport.ProcessReport(0) then 'Herstel calculatie
objReport.Save
else
msgbox pdc.LastError
end if
dim objReport
set objReport = pdc.ProductRegistration.ProductReports.Open("251", True) if objReport.ProcessReport(1) then 'Nieuwe calculatie objReport.Save else msgbox pdc.LastError end if
dim objReport
set objReport = pdc.ProductRegistration.ProductReports.Open("251", True)
if objReport.ProcessReport(2) then
objReport.Save
else
msgbox pdc.LastError
end if