Index: FCINK.mac.rou
===================================================================
diff -u -r34787 -r35415
--- FCINK.mac.rou	(.../FCINK.mac.rou)	(revision 34787)
+++ FCINK.mac.rou	(.../FCINK.mac.rou)	(revision 35415)
@@ -12,7 +12,7 @@
  Set BR=$S(LEVNr=5005:"604100 ",1:""),R=$$MNTC^cAFE1(Q,BJ),BF=$P(R,D),QD=$P(R,D,2)
  Quit:BR="" 0
 
- if LEVNr=5005 {
+ if ( BP]"2016.06" ) && ( LEVNr=5005 ) {
 	 new Repo,AankoopFactuur,AifGenerator
 	 set Repo = ##class(DOM.AKP.AankoopFactuur.impl.AankoopFactuurRepository).%New()
 	 #dim AankoopFactuur As DOM.AKP.AankoopFactuur.data.AankoopFactuur = Repo.Maak()
@@ -32,9 +32,9 @@
 	 
 	 set AifGenerator = ##class(AX.Uitgaand.common.impl.AifGenerator).%New()
 	 do AifGenerator.Generate("PurchaseInvoice/Create",AankoopFactuur.GeefID())
+	 quit "999999"
  }
 
-
  Set KC=LEVNr,FC="F",OM1="",COM=LevFANr,VM=Munt,MPAR=$J(Pariteit,0,4),SWTOL=0
  Set (LREF,BTWOH,BTWMC,BTWVL,NABTW,NETD,NETI,NETA,SRT,SWX,DVO)=""
  If Bedrag<0 Set FC="C",Bedrag=-Bedrag,MaatStaf=-MaatStaf,Btw=-Btw,KontKort=-KontKort