Index: vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml =================================================================== diff -u -r34868 -r34911 --- vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml (.../Test.cls.xml) (revision 34868) +++ vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/Test.cls.xml (.../Test.cls.xml) (revision 34911) @@ -95,23 +95,6 @@ ]]> - - - - @@ -204,8 +187,8 @@ do $$$AssertEquals(Transactie.TaxGroup,"BDOM") do $$$AssertEquals(Transactie.TaxItemGroup,"G3") do $$$AssertEquals(Transactie.TransDate,$$INTDATE^vhLib.DataTypes("2011-06-30")) - do $$$AssertEquals(Transactie.Invoice,"F123456") - do $$$AssertEquals(Transactie.Voucher,"F123456") + do $$$AssertEquals(Transactie.Invoice,"123456") + do $$$AssertEquals(Transactie.Voucher,"123456") ]]> Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopfactuur-export/AIF/Inbound/SalesInvoice-Create 300500 - VHBE - 20160501_091500.xml =================================================================== diff -u -r34870 -r34911 --- vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopfactuur-export/AIF/Inbound/SalesInvoice-Create 300500 - VHBE - 20160501_091500.xml (.../SalesInvoice-Create 300500 - VHBE - 20160501_091500.xml) (revision 34870) +++ vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopfactuur-export/AIF/Inbound/SalesInvoice-Create 300500 - VHBE - 20160501_091500.xml (.../SalesInvoice-Create 300500 - VHBE - 20160501_091500.xml) (revision 34911) @@ -19,9 +19,9 @@ VHBE EUR 2016-05-21 - F300.500 + 300500 2016-06-13 - F300500 + 300500 01313 - HEREMANS KEUKENS 01313 @@ -40,7 +40,7 @@ G3 2016-05-13 HEREMANS KEUKENS - F300500 + 300500 Ledger @@ -51,9 +51,9 @@ VHBE EUR 2016-05-21 - F300.500 + 300500 2016-06-13 - F300500 + 300500 703100 703100 @@ -71,7 +71,7 @@ G3 2016-05-13 HEREMANS KEUKENS - F300500 + 300500 Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689 - VHBE - 20160501_091500.xml =================================================================== diff -u -r34870 -r34911 --- vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689 - VHBE - 20160501_091500.xml (.../SalesInvoice-Create 586689 - VHBE - 20160501_091500.xml) (revision 34870) +++ vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestVerkoopcreditnota-export/AIF/Inbound/SalesInvoice-Create 586689 - VHBE - 20160501_091500.xml (.../SalesInvoice-Create 586689 - VHBE - 20160501_091500.xml) (revision 34911) @@ -19,9 +19,9 @@ VHBE EUR 2016-03-30 - F586.689 + 586689 2016-04-22 - F586689 + 586689 09283 @@ -40,7 +40,7 @@ G3 2016-03-22 - F586689 + 586689 Ledger @@ -51,9 +51,9 @@ VHBE EUR 2016-03-30 - F586.689 + 586689 2016-04-22 - F586689 + 586689 703000 703000 @@ -71,7 +71,7 @@ G3 2016-03-22 - F586689 + 586689 Index: AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml =================================================================== diff -u -r34868 -r34911 --- AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml (.../AifConverter.cls.xml) (revision 34868) +++ AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter.cls.xml (.../AifConverter.cls.xml) (revision 34911) @@ -159,12 +159,10 @@ set Transaction.Txt = Factuur.GeefKlant().GeefNaam() - #dim DocumentPrefix As %String = $$$If(Factuur.GeefFactuurCode()="F","F","CN") + set Transaction.DocumentNum = Factuur.GeefID() + set Transaction.Invoice = Factuur.GeefID() + set Transaction.Voucher = Factuur.GeefID() - set Transaction.DocumentNum = DocumentPrefix_$extract(Factuur.GeefID(),1,3)_"."_$extract(Factuur.GeefID(),4,6) - set Transaction.Invoice = DocumentPrefix_Factuur.GeefID() - set Transaction.Voucher = "F"_Factuur.GeefID() - set LedgerDimension = ##class(AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalDimension).%New() set LedgerDimensionValues = ##class(AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalDimensionAttributeValue).%New() set LedgerDimensionValues.Name = "Klant"