Index: DOM/VKP/impl/DataM/DataMOrderAPI.cls.xml =================================================================== diff -u -r44158 -r49020 --- DOM/VKP/impl/DataM/DataMOrderAPI.cls.xml (.../DataMOrderAPI.cls.xml) (revision 44158) +++ DOM/VKP/impl/DataM/DataMOrderAPI.cls.xml (.../DataMOrderAPI.cls.xml) (revision 49020) @@ -141,6 +141,10 @@ #dim Proforma As DOM.VKP.Proforma = OrderAPI.GeefProforma(FactuurID) Set Bon = ##class(DOM.VKP.impl.DataM.DataMBonInProforma).%New(BonNr,Proforma) }Else{ + #dim KlantNr As %String = $Piece(^KU1(BonNr,"F"),"\",1) + If $$$Not($D(^KUL(KlantNr,FacturatieSoort,BonNr))) && ($$$HasLength($Piece(^KU1(BonNr,"F"),"\",3))) { + Set FacturatieSoort = $Piece(^KU1(BonNr,"F"),"\",3) + } Set Bon = ##class(DOM.VKP.impl.DataM.DataMBon).%New(BonNr,FacturatieSoort) } }