Index: BL/Flow/Offerte/Offerte.cls.xml =================================================================== diff -u -r1695 -r1706 --- BL/Flow/Offerte/Offerte.cls.xml (.../Offerte.cls.xml) (revision 1695) +++ BL/Flow/Offerte/Offerte.cls.xml (.../Offerte.cls.xml) (revision 1706) @@ -199,9 +199,14 @@ . . . . Set $P(List(Count),D,5)=$P(List(Count),D,5)_", "_$P(Product,", "),Product=$P(Product,", ",2,999) . . . Set $P(List(Count),D,5)=$E($P(List(Count),D,5),3,99) Set Offerte("H")=OfferteNr_D_KLNr_D_Obj.Status_D_$$Strip(Obj.Referentie)_D_Obj.Datum_D_$$Strip(Obj.Afzender)_D_$$Strip(Obj.Geadresseerde)_D_$$Strip(Obj.CommReferentie) + Set $P(Offerte("H","Default"),"\",51)=oOfferte.EtiketKlantNaam ; Added by WimV on 14/07/2011 Set $P(Offerte("H","Default"),"\",52)=oOfferte.EtiketWoonplaats ; Added by WimV on 14/07/2011 + Set $P(Offerte("H","Default"),"\",53)=oOfferte.Oorsprong + Set $P(Offerte("H","Default"),"\",54)=oOfferte.OorsprongDetail + + ;d WLIP^vhDBG(97,"VerwerkOfferte : "_oOfferte_" Etiket: "_oOfferte.EtiketKlantNaam_" + "_oOfferte.EtiketWoonplaats) d WLIP^vhDBG(97,"array Offerte :"_$$$ArrayTT("Offerte",.Offerte))