Index: DOM/PM/impl/TAORLangtekstCreator.cls.xml =================================================================== diff -u -r30785 -r30786 --- DOM/PM/impl/TAORLangtekstCreator.cls.xml (.../TAORLangtekstCreator.cls.xml) (revision 30785) +++ DOM/PM/impl/TAORLangtekstCreator.cls.xml (.../TAORLangtekstCreator.cls.xml) (revision 30786) @@ -134,7 +134,13 @@ } If ..Lade.GeefZijkanten().Count() > 0 { #dim Zijkant As DOM.PM.Maatwerk.LadeInfo.Zijkant = ..Lade.GeefZijkanten().GetAt(1) - Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("ladezijkant", "", $$$True) _ ":" _ ..KleurCodeVertaler.GeefVertaling(Zijkant.GeefKleur())) + #dim Kleuren As %ArrayOfDataTypes = Zijkant.GeefKleuren() + If Kleuren.GetAt(1) = Kleuren.GetAt(2) { + Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("ladezijkant", "", $$$True) _ ":" _ ..KleurCodeVertaler.GeefVertaling(Zijkant.GeefKleur())) + } Else { + Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("KleurBinnenkant", "", $$$True) _ ":" _ ..KleurCodeVertaler.GeefVertaling(Kleuren.GetAt(1))) + Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("KleurBuitenkant", "", $$$True) _ ":" _ ..KleurCodeVertaler.GeefVertaling(Kleuren.GetAt(2))) + } } Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("kantenband", "", $$$True) _ ":" _ ..KleurCodeVertaler.GeefVertaling(..Lade.GeefKleur())) ]]>