Index: AX/Uitgaand/EC/Data/impl/HelperLeveringenOphalenAlsOrder.cls.xml =================================================================== diff -u -r38840 -r49997 --- AX/Uitgaand/EC/Data/impl/HelperLeveringenOphalenAlsOrder.cls.xml (.../HelperLeveringenOphalenAlsOrder.cls.xml) (revision 38840) +++ AX/Uitgaand/EC/Data/impl/HelperLeveringenOphalenAlsOrder.cls.xml (.../HelperLeveringenOphalenAlsOrder.cls.xml) (revision 49997) @@ -60,7 +60,7 @@ Set OrderRec=$LG(lbHoofding,3) ; KF5 lijn in KUl of KFA Set LeveringRec=$LG(lbHoofding,5) ; KF5 lijn in KUl of KFA Set pxHoofding.OrderDatum=$$INTDATE^vhLib.DataTypes($P($P(OrderRec,"\",5)," - ",2),"DK") - Set pxHoofding.OrderReferentie=$P($P(OrderRec,"\",5)," - ",3) + Set pxHoofding.OrderReferentie=$P($P(OrderRec,"\",5)," - ",3,99) Set:$P(OrderRec,"\",35)'="" pxHoofding.OrderReferentie=$P(OrderRec,"\",35) ; specieke EDI referentie Set pxHoofding.VerzendWijze=$P($P(LeveringRec,"\",7)," #") ;Set pxHoofding.EDIReferentie=$P(OrderRec,"\",40)