Index: AX/Uitgaand/VKP/OpenstaandeKlantFactuur/impl/DixfConverter.cls.xml =================================================================== diff -u -r35105 -r35116 --- AX/Uitgaand/VKP/OpenstaandeKlantFactuur/impl/DixfConverter.cls.xml (.../DixfConverter.cls.xml) (revision 35105) +++ AX/Uitgaand/VKP/OpenstaandeKlantFactuur/impl/DixfConverter.cls.xml (.../DixfConverter.cls.xml) (revision 35116) @@ -60,7 +60,7 @@ Set AxUnpaidInvoice = ##class(AXdixf.UnpaidInvoice.UnpaidInvoice).%New() Set AxUnpaidInvoice.JournalNum = "GL01000001" Set AxUnpaidInvoice.JournalName = "OP" - Set AxUnpaidInvoice.Voucher = "OP16"_##class(TECH.StringUtils).AlignRight(LineNum,0,4) + Set AxUnpaidInvoice.Voucher = "OP16"_##class(TECH.StringUtils).AlignRight(LineNum,0,6) Set AxUnpaidInvoice.LineNum = LineNum Set AxUnpaidInvoice.TransDate = "30/06/2016" Set AxUnpaidInvoice.Company = ..FirmaBepaler.GeefInitialen() Index: vhUnitTest/AX/Uitgaand/VKP/OpenstaandeKlantFactuur/impl/DixfConverter/Test.cls.xml =================================================================== diff -u -r35105 -r35116 --- vhUnitTest/AX/Uitgaand/VKP/OpenstaandeKlantFactuur/impl/DixfConverter/Test.cls.xml (.../Test.cls.xml) (revision 35105) +++ vhUnitTest/AX/Uitgaand/VKP/OpenstaandeKlantFactuur/impl/DixfConverter/Test.cls.xml (.../Test.cls.xml) (revision 35116) @@ -232,7 +232,7 @@ Set Converter = ##class(AX.Uitgaand.VKP.OpenstaandeKlantFactuur.impl.DixfConverter).%New() Set ..AxUnpaidInvoice = Converter.Convert(..KlantID, ..OpenstaandeFactuur, 12) - Do $$$AssertEquals(..AxUnpaidInvoice.Voucher,"OP160012","") + Do $$$AssertEquals(..AxUnpaidInvoice.Voucher,"OP16000012","") ]]>