Index: EWORDS6.mac.rou
===================================================================
diff -u -r49860 -r51181
--- EWORDS6.mac.rou	(.../EWORDS6.mac.rou)	(revision 49860)
+++ EWORDS6.mac.rou	(.../EWORDS6.mac.rou)	(revision 51181)
@@ -232,27 +232,39 @@
 CheckAutoSend(ORDNr)
  New Check,fc
  Set Check=$$SendWMSStatus(ORDNr)="A" ; Status i.v.m. het doorsturen is automatisch
+ ;w:$G(io)=1015 0,Check," "
  
  /// Niet automatisch doorsturen indien we - om de leverdatum te halen - al te laat zijn of pas later dan morgen moeten doorsturen.
  Set:Check Check=##class(BL.Legacy.EWORDS6).PickingVoorVandaagVolgendeArbeidsdagOfAndereDag(ORDNr)
- 
+ ;w:$G(io)=1015 1,Check," "
  Set:Check Check=$$OrderGesloten(ORDNr) 
+ ;w:$G(io)=1015 2,Check," "
  Set:Check Check='$$IsContractOfAfroep(ORDNr)
+ ;w:$G(io)=1015 3,Check," "
  Set:Check Check='$$IsTerugname(ORDNr)
+ ;w:$G(io)=1015 4,Check," "
  Set:Check Check='$$InWMS(ORDNr)
+ ;w:$G(io)=1015 5,Check," "
  Set:Check Check=$$CheckStock(ORDNr)
+ ;w:$G(io)=1015 6,Check," "
  Set:Check Check=$$MagazijnBeschikbaar(ORDNr)
+ ;w:$G(io)=1015 7,Check," "
  Set:Check Check=##class(APPS.OrderUitvoering.DoorsturenOrderPickingService).%New().OrderKanWordenDoorgestuurd(ORDNr)
+ ;w:$G(io)=1015 8,Check," "
  Set:Check Check=##class(BL.Legacy.EWTOE).OrderStaatVolledigBijVanHoecke(ORDNr)
+ ;w:$G(io)=1015 9,Check," "
  If Check {  ; Indien de magazijnen beschikbaar zijn, de forecast herberekenen en de beschikbaarheid terug controleren
 	 Set fc=$$FETCHSOM^EWSTAT()
 	 Do CheckTijdsraming^EWORDSM()
 	 Set Check=$$MagazijnBeschikbaar(ORDNr)
  }
+ ;w:$G(io)=1015 10,Check," "
+ 
  If Check {
 	 Do:'$$CheckKredietwaardig(ORDNr) MarkeerKredietProbleemInORDNr^EWORDS3(ORDNr,"A")
 	 Set Check=$$CheckBoekhouding(ORDNr)
  }
+ ;w:$G(io)=1015 11,Check," "
  Quit Check
  
  ; Geef de status van een order i.v.m. het doorsturen
@@ -426,6 +438,7 @@
 	 Set WVTekort=$S(WVStock<WVRes:WVRes-WVStock,1:"")
  }
  Set PraStock=##class(APPS.common.StockNiveauServiceFactory).Maak(PRNr).GeefPraktischeStock()
+ ;Set PraStock=##class(APPS.common.StockNiveauServiceFactory).Maak(PRNr).GeefFysischeStockMinReservaties() ; AX werkt heeft door CTP de beloofde datum correct gezet dus controle op fysieke stock 
  Set PraStock=PraStock+Aantal ; Aantal reeds verrekend in de praktische stock dus terug bijtellen
  Set PraStock=$S(PraStock-WVTekort<0:0,1:PraStock-WVTekort)
  Set InStock=(Aantal'>PraStock)