Index: Prod/GADef/KaderDeur.cls.xml
===================================================================
diff -u -r55027 -r55496
--- Prod/GADef/KaderDeur.cls.xml	(.../KaderDeur.cls.xml)	(revision 55027)
+++ Prod/GADef/KaderDeur.cls.xml	(.../KaderDeur.cls.xml)	(revision 55496)
@@ -259,7 +259,7 @@
  ; Determine MaxSize
  If sCode="S" Do
  . ;Set Plaats=%this.ProfielPlaatsGet(emBeslag, BeslagKey, PosKey)
- . Set Plaats=$S(%this.Toepassing.ItemID?1(1"KLS",1"AVHFB",1"AVHFO"):"PB", 1:"PL")   ; temporary determination. "PL" or "PR" is not important.
+ . Set Plaats=$S(%this.Toepassing.ItemID?1(1"KLS",1"AVHFB",1"AVHFO",1"AVH".E):"PB", 1:"PL")   ; temporary determination. "PL" or "PR" is not important.
  . Set MaxSize=$S((Plaats="PL")!(Plaats="PR"):%this.Hoogte, (Plaats="PB")!(Plaats="PO"):%this.Breedte, 1:0)
  Else  Set MaxSize=$CASE(sCode, "X":%this.Breedte, "Y":%this.Hoogte, "Z":%this.ProfType.Dikte, :0)