PdcApplication.GiveInProduction

Declaration

GiveInProduction(CalcNumbers as IStrings,StartChars as String,PlanPrio as VT_INT,Children as Boolean,EndlessCap as Boolean,Compress as Boolean) as Boolean

Description

Give a list of calculations in prduction

Notes

This method starts the production phase for a list of calculations. The calculations must be closed before executing. You can check this e.g. by using the Registered property of the calculation object.

CalcNumbers List of calculationnumbers that should be executed (pdc.GetEmptyStringList).
StartChars Which startletter should be used
PlanPrio Which plan prio should be used
Children Also give subcalculations in production
EndlessCap Use endless capacity in the planning
Compress Compress when start date is in the past

Code example

This code example starts the production phase of the calculations 0801-000035 and 0801-000087.

dim strlstCalcNumbers

  set strlstCalcNumbers = pdc.GetEmptyStringsList
  strlstCalcNumbers.Add "0801-000035"
  strlstCalcNumbers.Add "0801-000087"

  if pdc.GiveInProduction(strlstCalcNumbers, "", 0, False, False, False) then
    msgbox "in productie geven gelukt"
  else
    msgbox pdc.LastError
  end if

This code example starts the production phase of the calculations 0801-000035 and 0801-000087 in VB.Net.

    Dim strlstCalcNumbers As StdVCL.IStrings = PDC.App.GetEmptyStringsList

    strlstCalcNumbers.Add("0801-000035")
    strlstCalcNumbers.Add("0801-000087")

    If PDC.App.GiveInProduction(strlstCalcNumbers, "", 0, False, False, False) Then
      MsgBox("in productie geven gelukt")
    Else
      MsgBox(PDC.App.LastError)
    End If

NOTE: When using above code, you must register stdvcl40.dll: Execute command prompt as administrator: Regsvr32 \\server\share\plancam\stdvcl40.dll

Availability

Available since June 2008 (From version 3.8).