Index: BL/Blum/LogSteuer.cls.xml =================================================================== diff -u -r1074 -r2589 --- BL/Blum/LogSteuer.cls.xml (.../LogSteuer.cls.xml) (revision 1074) +++ BL/Blum/LogSteuer.cls.xml (.../LogSteuer.cls.xml) (revision 2589) @@ -9,7 +9,7 @@ S BL=##class(BL.Blum.LogSteuer).%New() D BL.Initialize(3551) s Ok=BL.RemoveUitzondering($H) w $$ParseStatus^vhLib(Ok) S List=##class(BL.Blum.LogSteuer).%AantallenScan(3551,$H,10,1) w $$ListToPieces^vhLib(List,",") S RS=##class(%ResultSet).%New("BL.Blum.LogSteuer:Scan") D RS.Execute() d RS.Next() m Data=RS.Data zw Data d RS.Next() m Data=RS.Data zw Data -%Prod.Product +Prod.Product 1 %RegisteredObject 0