Category: Dynamics

This script is part of the SQL Scripts for Microsoft Dynamics GP where I will be posting the scripts I wrote against Microsoft Dynamics GP over the 19 years before I stopped working with Dynamics GP.

This script returns a list of all line items from Sales Order Processing at a status of work.

/*
Created by Ian Grieve of azurecurve | Ramblings of an IT Professional (http://www.azurecurve.co.uk)
This code is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 4.0 International (CC BY-NC-SA 4.0 Int).
*/
SELECT
	SOP10200.SOPNUMBE
	,CASE SOP10200.SOPTYPE
		WHEN 1 THEN
			'Quote'
		WHEN 2 THEN
			'Order'
		WHEN 3 THEN
			'Invoice'
		WHEN 4 THEN
			'Return'
		WHEN 5 THEN
			'Back Order'
		WHEN 6 THEN
			'Fulfillment Order'
	END AS 'Trx Type'
	,SOP10200.LNITMSEQ
	,SOP10100.DOCDATE
	,SOP10100.CURNCYID
	,SOP10100.CSTPONBR
	,SOP10200.ITEMNMBR
	,SOP10200.ITEMDESC
	,SOP10200.ReqShipDate
	,SOP10200.LOCNCODE
	,SOP10200.QUANTITY
	,SOP10200.UNITCOST
	,SOP10200.EXTDCOST
	,SOP10200.UNITPRCE
	,SOP10200.XTNDPRCE
	,SOP10100.SUBTOTAL + SOP10100.TAXAMNT + SOP10100.FRTAMNT + SOP10100.MSCTXAMT - SOP10100.TRDISAMT AS 'Value (Gross)'
	,SY01200.INETINFO
FROM
	SOP10200 --Sales Transaction Amounts Work (SOP10200)
INNER JOIN
	SOP10100 --Sales Transaction Work (SOP10100)
		ON
			SOP10100.SOPTYPE = SOP10200.SOPTYPE
		AND
			SOP10100.SOPNUMBE = SOP10200.SOPNUMBE
LEFT JOIN
	SY01200 --Internet Addresses (SY01200)
		ON
			SY01200.Master_Type = 'ITM'
		AND
			SY01200.Master_ID = SOP10200.ITEMNMBR

This script is part of the SQL Scripts for Microsoft Dynamics GP where I will be posting the scripts I wrote against Microsoft Dynamics GP over the 19 years before I stopped working with Dynamics GP.

This script will return a list of all pending prepayments in Dynamics GP; the highlighted account at the can be changed or removed as required.

CREATE VIEW [dbo].[uv_AZRCRV_PendingPrepayments] AS
/*
Created by Ian Grieve of azurecurve | Ramblings of an IT Professional (http://www.azurecurve.co.uk)
This code is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 4.0 International (CC BY-NC-SA 4.0 Int).
*/
SELECT
	['PM Transaction WORK File'].VCHRNMBR AS 'Voucher Number'
	,CASE ['PM Transaction WORK File'].DOCTYPE
		WHEN 1 THEN 'Invoice'
		WHEN 5 THEN 'Credit Memo'
		ELSE ''
	END AS 'Document Type'
	,['PM Creditor Master'].VENDORID AS 'Creditor ID'
	,['PM Creditor Master'].VENDNAME AS 'Creditor Name'
	,FORMAT(EOMONTH(DATEADD(month,-1,GETDATE())), 'dd/MM/yyyy') AS 'Transaction Date'
	,['PM Transaction WORK File'].BACHNUMB AS 'Batch Number'
	,['PM Transaction WORK File'].TRXDSCRN AS 'Document Description'
	,['PM Transaction WORK File'].DOCNUMBR AS 'Document Number'
	,['PM Transaction WORK File'].PORDNMBR AS 'PO Number'
	,ISNULL(['Deferral Account Index Master'].ACTNUMST,['GL Account Index Master'].ACTNUMST) AS 'Account'
	,['PM Distribution WORK OPEN'].DEBITAMT AS 'Debit'
	,['PM Distribution WORK OPEN'].CRDTAMNT AS 'Credit'
	,CASE WHEN DOCTYPE = 1 THEN
		CASE WHEN ['Deferral Header Work'].PP_Module IS NOT NULL THEN
			SUM(['Deferral Line Work'].TRXAMNT)
		ELSE
			0 --SUM(['PM Distribution WORK OPEN'].DEBITAMT)
		END
	ELSE
		0
	END AS 'Deferred Debit'
	,CASE WHEN DOCTYPE = 1 THEN
		0
	ELSE
		CASE WHEN ['Deferral Header Work'].PP_Module IS NOT NULL THEN
			SUM(['Deferral Line Work'].TRXAMNT)
		ELSE
			0 --SUM(['PM Distribution WORK OPEN'].CRDTAMNT)
		END
	END AS 'Deferred Credit'
	,['PM Distribution WORK OPEN'].DistRef AS 'Distribution Reference'
	,CASE WHEN ['Deferral Header Work'].PP_Module IS NULL THEN
		'Not Deferred'
	ELSE
		'Deferred'
	END AS 'Deferred'
FROM
	PM10000 AS ['PM Transaction WORK File'] -- FOR OPEN CHANGE TO PM20000
INNER JOIN
	PM00200 AS ['PM Creditor Master']
		ON
			['PM Creditor Master'].VENDORID = ['PM Transaction WORK File'].VENDORID
INNER JOIN
	PM10100 AS ['PM Distribution WORK OPEN']
		ON
			['PM Distribution WORK OPEN'].CNTRLTYP = ['PM Transaction WORK File'].CNTRLTYP
		AND
			['PM Distribution WORK OPEN'].VCHRNMBR = ['PM Transaction WORK File'].VCHRNMBR
INNER JOIN
	GL00105 AS ['GL Account Index Master']
		ON
			['GL Account Index Master'].ACTINDX = ['PM Distribution WORK OPEN'].DSTINDX
LEFT JOIN -- Join to RED
	PP000100 AS ['Deferral Header Work'] -- FOR OPEN CHANGE TO PP100100
		ON
			['Deferral Header Work'].CNTRLTYP = ['PM Distribution WORK OPEN'].CNTRLTYP
		AND
			['Deferral Header Work'].PP_Document_Number = ['PM Distribution WORK OPEN'].VCHRNMBR
		AND
			['Deferral Header Work'].PP_Sequencer = ['PM Distribution WORK OPEN'].DSTSQNUM
LEFT JOIN
	GL00105 AS ['Deferral Account Index Master']
		ON
			['Deferral Account Index Master'].ACTINDX = ['Deferral Header Work'].ACTINDX
LEFT JOIN
	PP000101 AS ['Deferral Line Work']
		ON
			['Deferral Line Work'].PP_Module = ['Deferral Header Work'].PP_Module
		AND
			['Deferral Line Work'].PP_Record_Type = ['Deferral Header Work'].PP_Record_Type
		AND
			['Deferral Line Work'].PP_Document_Number = ['Deferral Header Work'].PP_Document_Number
		AND
			['Deferral Line Work'].PP_Sequencer = ['Deferral Header Work'].PP_Sequencer
		AND
			['Deferral Line Work'].PPOFFSEQ = ['Deferral Header Work'].PPOFFSEQ
		AND
			['Deferral Line Work'].CNTRLTYP = ['Deferral Header Work'].CNTRLTYP
		AND
			['Deferral Line Work'].VCHRNMBR = ['Deferral Header Work'].VCHRNMBR
		AND
			['Deferral Line Work'].DSTSQNUM = ['Deferral Header Work'].DSTSQNUM
WHERE
	['PM Transaction WORK File'].BCHSOURC = 'PM_Trxent'
AND
	['PM Distribution WORK OPEN'].DISTTYPE = 6 --Include only Purchases Distribution
GROUP BY
	['GL Account Index Master'].ACTNUMST
	,['Deferral Account Index Master'].ACTNUMST
	,['PM Transaction WORK File'].DOCTYPE
	,['Deferral Header Work'].PP_Module
	,['PM Distribution WORK OPEN'].DistRef
	,['PM Transaction WORK File'].VCHRNMBR
	,['PM Creditor Master'].VENDORID
	,['PM Creditor Master'].VENDNAME
	,['PM Transaction WORK File'].DOCTYPE
	,['PM Transaction WORK File'].BACHNUMB
	,['PM Transaction WORK File'].TRXDSCRN
	,['PM Transaction WORK File'].DOCNUMBR
	,['PM Transaction WORK File'].PORDNMBR
	,['PM Distribution WORK OPEN'].DEBITAMT
	,['PM Distribution WORK OPEN'].CRDTAMNT
HAVING
	['GL Account Index Master'].ACTNUMST = '000-8888-00'
GO

This script is part of the SQL Scripts for Microsoft Dynamics GP where I will be posting the scripts I wrote against Microsoft Dynamics GP over the 19 years before I stopped working with Dynamics GP.

This script will show stock levels for all items including how much is allocated or available.

/*
Created by Ian Grieve of azurecurve | Ramblings of an IT Professional (http://www.azurecurve.co.uk)
This code is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 4.0 International (CC BY-NC-SA 4.0 Int).
*/
SELECT
	RTrim(IV00101.ITEMNMBR) AS ITEMNMBR
	,RTrim(IV00102.LOCNCODE) AS LOCNCODE
	,LEFT(IV00102.QTYONHND, CHARINDEX('.', IV00102.QTYONHND)- 1) AS QTYONHND
	,LEFT(IV00102.ATYALLOC, CHARINDEX('.', IV00102.ATYALLOC)- 1) AS QTYALLOC
	,LEFT(IV00102.QTYONHND - IV00102.ATYALLOC, CHARINDEX('.', IV00102.QTYONHND - IV00102.ATYALLOC) -1) AS 'QTYAVAIL'
	,LEFT(IV00102.QTYONORD, CHARINDEX('.', IV00102.QTYONORD)- 1) AS QTYONORD
FROM
	IV00101
INNER JOIN
	IV00102
		ON
			IV00102.ITEMNMBR = IV00101.ITEMNMBR
WHERE
	IV00102.LOCNCODE <> ' '
AND
	IV00102.QTYONHND - IV00102.ATYALLOC <> 0

This script is part of the SQL Scripts for Microsoft Dynamics GP where I will be posting the scripts I wrote against Microsoft Dynamics GP over the 19 years before I stopped working with Dynamics GP.

This script will allow the user to specify a date and return the debit, credit and net change for all accounts.

/*
Created by Ian Grieve of azurecurve | Ramblings of an IT Professional (http://www.azurecurve.co.uk)
This code is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 4.0 International (CC BY-NC-SA 4.0 Int).
*/
DECLARE @StartDate DATE = '2027-01-01'
DECLARE @EndDate DATE = '2027-03-31'

SELECT
	CASE WHEN ['Account Master'].ACTIVE = 1 THEN '' ELSE 'Yes' END AS 'Inactive'
	,['Account Index Master'].ACTNUMST AS 'Account'
	,['Account Master'].ACTDESCR AS 'Description'
	,(
		SELECT SUM(DEBITAMT) FROM
			(
		SELECT
			DEBITAMT
		FROM
			GL20000 AS ['Year-to-date transactions'] --Year-to-Date Transaction Open (GL20000)
		WHERE
			TRXDATE BETWEEN @StartDate AND @EndDate
		AND
			['Year-to-date transactions'].ACTINDX = ['Account Master'].ACTINDX
		UNION ALL
			SELECT
				DEBITAMT
			FROM
				GL30000 AS ['GL Transactions History'] --Account Transaction History (GL30000)
			WHERE
				TRXDATE BETWEEN @StartDate AND @EndDate
			AND
				['GL Transactions History'].ACTINDX = ['Account Master'].ACTINDX
			) AS ['GL Transactions']
	) AS 'Debit'
	,(
		SELECT SUM(CRDTAMNT) FROM
			(
		SELECT
			CRDTAMNT
		FROM
			GL20000 AS ['Year-to-date transactions']
		WHERE
			TRXDATE BETWEEN @StartDate AND @EndDate
		AND
			['Year-to-date transactions'].ACTINDX = ['Account Master'].ACTINDX
		UNION ALL
			SELECT
				CRDTAMNT
			FROM
				GL30000 AS ['GL Transactions History']
			WHERE
				TRXDATE BETWEEN @StartDate AND @EndDate
			AND
				['GL Transactions History'].ACTINDX = ['Account Master'].ACTINDX
			) AS ['GL Transactions']
	) AS 'Credit'
	,(
		SELECT SUM(NETCHANGE) FROM
			(
		SELECT
				DEBITAMT - (CRDTAMNT * 1) AS NETCHANGE
		FROM
			GL20000 AS ['Year-to-date transactions']
		WHERE
			TRXDATE BETWEEN @StartDate AND @EndDate
		AND
			['Year-to-date transactions'].ACTINDX = ['Account Master'].ACTINDX
		UNION ALL
			SELECT
				DEBITAMT - (CRDTAMNT * 1) AS NETCHANGE
			FROM
				GL30000 AS ['GL Transactions History']
			WHERE
				TRXDATE BETWEEN @StartDate AND @EndDate
			AND
				['GL Transactions History'].ACTINDX = ['Account Master'].ACTINDX
			) AS ['GL Transactions']
	) AS 'Net Change'
FROM
	GL00100 AS ['Account Master'] --Breakdown Account Master (GL00100)
INNER JOIN
	GL00105 AS ['Account Index Master'] --Account Index Master (GL00105)
		ON
			['Account Index Master'].ACTINDX = ['Account Master'].ACTINDX

This script is part of the SQL Scripts for Microsoft Dynamics GP where I will be posting the scripts I wrote against Microsoft Dynamics GP over the 19 years before I stopped working with Dynamics GP.

I don’t recall for whom or why this script was returned, but it will return the opening balance for every G/L account for the user supplied date.

/*
Created by Ian Grieve of azurecurve | Ramblings of an IT Professional (http://www.azurecurve.co.uk)
This code is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 4.0 International (CC BY-NC-SA 4.0 Int).
*/
DECLARE @StartDate DATE = '2027-04-01'

SELECT
	['Account Index Master'].ACTNUMST AS 'Account'
	,CASE ACCTTYPE
		WHEN 1 THEN 'Posting Account'
		WHEN 2 THEN 'Unit Account'
		WHEN 3 THEN 'Posting Allocation Account'
		WHEN 4 THEN 'Unit Allocation Account'
		ELSE 'Unknown Account Type'
	END AS AccountType
	,['Account Master'].ACTDESCR AS 'Description'
	,ISNULL((
		SELECT
			SUM(['Account Sumary Master'].PERDBLNC)
		FROM
			SY40100 AS SY --Period Setup (SY40100)
		INNER JOIN
			SY40100 AS SYCUR --Period Setup (SY40100)
				ON
					SY.SERIES = 2
				AND
					CONVERT(DATETIME, CONVERT(VARCHAR(100), @StartDate, 126), 126) BETWEEN SYCUR.PERIODDT AND SYCUR.PERDENDT			
				AND
					SYCUR.ODESCTN = 'General Entry'
		INNER JOIN
				(
					SELECT
						PERDBLNC
						,YEAR1
						,PERIODID
						,ACTINDX
					FROM
						GL10110 --Account Current Summary Master (GL10110)
					UNION ALL
						SELECT
							PERDBLNC
							,YEAR1
							,PERIODID
							,ACTINDX
						FROM
							GL10111 --Account Summary History (GL10111)
				) AS ['Account Sumary Master']
			ON
				['Account Sumary Master'].ACTINDX = ['Account Index Master'].ACTINDX
			AND
				['Account Sumary Master'].YEAR1 = SYCUR.YEAR1
			AND
				['Account Sumary Master'].PERIODID <= CASE WHEN SYCUR.PERIODID = 1 THEN 0 ELSE SY.PERIODID END
		WHERE
			SY.SERIES = 2
		AND
			DATEADD(month, -1, CONVERT(DATETIME, CONVERT(VARCHAR(100), @StartDate, 126), 126)) BETWEEN SY.PERIODDT AND SY.PERDENDT
		AND
			SY.ODESCTN = 'General Entry'
	), 0) AS 'Beginning Balance'
FROM
	GL00100 AS ['Account Master'] --Breakdown Account Master (GL00100)
INNER JOIN
	GL00105 AS ['Account Index Master'] --Account Index Master (GL00105)
		ON
			['Account Index Master'].ACTINDX = ['Account Master'].ACTINDX
GO

This script is part of the SQL Scripts for Microsoft Dynamics GP where I will be posting the scripts I wrote against Microsoft Dynamics GP over the 19 years before I stopped working with Dynamics GP.

This script returns a list of active fixed assets including the linked G/L Accounts.

/*
Created by Ian Grieve of azurecurve | Ramblings of an IT Professional (http://www.azurecurve.co.uk)
This code is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 4.0 International (CC BY-NC-SA 4.0 Int).
*/

SELECT
	['Asset General Information Master'].ASSETID
	,['Asset General Information Master'].ASSETIDSUF
	,['Asset General Information Master'].SHRTNAME
	,['Asset General Information Master'].ASSETDESC
	,['Asset General Information Master'].EXTASSETDESC
	,FORMAT(GETDATE(), 'dd/MM/yyyy') AS DATEFOREVERYTHING
	,['Asset General Information Master'].ASSETCLASSID
	,['Asset General Information Master'].LOCATNID
	,['Asset General Information Master'].Physical_Location_ID
	,['Asset General Information Master'].ASSETQTY
	,['Asset Book Master'].REMAININGLIFEYEARS
	,['Asset Book Master'].REMAININGLIFEDAYS
	,['Asset Book Master'].COSTBASIS
	,['Asset Book Master'].DEPRECIATIONMETHOD
	,['Asset Book Master'].AVERAGINGCONV
	,['Asset Book Master'].SWITCHOVER
	,['Account Index Master - Depreciation Expense Account'].ACTNUMST AS 'Depreciation Expense Account'
	,['Account Index Master - Depreciation Reserve Account'].ACTNUMST AS 'Depreciation Reserve Account'
	,['Account Index Master - Prior Year Depreciation Account'].ACTNUMST AS 'Prior Year Depreciation Account'
	,['Account Index Master - Asset Cost Account'].ACTNUMST AS 'Asset Cost Account'
	,['Account Index Master - Proceeds Account'].ACTNUMST AS 'Proceeds Account'
	,['Account Index Master - Recognized Gain Loss Account'].ACTNUMST AS 'Recognized Gain Loss Account'
	,['Account Index Master - Non Recognized Gain Loss Account'].ACTNUMST AS 'Non Recognized Gain Loss Account'
	,['Account Index Master - Clearing Account'].actnumst AS 'Clearing Account'
FROM
	FA00100 AS ['Asset General Information Master'] --Asset General Information Master (FA00100)
LEFT JOIN
	FA00200 AS ['Asset Book Master'] --Asset Book Master (FA00200)
		ON
			['Asset Book Master'].[ASSETINDEX] = ['Asset General Information Master'].[ASSETINDEX]
LEFT JOIN
	FA19900 AS ['User Data Master'] --User Data Master (FA19900)
		ON
			['User Data Master'].[ASSETINDEX] = ['Asset General Information Master'].[ASSETINDEX]
LEFT JOIN
	FA00400 AS ['Asset Account Master'] --Asset Account Master (FA00400)
		ON
			['Asset Account Master'].[ASSETINDEX] = ['Asset General Information Master'].[ASSETINDEX]
LEFT JOIN
	GL00105 AS ['Account Index Master - Depreciation Expense Account'] --Account Index Master (GL00105)
		ON
			['Account Index Master - Depreciation Expense Account'].ACTINDX = ['Asset Account Master'].DEPREXPACCTINDX
LEFT JOIN
	GL00105 AS ['Account Index Master - Depreciation Reserve Account']
		ON
			['Account Index Master - Depreciation Reserve Account'].ACTINDX = ['Asset Account Master'].DEPRRESVACCTINDX
LEFT JOIN
	GL00105 AS ['Account Index Master - Prior Year Depreciation Account']
		ON
			['Account Index Master - Prior Year Depreciation Account'].ACTINDX = ['Asset Account Master'].PRIORYRDEPRACCTINDX
LEFT JOIN
	GL00105 AS ['Account Index Master - Asset Cost Account']
		ON
			['Account Index Master - Asset Cost Account'].ACTINDX = ['Asset Account Master'].ASSETCOSTACCTINDX
LEFT JOIN
	GL00105 AS ['Account Index Master - Proceeds Account']
		ON
			['Account Index Master - Proceeds Account'].ACTINDX = ['Asset Account Master'].PROCEEDSACCTINDX
LEFT JOIN
	GL00105 AS ['Account Index Master - Recognized Gain Loss Account']
		ON
			['Account Index Master - Recognized Gain Loss Account'].ACTINDX = ['Asset Account Master'].RECGAINLOSSACCTINDX
LEFT JOIN
	GL00105 AS ['Account Index Master - Non Recognized Gain Loss Account']
		ON
			['Account Index Master - Non Recognized Gain Loss Account'].ACTINDX = ['Asset Account Master'].NONRECGAINLOSSACCTINDX
LEFT JOIN
	GL00105 AS ['Account Index Master - Clearing Account']
		ON
			['Account Index Master - Clearing Account'].ACTINDX = ['Asset Account Master'].CLEARINGACCTINDX
WHERE
	['Asset General Information Master'].ASSETSTATUS = 1 --Active
ORDER BY
	['Asset General Information Master'].ASSETIDSUF

This script is part of the SQL Scripts for Microsoft Dynamics GP where I will be posting the scripts I wrote against Microsoft Dynamics GP over the 19 years before I stopped working with Dynamics GP.

This script needs to be run in the destination database; the highlighted field is the source database.

It will update the segment descriptions in the destination database from the source database so they are the same,

The script was created for a client who did updates to descriptions in one database and wanted to roll these changes through quite a few other databases. Doing the update manually or using Integration Manager would have taken substantially longer, so the below script was created.

/*
Created by Ian Grieve of azurecurve | Ramblings of an IT Professional (http://www.azurecurve.co.uk)
This code is licensed under the Creative Commons Attribution-NonCommercial-ShareAlike 4.0 International (CC BY-NC-SA 4.0 Int).
*/
UPDATE
	DESTINATION_TABLE
SET
	DESTINATION_TABLE.DSCRIPTN = SOURCE_DB.DSCRIPTN
FROM
	GL40200 AS DESTINATION_TABLE --Segment Description Master (GL40200)
INNER JOIN
	THREE..GL40200 AS SOURCE_DB --Segment Description Master (GL40200)
		ON
			SOURCE_DB.SGMTNUMB = DESTINATION_TABLE.SGMTNUMB
		AND
			OTHER.SGMNTID = DESTINATION_TABLE.SGMNTID

If you use this script, make sure you thoroughly test before running on a production system and only after taking a good backup.