Index: AX/Uitgaand/VKP/Klant/impl/KlantDixfGenerator.cls.xml =================================================================== diff -u -r48676 -r48726 --- AX/Uitgaand/VKP/Klant/impl/KlantDixfGenerator.cls.xml (.../KlantDixfGenerator.cls.xml) (revision 48676) +++ AX/Uitgaand/VKP/Klant/impl/KlantDixfGenerator.cls.xml (.../KlantDixfGenerator.cls.xml) (revision 48726) @@ -29,8 +29,8 @@ Set AXKlantData = ##class(APPS.common.Rapport.dto.BestandRapportDataObjectIteratorBased).%New() Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ADUPriceGroupId") Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AccountNum") - Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AddressEmail") - Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AddressName") + //Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AddressEmail") + //Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "AddressName") Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "Blocked") Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "CellularPhone") Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "CountryRegionId") @@ -45,10 +45,30 @@ Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "DlvTerm") Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "SalesCalendarId") Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "InclTax") - Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "CashDisc") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "CashDisc") Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ADUCreditStatus") Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ADUCreditInsuredAmount") - + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ZipCode") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "City") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "Street") + // Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "PhoneName") + // Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "Phone") + // Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "EmailName") + // Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "Email") + // Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "TeleFaxName") + // Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "TeleFax") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "EnterpriseNumber") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "VATNum") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "LocationRole") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "PaymMode") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "UseCashDisc") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ADUPostageDlvModeId") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ADUPostageEnableCalc") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ADUPostageFreeAmount") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "ADUImported") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "PaymTermId") + Do AXKlantData.VoegToeVeld("AXdixf.Klant.Klant", "WebSalesOrderDisplay") + Set AXKlantData.ScheidingsTeken = ";" Set AXKlantData.Iterator = KlantIterator Set AXKlantData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"0101_VHBE_Klant.csv")