PdcApplication.GiveInProduction - Revision history

Marc at 11:35, 11 June 2018

2018-06-11T11:35:23Z

← Older revision		Revision as of 11:35, 11 June 2018
Line 51:		Line 51:

	</source>		</source>
	NOTE: When using ~~abopve~~ code, you must register stdvcl40.dll:		NOTE: When using above code, you must register stdvcl40.dll:
	Execute command prompt as administrator:		Execute command prompt as administrator:
	Regsvr32 \\server\share\plancam\stdvcl40.dll		Regsvr32 \\server\share\plancam\stdvcl40.dll

2018-06-11T11:34:46Z

← Older revision		Revision as of 11:34, 11 June 2018
Line 51:		Line 51:

	</source>		</source>
			NOTE: When using abopve code, you must register stdvcl40.dll:
			Execute command prompt as administrator:
			Regsvr32 \\server\share\plancam\stdvcl40.dll


	== Availability ==		== Availability ==
	Available since June 2008 (From version 3.8).		Available since June 2008 (From version 3.8).

2018-06-11T11:17:06Z

← Older revision		Revision as of 11:17, 11 June 2018
Line 35:		Line 35:


	~~The code below creates an empty stringlist forThis~~ code example starts the production phase of the calculations 0801-000035 and 0801-000087 in VB.Net.		This code example starts the production phase of the calculations 0801-000035 and 0801-000087 in VB.Net.

	<source lang="vb">		<source lang="vb">

2018-06-11T11:16:22Z

← Older revision		Revision as of 11:16, 11 June 2018
Line 38:		Line 38:

	<source lang="vb">		<source lang="vb">
	~~dim strlstCalcNumbers~~		Dim strlstCalcNumbers As StdVCL.IStrings = PDC.App.GetEmptyStringsList

	~~set~~ strlstCalcNumbers = ~~pdc~~.GetEmptyStringsList		strlstCalcNumbers.Add("0801-000035")
	strlstCalcNumbers.Add "0801-000035"		strlstCalcNumbers.Add("0801-000087")
	strlstCalcNumbers.Add "0801-000087"
			If PDC.App.GiveInProduction(strlstCalcNumbers, "", 0, False, False, False) Then
	~~if pdc~~.GiveInProduction(strlstCalcNumbers, "", 0, False, False, False) ~~then~~		MsgBox("in productie geven gelukt")
	~~msgbox~~ "in productie geven gelukt"		Else
	~~else~~		MsgBox(PDC.App.LastError)
	~~msgbox pdc~~.LastError		End If
	~~end if~~

	</source>		</source>

2018-06-11T11:15:32Z

@@ Line 32: / Line 32: @@
      msgbox pdc.LastError
    end if
 </source>
 == Availability ==
 Available since June 2008 (From version 3.8).

2012-05-21T10:55:14Z

← Older revision		Revision as of 10:55, 21 May 2012
Line 1:		Line 1:
	== Declaration ==		== Declaration ==
			GiveInProduction(CalcNumbers as IStrings,StartChars as String,PlanPrio as VT_INT,Children as Boolean,EndlessCap as Boolean,Compress as Boolean) as Boolean

	== Description ==		== Description ==
			Give a list of calculations in prduction

	== Notes ==		== 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).<br />
			StartChars Which startletter should be used<br />
			PlanPrio Which plan prio should be used<br />
			Children Also give subcalculations in production<br />
			EndlessCap Use endless capacity in the planning<br />
			Compress Compress when start date is in the past

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

			<source lang="vb">
			dim strlstCalcNumbers

	~~<source lang~~="vb">		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
	</source>		</source>

	== Availability ==		== Availability ==
			Available since June 2008 (From version 3.8).

2012-03-01T16:35:20Z

← Older revision	Revision as of 16:35, 1 March 2012
(No difference)

2012-03-01T14:04:54Z

Created page with "== Declaration == == Description == == Notes == == Code example == <source lang="vb"> </source> == Availability =="

New page

== Declaration ==

== Description ==

== Notes ==

== Code example ==

<source lang="vb">

</source>

== Availability ==