Index: AX/Uitgaand/BKH/AankoopFactuur/impl/AifConverter.cls.xml
===================================================================
diff -u -r34937 -r35000
--- AX/Uitgaand/BKH/AankoopFactuur/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 34937)
+++ AX/Uitgaand/BKH/AankoopFactuur/impl/AifConverter.cls.xml	(.../AifConverter.cls.xml)	(revision 35000)
@@ -143,7 +143,7 @@
 	set Transaction.Txt = ..AankoopAPI.GeefLeverancier(Factuur.LeverancierID).GeefNaam()
 	
 	set Transaction.Invoice = Factuur.FactuurIdLeverancier
-	set Transaction.Voucher = Factuur.GeefID()
+	set Transaction.Voucher = ##class(TECH.StringUtils).AlignRight(Factuur.GeefID(),0,9)
 	
 	set Transaction.Listcode = "IncludeNot"
 	
Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestPurchaseInvoice-Create/AIF/PurchaseInvoice/Create/PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml
===================================================================
diff -u -r34948 -r35000
--- vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestPurchaseInvoice-Create/AIF/PurchaseInvoice/Create/PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml	(.../PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml)	(revision 34948)
+++ vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestPurchaseInvoice-Create/AIF/PurchaseInvoice/Create/PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml	(.../PurchaseInvoice-Create 1  - VHBE - 20160501_091500.xml)	(revision 35000)
@@ -32,7 +32,7 @@
             <TaxItemGroup>G3</TaxItemGroup>
             <TransDate>2016-05-01</TransDate>
             <Txt>BLUM JULIUS GMBH</Txt>
-            <Voucher>1</Voucher>
+            <Voucher>000000001</Voucher>
           </LedgerJournalTrans>
         </LedgerJournalTable>
       </LedgerGeneralJournal>