Index: vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/TestBtwUitsplitsing.cls.xml =================================================================== diff -u -r35241 -r35733 --- vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/TestBtwUitsplitsing.cls.xml (.../TestBtwUitsplitsing.cls.xml) (revision 35241) +++ vhUnitTest/AX/Uitgaand/VKP/VerkoopFactuur/impl/AifConverter/TestBtwUitsplitsing.cls.xml (.../TestBtwUitsplitsing.cls.xml) (revision 35733) @@ -100,11 +100,11 @@ #dim JournalTable As AXaif.LedgerGeneralJournal.AxdEntityLedgerJournalTable = ..GetJournalTable(VerkoopFactuur) do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(1).AmountCurCredit,"924.82") - do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(1).CashDiscAmount,"15.34") + do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(1).CashDiscAmount,"-15.34") do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(2).LedgerDimension.GetAt(1).Account,"703110") do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(2).ADUCorrectedTaxAmount,"157.84") - do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(2).CashDiscAmount,"-15.34") + do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(2).CashDiscAmount,"15.34") do $$$AssertEquals(JournalTable.LedgerJournalTrans.GetAt(2).AmountCurDebit,"924.82") ]]> Index: AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml =================================================================== diff -u -r35615 -r35733 --- AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml (.../SalesInvoiceConverter.cls.xml) (revision 35615) +++ AXimpl/AifMessage/Converter/SalesInvoiceConverter.cls.xml (.../SalesInvoiceConverter.cls.xml) (revision 35733) @@ -125,6 +125,8 @@ set Transaction.ADUCorrectedTaxAmount = ..Formatter.FormatNumber( Factuur.GeefTotaalBTW() / ..TotaalGoederenInclusiefPort * BoekingBedrag ,2) set Transaction.CashDiscAmount = ..Formatter.FormatNumber( -1 * ( Factuur.GeefTotaalKortingKontant() / ..TotaalGoederenInclusiefPort * BoekingBedrag ) ,2) + + set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.CashDiscAmount = Transaction.CashDiscAmount * -1 set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Factuur()) Transaction.AmountCurCredit = ..Formatter.FormatNumber(BoekingBedrag + Transaction.ADUCorrectedTaxAmount ,2) set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.AmountCurDebit = ..Formatter.FormatNumber(-1 * (BoekingBedrag - Transaction.ADUCorrectedTaxAmount) ,2) @@ -151,9 +153,11 @@ set Transaction.PaymMode = $$$If(Factuur.GeefKlant().GeefBetalingwijze()=##class(DOM.VKP.enu.Betalingwijze).Incasso(),"SEPA-DD","OVER") set Transaction.CashDiscAmount = ..Formatter.FormatNumber(Factuur.GeefTotaalKortingKontant(),2) + set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.CashDiscAmount = Transaction.CashDiscAmount * -1 set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Factuur()) Transaction.AmountCurDebit = ..Formatter.FormatNumber(Factuur.GeefTotaalTeBetalen(),2) set:(Factuur.GeefFactuurCode()=##class(DOM.VKP.Factuur.enu.FactuurType).Creditnota()) Transaction.AmountCurCredit = ..Formatter.FormatNumber(Factuur.GeefTotaalTeBetalen(),2) + set Transaction.LedgerDimension.GetAt(1).Account = ..Formatter.FormatAccountNumber(Factuur.GeefKlantNr()) set Transaction.LedgerDimension.GetAt(1).DisplayValue = ..Formatter.FormatAccountNumber(Factuur.GeefKlantNr())_" - "_Factuur.GeefKlant().GeefNaam() Index: vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestCustomer-Create/AIF/Customer/Create/Customer-Create K1234 - VHBE - 20160501_091500.xml =================================================================== diff -u -r35610 -r35733 --- vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestCustomer-Create/AIF/Customer/Create/Customer-Create K1234 - VHBE - 20160501_091500.xml (.../Customer-Create K1234 - VHBE - 20160501_091500.xml) (revision 35610) +++ vhTestFiles/UnitTests/AX.Uitgaand.common.impl.AifGenerator.Generate/Test/TestCustomer-Create/AIF/Customer/Create/Customer-Create K1234 - VHBE - 20160501_091500.xml (.../Customer-Create K1234 - VHBE - 20160501_091500.xml) (revision 35733) @@ -21,6 +21,7 @@ OVER NET30 BDOM + Normal All nl-be