TECH.RegisteredObject DOM.PM.ProductAPI 1 DOM.PM.ProductTypeAPI 1 TECH.File.FileWriter 1 1 1 %Status 1 1 1 %Status 1 Do ##class(zTryout.PBO.Scripts.LadeFinder).Main() 1 %ListOfObjects ELEMENTTYPE="DOM.PM.Product" "_Product.GeefKorttekst()_", Langtekst:"_Product.GeefLangtekst()) } Do FileWriter.Close() ]]> Product:DOM.PM.Product 1 %Boolean Product:DOM.PM.Product 1 %Boolean Product:DOM.PM.Product 1 %Boolean Product:DOM.PM.Product 1 %Boolean Product:DOM.PM.Product 1 %Boolean Product:DOM.PM.Product 1 %Boolean Product:DOM.PM.Product 1 %Boolean Product:DOM.PM.Product,ProductID:TECH.String