Index: APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler.cls.xml =================================================================== diff -u -r38455 -r51409 --- APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler.cls.xml (.../AanvraagHeaderBepaler.cls.xml) (revision 38455) +++ APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler.cls.xml (.../AanvraagHeaderBepaler.cls.xml) (revision 51409) @@ -23,6 +23,11 @@ Set Header.KlantID = "K||23112" Set Header.GebruikerID = "4682||1000" Set Header.PersonalityID = ##class(DOM.common.enu.Personality).VanHoecke() + } ElseIf (##class(TECH.StringUtils).StartsWith(##class(TECH.File).GeefBestandsnaam(BestandVolledigeNaam),"trouilliez_be")) { + Set Header.Taal = ##class(DOM.enu.Taal).Nederlands() + Set Header.KlantID = "K||14348" + Set Header.GebruikerID = "4682||1000" + Set Header.PersonalityID = ##class(DOM.common.enu.Personality).VanHoecke() } Else { Do ##class(TECH.Exceptions.InvalidInputException).Throw("BestandVerwerker : ongeldige Bestandnaam '"_BestandVolledigeNaam_"'.") } Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler/Test.cls.xml =================================================================== diff -u -r38455 -r51409 --- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler/Test.cls.xml (.../Test.cls.xml) (revision 38455) +++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/PlaatsBestelling/AanvraagHeaderBepaler/Test.cls.xml (.../Test.cls.xml) (revision 51409) @@ -33,6 +33,21 @@ ]]> + + + +