Index: FLOWHALUX.mac.rou
===================================================================
diff -u -r54336 -r59780
--- FLOWHALUX.mac.rou	(.../FLOWHALUX.mac.rou)	(revision 54336)
+++ FLOWHALUX.mac.rou	(.../FLOWHALUX.mac.rou)	(revision 59780)
@@ -65,7 +65,7 @@
  . If 'LeverDatum Do
  . . Set LeverDatum=$$DefaultFromWeek(PRNr,ToeLevWk)
  . ; omzetting van leverdag naar productie DueOut
- . Set DueOut=blLeveringsTermijn.GetLaatsteProductieTijdstip(LeverDatum)
+ . Set DueOut=blLeveringsTermijn.GetLaatsteProductieTijdstip(LeverDatum, PRNr)
  . If DateComparator.IsKleinerDan(+DueOut,CurrentDate) Do
  . . if (CurrentDate=LeverDatum) && (+DueOut=$$CALCDATE^vhLib.DataTypes(CurrentDate,"A",-1)) Do
  . . . set $Piece(DueOut,",",1) = CurrentDate