WD26 Create XML file April 04, 2022 02:24PM |
Registered: 5 years ago Posts: 114 |
MaxTeller = HNbRec(TblArticles) Teller = 0 FOR EACH TblArticles Teller ++ ProgressBar(Teller,MaxTeller, "Prepare items for checkout [%Teller%]/[%MaxTeller%]") INT_FillXmlData() END XMLSave(ArticleXML file,NameXML file,XMLFormatting) INTERNAL PROCEDURE INT_VulXmlData() ArtikelXMLbestand.job.command.data.plu[Teller].code = TblArtikelen.TblArtikelnr ArtikelXMLbestand.job.command.data.plu[Teller].name = NoSpace(TblArtikelen.Omschrijving1) ArtikelXMLbestand.job.command.data.plu[Teller].text2 = NoSpace(TblArtikelen.Omschrijving2) ArtikelXMLbestand.job.command.data.plu[Teller].department = TblArtikelen.TblSubgroepnr ArtikelXMLbestand.job.command.data.plu[Teller].isopen = TblArtikelen.PrijsAanpasbaar = 1 ? "true" ELSE "false" ArtikelXMLbestand.job.command.data.plu[Teller].isactive = TblArtikelen.Inactief = 0 ? "true" ELSE "false" ArtikelXMLbestand.job.command.data.plu[Teller].isnegative = TblArtikelen.Isnegatief = 1 ? "true" ELSE "false" ArtikelXMLbestand.job.command.data.plu[Teller].isscaleproduct = TblArtikelen.GewichtArtikel = 1 ? "true" ELSE "false" ArtikelXMLbestand.job.command.data.plu[Teller].tare_mode = "Fixedtare" ArtikelXMLbestand.job.command.data.plu[Teller].shelflife = TblArtikelen.THT ArtikelXMLbestand.job.command.data.plu[Teller].IsDeposit END
Argus
Re: WD26 Create XML file April 04, 2022 10:40PM |
Re: WD26 Create XML file April 05, 2022 06:43PM |
Registered: 5 years ago Posts: 114 |
Re: WD26 Create XML file April 17, 2022 06:43PM |
Registered: 5 years ago Posts: 114 |
Re: WD26 Create XML file April 19, 2022 11:33AM |
Registered: 3 years ago Posts: 46 |