Index: APPS/Halux/PPS/Document/impl/RVG/VoorbereidingSpecialWorkshop/SpecialWorkshopDataGenerator.cls.xml =================================================================== diff -u -r68896 -r69511 --- APPS/Halux/PPS/Document/impl/RVG/VoorbereidingSpecialWorkshop/SpecialWorkshopDataGenerator.cls.xml (.../SpecialWorkshopDataGenerator.cls.xml) (revision 68896) +++ APPS/Halux/PPS/Document/impl/RVG/VoorbereidingSpecialWorkshop/SpecialWorkshopDataGenerator.cls.xml (.../SpecialWorkshopDataGenerator.cls.xml) (revision 69511) @@ -88,6 +88,8 @@ Set Header.ProductId = UitvoeringInfo.ProductID Set Header.KlantID = Toelevering.GeefKlantID() Set Header.Klant = Partij.GeefNaam() + Set Header.Info1 = Toelevering.GeefOrderID() + Set Header.Info2 = ..DateTimeApi.HorologToTimeStamp(Toelevering.GeefDueOutTime()) Set Header.CustomInfo1 = Toelevering.GeefReferentie() Quit Header Index: APPS/Halux/PPS/Document/impl/RVG/VoorbereidingSpecialWorkshop.cls.xml =================================================================== diff -u -r69038 -r69511 --- APPS/Halux/PPS/Document/impl/RVG/VoorbereidingSpecialWorkshop.cls.xml (.../VoorbereidingSpecialWorkshop.cls.xml) (revision 69038) +++ APPS/Halux/PPS/Document/impl/RVG/VoorbereidingSpecialWorkshop.cls.xml (.../VoorbereidingSpecialWorkshop.cls.xml) (revision 69511) @@ -92,6 +92,7 @@ Set Index = Index + 1 #dim BestandVolledigNaam As %String = ..GeefBestandVolledigeNaam(SpecialWorkshopData.OrderData.OrderId, Index, "xml") + Set SpecialWorkshopData.OrderData.OrderId = SpecialWorkshopData.OrderData.OrderId _ "_" _ Index Do FileWriter.Open(BestandVolledigNaam) Do FileWriter.WriteXML(SpecialWorkshopData) Do FileWriter.Close()