Index: zTryout/FM/DEDECKER/PickingDoc.cls.xml =================================================================== diff -u -r29059 -r30046 --- zTryout/FM/DEDECKER/PickingDoc.cls.xml (.../PickingDoc.cls.xml) (revision 29059) +++ zTryout/FM/DEDECKER/PickingDoc.cls.xml (.../PickingDoc.cls.xml) (revision 30046) @@ -31,7 +31,7 @@ Set LijnIterator = ##class(TECH.ListIterator).%New(Hoofding.Lijnen) While (LijnIterator.HasNext()) { #dim Lijn As Flow.OrderWMS.Lijn = LijnIterator.Next() - Set Etiket = ##class(BL.Etiket.MaatwerkProduct).%New("DummyPartyID") + Set Etiket = ##class(BL.Etiket.LadeKlantEtiket).%New("DummyPartyID") Set LadeCodeVisitor = ##class(APPS.Halux.Docs.impl.LadeEigenschapProductVisitor).%New(Etiket) Set BezoekbaarProduct = ##class(DOM.PM.BezoekbaarProduct).%New(Lijn.Product.ProductNr) Do BezoekbaarProduct.Accept(LadeCodeVisitor)