Index: HADOPV.mac.rou
===================================================================
diff -u -r3123 -r3134
--- HADOPV.mac.rou	(.../HADOPV.mac.rou)	(revision 3123)
+++ HADOPV.mac.rou	(.../HADOPV.mac.rou)	(revision 3134)
@@ -447,6 +447,7 @@
  Quit $E(RetStr,2,999)
  
 FABKEYO(KLNr,ORDNr,OLUNr) ; Berekenen van de FABRICAGE sleutel vertrekkend van een order
+	New OLNr,OLRec,TOENr,TLNr,LEVNr,TLUNr
  	Set:'$G(KLNr) KLNr=$P(^KO1(ORDNr,"F"),"\")
 	Set OLNr=^ORD("IU",ORDNr,OLUNr)
 	Set OLRec=^KOD(KLNr,"F",ORDNr,OLNr)
@@ -480,6 +481,7 @@
 	
 	; Controle of het order of een orderlijn reeds geactiveerd is voor productie in HALUX
 IsActiefOrder(ORDNr,OLUNr)
+	New KLNr,OLNr,IsActief
  	Set KLNr=$P(^KO1(ORDNr,"F"),"\")
  	If $G(OLUNr) Do
 	. Set IsActief=$$IsActief($$FABKEYO(KLNr,ORDNr,OLUNr))