PdcOverview.GetMaterialPrognosis - Revision history

TC at 06:45, 7 October 2019

2019-10-07T06:45:13Z

← Older revision		Revision as of 06:45, 7 October 2019
Line 20:		Line 20:
	msgbox aTableName		msgbox aTableName

	set Qry = pdc.Database.OpenQuery(5) '5 = ~~tempfiles~~		set Qry = pdc.Database.OpenQuery(1) '1 = database
	Qry.SQL = "SELECT * FROM " & aTableName		Qry.SQL = "SELECT * FROM " & aTableName
	if Qry.Execute then		if Qry.Execute then

TC at 06:43, 7 October 2019

2019-10-07T06:43:14Z

← Older revision		Revision as of 06:43, 7 October 2019
Line 6:		Line 6:

	== Notes ==		== Notes ==
	Before ~~genaration~~ of the overview, you can change all overview settings by writing them directly in ConfigDB.		Before generation of the overview, you can change all overview settings by writing them directly in ConfigDB.

	== Code example ==		== Code example ==

TC at 06:42, 7 October 2019

2019-10-07T06:42:59Z

← Older revision		Revision as of 06:42, 7 October 2019
Line 1:		Line 1:
	== Declaration ==		== Declaration ==
	GetMaterialPrognosis as ~~[[PdcGetMaterialPrognosis]]~~		GetMaterialPrognosis() as string

	== Description ==		== Description ==
	Generates the calculationoverview "Material Prognosis".		Generates the calculationoverview "Material Prognosis" and returns the created tablename.

	== Notes ==		== Notes ==
			Before genaration of the overview, you can change all overview settings by writing them directly in ConfigDB.

	== Code example ==		== Code example ==

TC at 06:41, 7 October 2019

2019-10-07T06:41:31Z

← Older revision		Revision as of 06:41, 7 October 2019
Line 1:		Line 1:
	== Declaration ==		== Declaration ==
	~~PurchaseInvoices~~ as [[~~PdcPurchaseInvoices~~]]		GetMaterialPrognosis as [[PdcGetMaterialPrognosis]]

	== Description ==		== Description ==
			Generates the calculationoverview "Material Prognosis".

	== Notes ==		== Notes ==
Line 11:		Line 11:

	<source lang="vb">		<source lang="vb">
			Dim aView
			Dim aTableName
			dim aQuery

			set aView = pdc.overview
			aTableName = aview.GetMaterialPrognosis

			msgbox aTableName

			set Qry = pdc.Database.OpenQuery(5) '5 = tempfiles
			Qry.SQL = "SELECT * FROM " & aTableName
			if Qry.Execute then
			if Qry.RecordCount > 0 then
			msgbox Qry.RecordCount
			else
			msgbox "no records"
			end if
			else
			msgbox pdc.LastError
			end if

	</source>		</source>

	== Availability ==		== Availability ==
			Available since October 2019 (From version 5.5)

TC: Created page with "== Declaration == PurchaseInvoices as PdcPurchaseInvoices == Description == == Notes == == Code example == == Availability =="

2019-10-07T06:38:55Z

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

New page

== Declaration ==
PurchaseInvoices as [[PdcPurchaseInvoices]]

== Description ==

== Notes ==

== Code example ==

<source lang="vb">

</source>

== Availability ==