Index: BL/Legacy/FLOW.cls.xml =================================================================== diff -u -r67681 -r67867 --- BL/Legacy/FLOW.cls.xml (.../FLOW.cls.xml) (revision 67681) +++ BL/Legacy/FLOW.cls.xml (.../FLOW.cls.xml) (revision 67867) @@ -155,6 +155,7 @@ If $IsObject($Get(Toelevering)) { Do Toelevering.ZetBestelBevestigingNr(JournaalId) + Do Toelevering.ZetReferentie("AFDRUK VOORRAAD") Do Toelevering.Save() Set ToeleveringID = Toelevering.GeefID() }