PdcProductReport.ProcessReport

From External Bemet Wiki
Revision as of 09:23, 17 July 2013 by TC (talk | contribs)
Jump to navigation Jump to search

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

Availability