Index: INTRAST.mac.rou
===================================================================
diff -u -r734 -r2612
--- INTRAST.mac.rou	(.../INTRAST.mac.rou)	(revision 734)
+++ INTRAST.mac.rou	(.../INTRAST.mac.rou)	(revision 2612)
@@ -229,8 +229,8 @@
  New MailId
  Quit:+$ZDATE($H,3)'=3
  Do VERWERK()
- Set MailId=$$SYSTEM^vhMAIL("","","INTRASTAT",6,"Klaarmaken intrastat","","A")
- Set:+$P($ZDATE($H,3),"/",2)#3=1 MailId=$$SYSTEM^vhMAIL("","","STATISTIEKEN",17,"Klaarmaken verkoop en aankoop statistieken","","A")
+ Set MailId=$$SYSTEM^vhMAIL("","","INTRASTAT",6,"Klaarmaken intrastat","","A") ; nr Hendrik
+ ;Set:+$P($ZDATE($H,3),"/",2)#3=1 MailId=$$SYSTEM^vhMAIL("","","STATISTIEKEN",17,"Klaarmaken verkoop en aankoop statistieken","","A")
  Quit
  
  ; Bereken van de intrastat gegevens
@@ -313,6 +313,21 @@
  Lock
  Quit
  ;
+ ;
+ ;Land bestemming     
+ ;Land herkomst       
+ ;Vervoer             
+ ;Haven               
+ ;Aard transaktie A   
+ ;Aard transaktie B   
+ ;GN8 kode            
+ ;Gewicht             
+ ;Aanvullende eenheden
+ ;Statistische waarde 
+ ;Faktuurwaarde       
+ ;Gewest              
+ ;Leveringsvoorwaarde 
+ 
 FILENM(Output,Datum) 
  New Maand,Jaar
  Set Maand=$$EXTDATE^vhDTyp($$INTDATE^vhDTyp(Datum,"DM"),"MN")