Index: FLOWORD7.mac.rou =================================================================== diff -u -r69022 -r69023 --- FLOWORD7.mac.rou (.../FLOWORD7.mac.rou) (revision 69022) +++ FLOWORD7.mac.rou (.../FLOWORD7.mac.rou) (revision 69023) @@ -461,7 +461,6 @@ New R,KLNr,LEVNr,TOENr,PRNr,FBLocal,Data Set KLNr=$P(^KO1(ORDNr,"F"),D),LEVNr="" For Set LEVNr=$O(Control("T",LEVNr)) Quit:(LEVNr="")||'(##class(BL.Legacy.FLOWORD7).IsLeverancierHaluxOfVanHoeckeMetRevego(LEVNr, ORDNr)) Do - . Do ##class(Tools.Wlip).%New(26).String("Test maken toelevering") . Kill PRNr . Merge PRNr=Control("T",LEVNr) . Do BUILDOBJ^FLOWTOE(.PRNr,KLNr_" - "_ORDNr,1,,"FBLocal")