EX_InsertTree( maske, merkmal, zeile, stufe, text, data )

local str = require( "de.syslog.string" )
local db = require( "de.syslog.db" )

local maske = 1
local merkmal = "TREE"

-- Prüfen ob Root bereits vorhanden
if not EX_GetTreeItem( maske, merkmal, 1 ) then
	-- Falls nicht dann Root einfügen
	EX_InsertTree( maske, merkmal, 1, 1, "Artikelübersicht", "Root" )
end

-- Alle Einträge im Root löschen
while EX_DeleteTree( maske, merkmal, 2 ) do end

local zeile = 2

-- Beispiel: Artikelgruppen anzeigen
for agrtab in db.iter( "SELECT FIRST 10 artgr FROM agrtab WHERE finr = " .. SysLogFinr ) do
	-- Eintrag auf Stufe 2 (unter Root) einfügen
	EX_InsertTree( maske, merkmal, zeile, 2, "Artikelgruppe '" .. agrtab.artgr .. "'", agrtab.artgr )
	zeile = zeile + 1

	-- Beispiel: Artikel zu Artikelgruppen untergeordnet anzeigen
	for arttab in db.iter( "SELECT FIRST 10 artnr FROM arttab WHERE finr = " .. SysLogFinr .. " AND artgr = " .. agrtab.artgr ) do
		-- Eintrag auf Stufe 3 einfügen
		EX_InsertTree( maske, merkmal, zeile, 3, "Artikel '" .. str.trim( arttab.artnr ) .. "'", arttab.artnr )
		zeile = zeile + 1

		for stptab in db.iter( "SELECT FIRST 10 artnru FROM stptab WHERE finr = " .. SysLogFinr .. " AND artnr = '" .. arttab.artnr .. "'" ) do
			-- Eintrag auf Stufe 4 einfügen
			EX_InsertTree( maske, merkmal, zeile, 4, "Komponente '" .. str.trim( stptab.artnru ) .. "'", stptab.artnru )
			zeile = zeile + 1
		end
	end
end