Sub ShowWinLineDocOverview(DocNumber, AccountNumber, RunningNumber)

	'Version Date 22.09.2020

	'Call "Beleg" Window
	MApplication 2
	MWindow 774, false
	MTreeExpand 774, 102, 321566992, 100
	MTreeSelChange 774, 102, 321566992, 1001
	MActivateWindow 774

	IF (DocNumber <> "") and (AccountNumber <> "") and (RunningNumber <> "") Then

		'Set time periode (12 = alle Jahre)
		MSetFieldValue 774, 105, "12"

		'Set area (1 = Verkauf/Einkauf)
		MSetFieldValue 774, 107, "1"

		'Set Account number (Kundennummern)
		MSetFieldValue 774, 115, AccountNumber

		'Set doc number (Belegnummer)
		MSetFieldValue 774, 117, DocNumber

		'Set Running Nr (Laufnummer)
		MSetFieldValue 774, 191, RunningNumber

		'Click the ok Button
		MPushButton 774, 98, 0

	End If

End Sub