Index: AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml =================================================================== diff -u -r34713 -r34717 --- AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml (.../AifConverter.cls.xml) (revision 34713) +++ AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml (.../AifConverter.cls.xml) (revision 34717) @@ -131,9 +131,9 @@ set Transaction.Txt = Factuur.GeefKlant().GeefNaam() set Transaction.DocumentNum = "F"_$extract(Factuur.GeefID(),1,3)_"."_$extract(Factuur.GeefID(),4,6) + set Transaction.Invoice = "F"_Factuur.GeefID() set Transaction.Voucher = "F"_Factuur.GeefID() - quit Transaction ]]> Index: vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml =================================================================== diff -u -r34714 -r34717 --- vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml (.../Test.cls.xml) (revision 34714) +++ vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml (.../Test.cls.xml) (revision 34717) @@ -140,6 +140,7 @@ do $$$AssertEquals(Transactie.Txt,"DE KLANTNAAM") do $$$AssertEquals(Transactie.TransDate,"2011-06-30") do $$$AssertEquals(Transactie.DocumentNum,"F123.456") + do $$$AssertEquals(Transactie.Invoice,"F123456") do $$$AssertEquals(Transactie.Voucher,"F123456") ]]> @@ -158,6 +159,7 @@ do $$$AssertEquals(Transactie.OffsetAccountType,"Ledger") do $$$AssertEquals(Transactie.Txt,"DE KLANTNAAM") do $$$AssertEquals(Transactie.TransDate,"2011-06-30") + do $$$AssertEquals(Transactie.Invoice,"F123456") do $$$AssertEquals(Transactie.Voucher,"F123456") ]]>