Index: UI/PR/GA/dlgTBSpoelbak.cls.xml
===================================================================
diff -u -r1664 -r1789
--- UI/PR/GA/dlgTBSpoelbak.cls.xml	(.../dlgTBSpoelbak.cls.xml)	(revision 1664)
+++ UI/PR/GA/dlgTBSpoelbak.cls.xml	(.../dlgTBSpoelbak.cls.xml)	(revision 1789)
@@ -345,10 +345,32 @@
  Set ..zzLabel3.Caption=$S(..blnIsNieuweSifonlade || ..blnSyfonLade:"Rug rechts sifonlade", 1:"Spoelbak zijkant Rechts")
  Set ..zzLabel2.Caption=$S(..blnIsNieuweSifonlade:"Sifon uitsparing breedte", ..blnSyfonLade:"Sifonkap breedte",  1:"Spoelbak breedte")
  Set ..zzLabel6.Caption=..zzLabel2.Caption
+
  Quit
 ]]></Implementation>
 </Method>
 
+<Method name="CtrlManageReadOnly">
+<Language>cache</Language>
+<ProcedureBlock>0</ProcedureBlock>
+<SoapBindingStyle>document</SoapBindingStyle>
+<SoapBodyUse>literal</SoapBodyUse>
+<Implementation><![CDATA[
+
+ Do cmrSetCtrlBehaviour(..txtSPZLI)
+ Do cmrSetCtrlBehaviour(..txtSPBR1)
+ Do cmrSetCtrlBehaviour(..txtSPZMI)
+ Do cmrSetCtrlBehaviour(..txtSPBR2)
+ Do cmrSetCtrlBehaviour(..txtSPZRE)
+ Quit
+
+cmrSetCtrlBehaviour(Ctrl)
+ Set Ctrl.Color=$S(Ctrl.ReadOnly="True":$$$clLtGray, 1:$$$clWindow)
+ Set Ctrl.TabStop=$S(Ctrl.ReadOnly="True":"False", 1:"True")
+ Quit
+]]></Implementation>
+</Method>
+
 <Method name="DesignDefinition">
 <Language>cache</Language>
 <ProcedureBlock>0</ProcedureBlock>
@@ -632,6 +654,7 @@
 
  If ..blnSyfonLade Do ..chkSymmClick("")
  Do ..CtrlManagePosition()
+ Do ..CtrlManageReadOnly()
  Do ..OKButtonEnabled()
 
  ;End of user code
@@ -895,6 +918,7 @@
  . . Set ..txtSPZLI.Text=""
  . . Set ..txtSPZRE.Text=""
  . . Do ..BLCalcMaten(Sender)
+ .  Do ..CtrlManageReadOnly()
  Else  If ..chkSymm.Checked="True" Do
  . Do ..BLCalcMaten(Sender)
 
Index: BL/PR/GA/TandemBox.cls.xml
===================================================================
diff -u -r1664 -r1789
--- BL/PR/GA/TandemBox.cls.xml	(.../TandemBox.cls.xml)	(revision 1664)
+++ BL/PR/GA/TandemBox.cls.xml	(.../TandemBox.cls.xml)	(revision 1789)
@@ -922,7 +922,12 @@
 	;Quit:(BoxSide="") ""
 
 	// LadeCode , Boxside, Design 
-	Set LC=$TR(LadeCode,"2I\/","")
+	Set KLAS=..KLASFromLC(LadeCode)
+	Set LC=$TR(LadeCode,"I\/","")
+	If (LC["2")&&(KLAS="SP2") { 
+		Set LC=$TR(LC,"2","")
+	}
+
 	Set BS=BoxSide
 	Set DC=..DesignCodeFromDS($G(Design))   ; Intivo = I-design 
 	
@@ -949,7 +954,8 @@
 	. Quit:(SifonQty<2)
 	.   ;d WLIP^vhDBG(97,"dubbele sifonlade : SifonQty="_SifonQty)
 	.   ;s SifonQty=""   ; TEMPORARY work-around : de images voor dubbele sifonlade verwijzen tijdelijk naar die van (enkele) sifonlade   (Added by WimV on 31/03/2010)
-	. Set LC=$$$Replace(LC,"Y","Y"_SifonQty)
+	. Set:(KLAS="SY" ) LC=$$$Replace(LC,"Y","Yx"_SifonQty)
+	. Set:(KLAS="SY2") LC=$$$Replace(LC,"Y2","Y2x"_SifonQty)
 	
 	Quit DC_LC_$S($L(BS):"_"_BS, 1:"")
 ]]></Implementation>
@@ -971,14 +977,7 @@
 	Quit:(LadeCode="") ""
 	
 	// Default Boxside indien leeg 
-	If $G(BoxSide)="" Do
-	. Set LC=$TR(LadeCode,"2I\/","")
-	. If ..DesignCodeFromDS($G(Design))?1(1"I",1"MA") Do   ; intivo + mengvorm-A
-	. . Set BoxSide=$S(LC?1(1"DLS"):"CAP", LC?1(1"DL",1"DLZ",1"CL",1"CLZ",1"DLY",1"DLYZ",1"CLY",1"CLYZ"):"COV", LC?1(1"D"):"ER", 1:"ZR")
-	. If ..DesignCodeFromDS($G(Design))?1(1"A") Do         ; antaro 
-	. . Set BoxSide=$S(LC?1(1"CM",1"CMZ",1"CMY",1"CMYZ"):"ER", 1:"ZR")
-	. Else  Do
-	. . Set BoxSide=$S(LC?1(1"DS"):"BD", LC?1(1"D",1"DZ",1"DY",1"DYZ"):"DR", LC?1(1"B",1"BZ",1"BS",1"BY",1"BYZ",1"C",1"CZ"):"ER", 1:"ZR")
+	If $G(BoxSide)="" Set BoxSide=..GeefZijwandVerhogingDefault(LadeCode,Design)
 	
 	Set blImage=##class(BL.Prod.ImageLink).Instantiate()
 	Set ObjRef=blImage.TBXImageViaCode(LadeCode, BoxSide, Design, .BinnenGreep, .SPZK)   ; Deze roept  ##class(BL.PR.GA.TandemBox).ImageCodeFromLC(...)  op 
@@ -989,6 +988,31 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefZijwandVerhogingDefault">
+<Description><![CDATA[
+Bij iedere LadeCode hoort een default ZijwandVerhoging.
+Bijvoorbeeld: als de waarde (boxside) nog niet geselecteerd is in de GUI, moet er toch reeds een image kunnen getoond worden --> deze defaulting nodig ]]></Description>
+<ClassMethod>1</ClassMethod>
+<FormalSpec>LadeCode:%String,Design:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Set LC=$TR(LadeCode,"2I\/","")   ; Zowel voor spoelbak type 2 als voor sifonlade type 2 wordt het cijfer 2 weggefilterd 
+	Set DC=..DesignCodeFromDS(Design)
+	
+	Set BoxSide=""
+	If DC?1(1"I",1"MA") {   ; intivo + mengvorm-A
+		Set BoxSide=$S(LC?1(1"DLS"):"CAP", LC?1(1"DL",1"DLZ",1"CL",1"CLZ",1"DLY",1"DLYZ",1"CLY",1"CLYZ"):"COV", LC?1(1"D"):"ER", 1:"ZR")
+	}
+	ElseIf DC?1(1"A") {     ; antaro 
+		Set BoxSide=$S(LC?1(1"CM",1"CMZ",1"CMY",1"CMYZ"):"ER", 1:"ZR")
+	}
+	Else {
+		Set BoxSide=$S(LC?1(1"DS"):"BD", LC?1(1"D",1"DZ",1"DY",1"DYZ"):"DR", LC?1(1"B",1"BZ",1"BS",1"BY",1"BYZ",1"C",1"CZ"):"ER", 1:"ZR")
+	}
+	Quit BoxSide
+]]></Implementation>
+</Method>
+
 <Method name="CalcInfoDiverse">
 <Description>
 Geeft een $LB() terug.  [formaat: $LB(key,value,key2,value2, ...) ]
@@ -1119,6 +1143,14 @@
 	Do:('$D(Product.LookUp("PLItem"))) Product.BuildLookUp($LB("ICode"))   ; "PLItem" is onderdeel van BuildLU("ICode")
 	For  Set BTVal=..BTValues.GetNext(.BT) Quit:(BT="")  Do:($L($G(..LookUp(BT,"DIC")))) Product.SetItemValByPL($$$PL,BTVal)
 	Do Product.BuildLookUp($LB("PL"))
+	
+	/*
+	  d WLIP^vhDBG(97," items   : "_..BTValues.GetAt("SpoelbakBreedte")_" "_..BTValues.GetAt("SpoelbakBreedte1")_" ")
+	  Set DItemSPBR1=$G(Product.LookUp("PLItem","SPBR1","IOref"))
+	  d WLIP^vhDBG(97," item LU : "_$$$ArrayTT("Lookup(""PL"")",Product,"LookUp")_"     "_$$$CRLF_" oref: "_DItemSPBR1_" ")
+	  d:$IsObject(DItemSPBR1) WLIP^vhDBG(97," DItemSPBR1 : "_DItemSPBR1.IsActief())
+	*/
+	
 	Quit
 ]]></Implementation>
 </Method>
@@ -1152,7 +1184,7 @@
  #define SPZkOpMaat(%v)   (%v?1(1"M",1"SI".E))
 
  // Aantal uitsparingen bij Sifonlade of spoelbaklade 
- If KLAS="SY" Do
+ If KLAS?1(1"SY",1"SY2") Do
  . Set BT="SYQTY"
  . Set BTVal=..SpoelbakUitsparingen(LC,SPZK)
  . Do bwvAddToDataItem(BT,BTVal)
@@ -1161,15 +1193,19 @@
  . // Else  Dubbele sifonlade 
  . 
  . ; Controle op de afmetingen 
- . Set SPBR=$G(Product.LookUp("PL","SPBR"))
+ . If KLAS="SY2" Do
+ . . Set SPBR1=$G(Product.LookUp("PL","SPBR1"))
+ . . Set SPBR2=$G(Product.LookUp("PL","SPBR2"))
+ . Else  Do
+ . . Set SPBR1=$G(Product.LookUp("PL","SPBR"))
+ . . Set SPBR2=SPBR1
+ .
  . Set SPZLI=$G(Product.LookUp("PL","SPZLI"))
  . Set SPZRE=$G(Product.LookUp("PL","SPZRE"))
  . Set SPZMI=$G(Product.LookUp("PL","SPRUGMID"))
- .  ;Set SPZMI=160
- . d WL^vhDBG("Dubbele sifon : "_SPZLI_"+"_SPBR_"+"_SPZMI_"+"_SPBR_"+"_SPZRE_"="_(SPZLI+SPBR+SPZMI+SPBR+SPZRE)_"  IB="_IB)
- . Set scSPBR=$S(SPZLI+SPBR+SPZMI+SPBR+SPZRE=IB:$$$OK, 1:$$$ERROR($$$GeneralError,"Afmetingen dubbele sifonlade incorrect"))
+ .   d WL^vhDBG("Dubbele sifon : "_SPZLI_"+"_SPBR1_"+"_SPZMI_"+"_SPBR2_"+"_SPZRE_"="_(SPZLI+SPBR1+SPZMI+SPBR2+SPZRE)_"  IB="_IB)
+ . Set scSPBR=$S(SPZLI+SPBR1+SPZMI+SPBR2+SPZRE=IB:$$$OK, 1:$$$ERROR($$$GeneralError,"Afmetingen dubbele sifonlade incorrect"))
  . If $$$ISERR(scSPBR) Set X=YYY   ; Calculation must trigger an ERROR
- . 
 
  // Spoelbak brede/smalle zijstukken 
  If $L(SPZK)&&('$$$SPZkOpMaat(SPZK)) Do
@@ -1192,7 +1228,7 @@
  . Do Product.BuildLookUp($LB("PL"))
  
  // SifonLade of Spoelbak zijstukkken op maat, spoelbakBreedte berekenen indien nog niet gekend 
- If $L(SPZK)&&($G(SifonQty)<2) Do
+ If (KLAS'="SY2")&&($L(SPZK))&&($G(SifonQty)<2) Do
  . Set SPZLI=$G(Product.LookUp("PL","SPZLI"))
  . Set SPBR=$G(Product.LookUp("PL","SPBR"))
  . Set SPZRE=$G(Product.LookUp("PL","SPZRE"))
@@ -1209,6 +1245,15 @@
  . Do bwvAddToDataItem("SPZLI",SPZLI)
  . Do bwvAddToDataItem("SPBR",SPBR)
  . Do bwvAddToDataItem("SPZRE",SPZRE)
+ Else  If (KLAS="SY2")&&($L(SPZK))&&($G(SifonQty)<2) Do
+ . // Nieuwe SifonLade (type 2),  spoelbakBreedte controleren op correcte afmetingen 
+ . Set SPZLI=$G(Product.LookUp("PL","SPZLI"))
+ . Set SPBR=$G(Product.LookUp("PL","SPBR1"))
+ . Set SPZRE=$G(Product.LookUp("PL","SPZRE"))
+ . Set AftrekLP=0
+ . Set scSPBR=..CalcSPBreedtesOpMaat(IB,.SPZLI,.SPBR,.SPZRE,AftrekLP)
+ . If $$$ISERR(scSPBR) Do WL^vhDBG("Sifonlade type 2 : uitsparingBreedte fout in berekening : "_$$ParseStatus^vhLib(scSPBR))
+ . If $$$ISERR(scSPBR) Set X=YYY   ; Calculation must trigger an ERROR
  
  // Sifonlade D-hoogte heeft steeds B-rug (geldt ook voor C-hoogte)
  If (KLAS="SY")&&(RH?1(1"D",1"C",1"G")) Do   ; If LC?1(1"DY",1"DY/Z",1"DLY",1"DLY/Z",1"CLY",1"CLY/Z",1"CMY",1"CMY/Z") Do
Index: Prod/GAData/Product/tmpKPRCreate.mac.rou
===================================================================
diff -u -r1593 -r1789
--- Prod/GAData/Product/tmpKPRCreate.mac.rou	(.../tmpKPRCreate.mac.rou)	(revision 1593)
+++ Prod/GAData/Product/tmpKPRCreate.mac.rou	(.../tmpKPRCreate.mac.rou)	(revision 1789)
@@ -438,6 +438,7 @@
  Set:(..Val("KLAS")="SP" ) $E(Txt,20)="SP"
  Set:(..Val("KLAS")="SP2") $E(Txt,20)="S2"
  Set:(..Val("KLAS")="SY" ) $E(Txt,20)="SI"   ; Added by WimV on 16/05/2011 
+ Set:(..Val("KLAS")="SY2") $E(Txt,20)="S2"   ; Added by WimV on 08/08/2011 
  Set $E(Txt,22)=##class(Prod.GAMeta.BT.TBAbstract).KortTekstCodeClass("Prod.GAMeta.BT.TBLadeKleur",..Val("KL"))
  Set $E(Txt,24)=$E(..Val("KB"),1,2)
    ;d WL^vhDBG("KortTekst="_Txt)
@@ -553,6 +554,10 @@
  . Set SifonQty=..Val("SYQTY")
  . Set Txt=##class(Res.Vertaling).GetVertaling("TB","LT-SPOPEN"_$S(SifonQty>1:"_"_SifonQty_"sifon",1:""),"O",Taal,,1)_" "_..Val("SPBR")_"mm"
  . Do AddLT(Taal,.Oms,.Txt,.Optie)
+ Else  If ..Val("KLAS")?1(1"SY2") Do 
+ . Set SifonQty=..Val("SYQTY")
+ . Set Txt=##class(Res.Vertaling).GetVertaling("TB","LT-SPOPEN","O",Taal,,1)_" "_..Val("SPBR1")_"mm"_$S(SifonQty=2:" "_..Val("SPBR2")_"mm",1:"")
+ . Do AddLT(Taal,.Oms,.Txt,.Optie)
  ; Draagkracht 30,50,80,25 als Profiel niet meenemen is true
  If (..Val("NMCP"))&&(..Val("DK")'?1(1"30",1"50")) Do
  . Set Txt=..Val("DK")_"kg"	
Index: BL/Prod/ImageLinkImport.cls.xml
===================================================================
diff -u -r1133 -r1789
--- BL/Prod/ImageLinkImport.cls.xml	(.../ImageLinkImport.cls.xml)	(revision 1133)
+++ BL/Prod/ImageLinkImport.cls.xml	(.../ImageLinkImport.cls.xml)	(revision 1789)
@@ -298,20 +298,36 @@
 	Do ..CreateOneTBX("DYZ_BD",			"GENERIEK\TBX\tbx_DYZ_BD.jpg",999, 			"GENERIEK\TBX\tbx_DYZ_BD.svg",999, 			"GENERIEK\TBX\tbx_DYZ_BD.bmp",  )
 	Do ..CreateOneTBX("DYZ_BG",			"GENERIEK\TBX\tbx_DYZ_BG.jpg",999, 			"GENERIEK\TBX\tbx_DYZ_BG.svg",999, 			"GENERIEK\TBX\tbx_DYZ_BG.bmp",  )
 	// Standaard - dubbele sifon 
-	Do ..CreateOneTBX("MY2_ZR",			"GENERIEK\TBX\tbx_MY2_ZR.jpg",999, 			"GENERIEK\TBX\tbx_MY2_ZR.svg",999, 			"GENERIEK\TBX\tbx_MY2_ZR.bmp",  )
-	Do ..CreateOneTBX("MY2Z_ZR",		"GENERIEK\TBX\tbx_MY2Z_ZR.jpg",999, 		"GENERIEK\TBX\tbx_MY2Z_ZR.svg",999, 		"GENERIEK\TBX\tbx_MY2Z_ZR.bmp", )
-	Do ..CreateOneTBX("BY2_ER",			"GENERIEK\TBX\tbx_BY2_ER.jpg",999, 			"GENERIEK\TBX\tbx_BY2_ER.svg",999, 			"GENERIEK\TBX\tbx_BY2_ER.bmp",  )
-	Do ..CreateOneTBX("BY2Z_ER",		"GENERIEK\TBX\tbx_BY2Z_ER.jpg",999, 		"GENERIEK\TBX\tbx_BY2Z_ER.svg",999, 		"GENERIEK\TBX\tbx_BY2Z_ER.bmp", )
-	Do ..CreateOneTBX("DY2_DR",			"GENERIEK\TBX\tbx_DY2_DR.jpg",999, 			"GENERIEK\TBX\tbx_DY2_DR.svg",999, 			"GENERIEK\TBX\tbx_DY2_DR.bmp",  )
-	Do ..CreateOneTBX("DY2_ER",			"GENERIEK\TBX\tbx_DY2_DR.jpg",999, 			"GENERIEK\TBX\tbx_DY2_DR.svg",999, 			"GENERIEK\TBX\tbx_DY2_DR.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
-	Do ..CreateOneTBX("DY2_BD",			"GENERIEK\TBX\tbx_DY2_DR.jpg",999, 			"GENERIEK\TBX\tbx_DY2_DR.svg",999, 			"GENERIEK\TBX\tbx_DY2_DR.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
-	Do ..CreateOneTBX("DY2_BG",			"GENERIEK\TBX\tbx_DY2_DR.jpg",999, 			"GENERIEK\TBX\tbx_DY2_DR.svg",999, 			"GENERIEK\TBX\tbx_DY2_DR.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
-	Do ..CreateOneTBX("DY2Z_DR",		"GENERIEK\TBX\tbx_DY2Z_DR.jpg",999, 		"GENERIEK\TBX\tbx_DY2Z_DR.svg",999, 		"GENERIEK\TBX\tbx_DY2Z_DR.bmp", )
-	Do ..CreateOneTBX("DY2Z_ER",		"GENERIEK\TBX\tbx_DY2Z_DR.jpg",999, 		"GENERIEK\TBX\tbx_DY2Z_DR.svg",999, 		"GENERIEK\TBX\tbx_DY2Z_DR.bmp", )   ; !!! Verwijst naar image  _DR !!! 
-	Do ..CreateOneTBX("DY2Z_BD",		"GENERIEK\TBX\tbx_DY2Z_DR.jpg",999, 		"GENERIEK\TBX\tbx_DY2Z_DR.svg",999, 		"GENERIEK\TBX\tbx_DY2Z_DR.bmp", )   ; !!! Verwijst naar image  _DR !!! 
-	Do ..CreateOneTBX("DY2Z_BG",		"GENERIEK\TBX\tbx_DY2Z_DR.jpg",999, 		"GENERIEK\TBX\tbx_DY2Z_DR.svg",999, 		"GENERIEK\TBX\tbx_DY2Z_DR.bmp", )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("MY_ZR_x2",		"GENERIEK\TBX\tbx_MY_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_MY_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_MY_ZR_x2.bmp",  )
+	Do ..CreateOneTBX("MYZ_ZR_x2",		"GENERIEK\TBX\tbx_MYZ_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_MYZ_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_MYZ_ZR_x2.bmp", )
+	Do ..CreateOneTBX("BY_ER_x2",		"GENERIEK\TBX\tbx_BY_ER_x2.jpg",999, 		"GENERIEK\TBX\tbx_BY_ER_x2.svg",999, 		"GENERIEK\TBX\tbx_BY_ER_x2.bmp",  )
+	Do ..CreateOneTBX("BYZ_ER_x2",		"GENERIEK\TBX\tbx_BYZ_ER_x2.jpg",999, 		"GENERIEK\TBX\tbx_BYZ_ER_x2.svg",999, 		"GENERIEK\TBX\tbx_BYZ_ER_x2.bmp", )
+	Do ..CreateOneTBX("DY_DR_x2",		"GENERIEK\TBX\tbx_DY_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DY_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DY_DR_x2.bmp",  )
+	Do ..CreateOneTBX("DY_ER_x2",		"GENERIEK\TBX\tbx_DY_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DY_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DY_DR_x2.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DY_BD_x2",		"GENERIEK\TBX\tbx_DY_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DY_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DY_DR_x2.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DY_BG_x2",		"GENERIEK\TBX\tbx_DY_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DY_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DY_DR_x2.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DYZ_DR_x2",		"GENERIEK\TBX\tbx_DYZ_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DYZ_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DYZ_DR_x2.bmp", )
+	Do ..CreateOneTBX("DYZ_ER_x2",		"GENERIEK\TBX\tbx_DYZ_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DYZ_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DYZ_DR_x2.bmp", )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DYZ_BD_x2",		"GENERIEK\TBX\tbx_DYZ_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DYZ_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DYZ_DR_x2.bmp", )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DYZ_BG_x2",		"GENERIEK\TBX\tbx_DYZ_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DYZ_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DYZ_DR_x2.bmp", )   ; !!! Verwijst naar image  _DR !!! 
 
+	// Standaard - sifonlade type Blum 
+	Do ..CreateOneTBX("MY2_ZR",			"GENERIEK\TBX\tbx_MS_ZR.jpg",58769, 		"GENERIEK\TBX\tbx_MS_ZR.svg",63120, 		"GENERIEK\TBX\tbx_MS_ZR.bmp",   )
+ ;	Do ..CreateOneTBX("MY2_ZR",			"GENERIEK\TBX\tbx_MY2_ZR.jpg",999, 			"GENERIEK\TBX\tbx_MY2_ZR.svg",999, 			"GENERIEK\TBX\tbx_MY2_ZR.bmp",     )
+	Do ..CreateOneTBX("BY2_ER",			"GENERIEK\TBX\tbx_BY2_ER.jpg",999, 			"GENERIEK\TBX\tbx_BY2_ER.svg",999, 			"GENERIEK\TBX\tbx_BY2_ER.bmp",     )
+	Do ..CreateOneTBX("DY2_DR",			"GENERIEK\TBX\tbx_DY2_DR.jpg",999, 			"GENERIEK\TBX\tbx_DY2_DR.svg",999, 			"GENERIEK\TBX\tbx_DY2_DR.bmp",     )
+	Do ..CreateOneTBX("DY2_ER",			"GENERIEK\TBX\tbx_DY2_DR.jpg",999, 			"GENERIEK\TBX\tbx_DY2_DR.svg",999, 			"GENERIEK\TBX\tbx_DY2_DR.bmp",     )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DY2_BD",			"GENERIEK\TBX\tbx_DY2_DR.jpg",999, 			"GENERIEK\TBX\tbx_DY2_DR.svg",999, 			"GENERIEK\TBX\tbx_DY2_DR.bmp",     )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DY2_BG",			"GENERIEK\TBX\tbx_DY2_DR.jpg",999, 			"GENERIEK\TBX\tbx_DY2_DR.svg",999, 			"GENERIEK\TBX\tbx_DY2_DR.bmp",     )   ; !!! Verwijst naar image  _DR !!! 
+	// Standaard - dubbele sifonlade type Blum 
+	Do ..CreateOneTBX("MY2_ZR_x2",		"GENERIEK\TBX\tbx_MY2_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_MY2_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_MY2_ZR_x2.bmp",  )
+	Do ..CreateOneTBX("BY2_ER_x2",		"GENERIEK\TBX\tbx_BY2_ER_x2.jpg",999, 		"GENERIEK\TBX\tbx_BY2_ER_x2.svg",999, 		"GENERIEK\TBX\tbx_BY2_ER_x2.bmp",  )
+	Do ..CreateOneTBX("DY2_DR_x2",		"GENERIEK\TBX\tbx_DY2_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DY2_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DY2_DR_x2.bmp",  )
+	Do ..CreateOneTBX("DY2_ER_x2",		"GENERIEK\TBX\tbx_DY2_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DY2_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DY2_DR_x2.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DY2_BD_x2",		"GENERIEK\TBX\tbx_DY2_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DY2_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DY2_DR_x2.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
+	Do ..CreateOneTBX("DY2_BG_x2",		"GENERIEK\TBX\tbx_DY2_DR_x2.jpg",999, 		"GENERIEK\TBX\tbx_DY2_DR_x2.svg",999, 		"GENERIEK\TBX\tbx_DY2_DR_x2.bmp",  )   ; !!! Verwijst naar image  _DR !!! 
 
+
 	// intivo 
 	Do ..CreateOneTBX("IN_ZR",			"GENERIEK\TBX\tbx_IN_ZR.jpg",999, 			"GENERIEK\TBX\tbx_IN_ZR.svg",999, 			"GENERIEK\TBX\tbx_IN_ZR.bmp",       )
 	Do ..CreateOneTBX("IM_ZR",			"GENERIEK\TBX\tbx_IM_ZR.jpg",48811, 		"GENERIEK\TBX\tbx_IM_ZR.svg",48811, 		"GENERIEK\TBX\tbx_IM_ZR.bmp",       )
@@ -342,17 +358,29 @@
 	Do ..CreateOneTBX("IDLYZ_CAP",		"GENERIEK\TBX\tbx_IDLYZ_CAP.jpg",999, 		"GENERIEK\TBX\tbx_IDLYZ_CAP.svg",999, 		"GENERIEK\TBX\tbx_IDLYZ_CAP.bmp",     )
 	Do ..CreateOneTBX("IDLYZ_CAP_FG",	"GENERIEK\TBX\tbx_IDLYZ_CAP_FG.jpg",999, 	"GENERIEK\TBX\tbx_IDLYZ_CAP_FG.svg",999, 	"GENERIEK\TBX\tbx_IDLYZ_CAP_FG.bmp",  )
 	// intivo - dubbele sifon 
-	Do ..CreateOneTBX("IMY2_ZR",		"GENERIEK\TBX\tbx_IMY2_ZR.jpg",999, 		"GENERIEK\TBX\tbx_IMY2_ZR.svg",999, 		"GENERIEK\TBX\tbx_IMY2_ZR.bmp",       )
-	Do ..CreateOneTBX("IMY2Z_ZR",		"GENERIEK\TBX\tbx_IMY2Z_ZR.jpg",999, 		"GENERIEK\TBX\tbx_IMY2Z_ZR.svg",999, 		"GENERIEK\TBX\tbx_IMY2Z_ZR.bmp",      )
+	Do ..CreateOneTBX("IMY_ZR_x2",		"GENERIEK\TBX\tbx_IMY_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_IMY_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_IMY_ZR_x2.bmp",       )
+	Do ..CreateOneTBX("IMYZ_ZR_x2",		"GENERIEK\TBX\tbx_IMYZ_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_IMYZ_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_IMYZ_ZR_x2.bmp",      )
+	Do ..CreateOneTBX("ICLY_COV_x2",	"GENERIEK\TBX\tbx_ICLY_COV_x2.jpg",999,	 	"GENERIEK\TBX\tbx_ICLY_COV_x2.svg",999, 	"GENERIEK\TBX\tbx_ICLY_COV_x2.bmp",     )
+	Do ..CreateOneTBX("ICLYZ_COV_x2",	"GENERIEK\TBX\tbx_ICLYZ_COV_x2.jpg",999, 	"GENERIEK\TBX\tbx_ICLYZ_COV_x2.svg",999, 	"GENERIEK\TBX\tbx_ICLYZ_COV_x2.bmp",    )
+	Do ..CreateOneTBX("ICLYZ_COV_FG_x2","GENERIEK\TBX\tbx_ICLYZ_COV_FG_x2.jpg",999, "GENERIEK\TBX\tbx_ICLYZ_COV_FG_x2.svg",999, "GENERIEK\TBX\tbx_ICLYZ_COV_FG_x2.bmp", )
+	Do ..CreateOneTBX("IDLY_COV_x2",	"GENERIEK\TBX\tbx_IDLY_COV_x2.jpg",999, 	"GENERIEK\TBX\tbx_IDLY_COV_x2.svg",999, 	"GENERIEK\TBX\tbx_IDLY_COV_x2.bmp",     )
+	Do ..CreateOneTBX("IDLYZ_COV_x2",	"GENERIEK\TBX\tbx_IDLYZ_COV_x2.jpg",999, 	"GENERIEK\TBX\tbx_IDLYZ_COV_x2.svg",999, 	"GENERIEK\TBX\tbx_IDLYZ_COV_x2.bmp",    )
+	Do ..CreateOneTBX("IDLYZ_COV_FG_x2","GENERIEK\TBX\tbx_IDLYZ_COV_FG_x2.jpg",999, "GENERIEK\TBX\tbx_IDLYZ_COV_FG_x2.svg",999, "GENERIEK\TBX\tbx_IDLYZ_COV_FG_x2.bmp", )
+	Do ..CreateOneTBX("IDLY_CAP_x2",	"GENERIEK\TBX\tbx_IDLY_CAP_x2.jpg",999, 	"GENERIEK\TBX\tbx_IDLY_CAP_x2.svg",999, 	"GENERIEK\TBX\tbx_IDLY_CAP_x2.bmp",     )
+	Do ..CreateOneTBX("IDLYZ_CAP_x2",	"GENERIEK\TBX\tbx_IDLYZ_CAP_x2.jpg",999, 	"GENERIEK\TBX\tbx_IDLYZ_CAP_x2.svg",999, 	"GENERIEK\TBX\tbx_IDLYZ_CAP_x2.bmp",    )
+	Do ..CreateOneTBX("IDLYZ_CAP_FG_x2","GENERIEK\TBX\tbx_IDLYZ_CAP_FG_x2.jpg",999, "GENERIEK\TBX\tbx_IDLYZ_CAP_FG_x2.svg",999, "GENERIEK\TBX\tbx_IDLYZ_CAP_FG_x2.bmp", )
+
+	// intivo - sifonlade type Blum 
+	Do ..CreateOneTBX("IMY2_ZR",		"GENERIEK\TBX\tbx_IMS_ZR.jpg",999, 			"GENERIEK\TBX\tbx_IMS_ZR.svg",999, 			"GENERIEK\TBX\tbx_IMS_ZR.bmp",        )
+ ;	Do ..CreateOneTBX("IMY2_ZR",		"GENERIEK\TBX\tbx_IMY2_ZR.jpg",999, 		"GENERIEK\TBX\tbx_IMY2_ZR.svg",999, 		"GENERIEK\TBX\tbx_IMY2_ZR.bmp",       )
 	Do ..CreateOneTBX("ICLY2_COV",		"GENERIEK\TBX\tbx_ICLY2_COV.jpg",999,	 	"GENERIEK\TBX\tbx_ICLY2_COV.svg",999, 		"GENERIEK\TBX\tbx_ICLY2_COV.bmp",     )
-	Do ..CreateOneTBX("ICLY2Z_COV",		"GENERIEK\TBX\tbx_ICLY2Z_COV.jpg",999, 		"GENERIEK\TBX\tbx_ICLY2Z_COV.svg",999, 		"GENERIEK\TBX\tbx_ICLY2Z_COV.bmp",    )
-	Do ..CreateOneTBX("ICLY2Z_COV_FG",	"GENERIEK\TBX\tbx_ICLY2Z_COV_FG.jpg",999, 	"GENERIEK\TBX\tbx_ICLY2Z_COV_FG.svg",999, 	"GENERIEK\TBX\tbx_ICLY2Z_COV_FG.bmp", )
 	Do ..CreateOneTBX("IDLY2_COV",		"GENERIEK\TBX\tbx_IDLY2_COV.jpg",999, 		"GENERIEK\TBX\tbx_IDLY2_COV.svg",999, 		"GENERIEK\TBX\tbx_IDLY2_COV.bmp",     )
-	Do ..CreateOneTBX("IDLY2Z_COV",		"GENERIEK\TBX\tbx_IDLY2Z_COV.jpg",999, 		"GENERIEK\TBX\tbx_IDLY2Z_COV.svg",999, 		"GENERIEK\TBX\tbx_IDLY2Z_COV.bmp",    )
-	Do ..CreateOneTBX("IDLY2Z_COV_FG",	"GENERIEK\TBX\tbx_IDLY2Z_COV_FG.jpg",999, 	"GENERIEK\TBX\tbx_IDLY2Z_COV_FG.svg",999, 	"GENERIEK\TBX\tbx_IDLY2Z_COV_FG.bmp", )
 	Do ..CreateOneTBX("IDLY2_CAP",		"GENERIEK\TBX\tbx_IDLY2_CAP.jpg",999, 		"GENERIEK\TBX\tbx_IDLY2_CAP.svg",999, 		"GENERIEK\TBX\tbx_IDLY2_CAP.bmp",     )
-	Do ..CreateOneTBX("IDLY2Z_CAP",		"GENERIEK\TBX\tbx_IDLY2Z_CAP.jpg",999, 		"GENERIEK\TBX\tbx_IDLY2Z_CAP.svg",999, 		"GENERIEK\TBX\tbx_IDLY2Z_CAP.bmp",    )
-	Do ..CreateOneTBX("IDLY2Z_CAP_FG",	"GENERIEK\TBX\tbx_IDLY2Z_CAP_FG.jpg",999, 	"GENERIEK\TBX\tbx_IDLY2Z_CAP_FG.svg",999, 	"GENERIEK\TBX\tbx_IDLY2Z_CAP_FG.bmp", )
+	// intivo - dubbele sifonlade type Blum 
+	Do ..CreateOneTBX("IMY2_ZR_x2",		"GENERIEK\TBX\tbx_IMY2_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_IMY2_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_IMY2_ZR_x2.bmp",    )
+	Do ..CreateOneTBX("ICLY2_COV_x2",	"GENERIEK\TBX\tbx_ICLY2_COV_x2.jpg",999,	"GENERIEK\TBX\tbx_ICLY2_COV_x2.svg",999, 	"GENERIEK\TBX\tbx_ICLY2_COV_x2.bmp",  )
+	Do ..CreateOneTBX("IDLY2_COV_x2",	"GENERIEK\TBX\tbx_IDLY2_COV_x2.jpg",999, 	"GENERIEK\TBX\tbx_IDLY2_COV_x2.svg",999, 	"GENERIEK\TBX\tbx_IDLY2_COV_x2.bmp",  )
+	Do ..CreateOneTBX("IDLY2_CAP_x2",	"GENERIEK\TBX\tbx_IDLY2_CAP_x2.jpg",999, 	"GENERIEK\TBX\tbx_IDLY2_CAP_x2.svg",999, 	"GENERIEK\TBX\tbx_IDLY2_CAP_x2.bmp",  )
 
 
 	// antaro 
@@ -372,11 +400,18 @@
 	Do ..CreateOneTBX("ACMY_ER",		"GENERIEK\TBX\tbx_ACMY_ER.jpg",999, 		"GENERIEK\TBX\tbx_ACMY_ER.svg",999, 		"GENERIEK\TBX\tbx_ACMY_ER.bmp",   )
 	Do ..CreateOneTBX("ACMYZ_ER",		"GENERIEK\TBX\tbx_ACMYZ_ER.jpg",999, 		"GENERIEK\TBX\tbx_ACMYZ_ER.svg",999,	 	"GENERIEK\TBX\tbx_ACMYZ_ER.bmp",  )
 	// antaro - dubbele sifon 
-	Do ..CreateOneTBX("AMY2_ZR",		"GENERIEK\TBX\tbx_AMY2_ZR.jpg",999, 		"GENERIEK\TBX\tbx_AMY2_ZR.svg",999, 		"GENERIEK\TBX\tbx_AMY2_ZR.bmp",   )
-	Do ..CreateOneTBX("AMY2Z_ZR",		"GENERIEK\TBX\tbx_AMY2Z_ZR.jpg",999, 		"GENERIEK\TBX\tbx_AMY2Z_ZR.svg",999, 		"GENERIEK\TBX\tbx_AMY2Z_ZR.bmp",  )
-	Do ..CreateOneTBX("ACMY2_ER",		"GENERIEK\TBX\tbx_ACMY2_ER.jpg",999, 		"GENERIEK\TBX\tbx_ACMY2_ER.svg",999, 		"GENERIEK\TBX\tbx_ACMY2_ER.bmp",  )
-	Do ..CreateOneTBX("ACMY2Z_ER",		"GENERIEK\TBX\tbx_ACMY2Z_ER.jpg",999, 		"GENERIEK\TBX\tbx_ACMY2Z_ER.svg",999, 		"GENERIEK\TBX\tbx_ACMY2Z_ER.bmp", )
+	Do ..CreateOneTBX("AMY_ZR_x2",		"GENERIEK\TBX\tbx_AMY_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_AMY_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_AMY_ZR_x2.bmp",   )
+	Do ..CreateOneTBX("AMYZ_ZR_x2",		"GENERIEK\TBX\tbx_AMYZ_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_AMYZ_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_AMYZ_ZR_x2.bmp",  )
+	Do ..CreateOneTBX("ACMY_ER_x2",		"GENERIEK\TBX\tbx_ACMY_ER_x2.jpg",999, 		"GENERIEK\TBX\tbx_ACMY_ER_x2.svg",999, 		"GENERIEK\TBX\tbx_ACMY_ER_x2.bmp",  )
+	Do ..CreateOneTBX("ACMYZ_ER_x2",	"GENERIEK\TBX\tbx_ACMYZ_ER_x2.jpg",999, 	"GENERIEK\TBX\tbx_ACMYZ_ER_x2.svg",999, 	"GENERIEK\TBX\tbx_ACMYZ_ER_x2.bmp", )
 
+	// antaro - sifonlade type Blum 
+	Do ..CreateOneTBX("AMY2_ZR",		"GENERIEK\TBX\tbx_IMS_ZR.jpg",999, 			"GENERIEK\TBX\tbx_IMS_ZR.svg",999, 			"GENERIEK\TBX\tbx_IMS_ZR.bmp",       )
+ ;	Do ..CreateOneTBX("AMY2_ZR",		"GENERIEK\TBX\tbx_AMY2_ZR.jpg",999, 		"GENERIEK\TBX\tbx_AMY2_ZR.svg",999, 		"GENERIEK\TBX\tbx_AMY2_ZR.bmp",      )
+	Do ..CreateOneTBX("ACMY2_ER",		"GENERIEK\TBX\tbx_ACMY2_ER.jpg",999, 		"GENERIEK\TBX\tbx_ACMY2_ER.svg",999, 		"GENERIEK\TBX\tbx_ACMY2_ER.bmp",     )
+	// antaro - dubbele sifonlade type Blum 
+	Do ..CreateOneTBX("AMY2_ZR_x2",		"GENERIEK\TBX\tbx_AMY2_ZR_x2.jpg",999, 		"GENERIEK\TBX\tbx_AMY2_ZR_x2.svg",999, 		"GENERIEK\TBX\tbx_AMY2_ZR_x2.bmp",   )
+	Do ..CreateOneTBX("ACMY2_ER_x2",	"GENERIEK\TBX\tbx_ACMY2_ER_x2.jpg",999, 	"GENERIEK\TBX\tbx_ACMY2_ER_x2.svg",999, 	"GENERIEK\TBX\tbx_ACMY2_ER_x2.bmp",  )
 
 	;Do ..CreateOneTBX("XX_XX",			"GENERIEK\TBX\tbx_XX_XX.jpg",999, 			"GENERIEK\TBX\tbx_XX_XX.svg",999, 			"GENERIEK\TBX\tbx_XX_XX.bmp",  )