Index: Prod/Product.cls.xml
===================================================================
diff -u -r62525 -r63761
--- Prod/Product.cls.xml	(.../Product.cls.xml)	(revision 62525)
+++ Prod/Product.cls.xml	(.../Product.cls.xml)	(revision 63761)
@@ -1242,7 +1242,8 @@
  . Else  If GENTYP?1(1"xxx") Do
  ..  Set GAProd=""
  . Else  Do
- ..  If (Opties'[";GAV;GAO") Do  Set Opties=Opties_";GAV;GAO"   ;XMLWrite van KaderDeur zeker VML & Omschrijving-opties meegeven
+ ..  If (Opties'[";GAV") && (Opties'[";GASVG") Do  Set Opties=Opties_";GAV"   ;XMLWrite van KaderDeur zeker VML-opties meegeven
+ ..  If (Opties'[";GAO") Do  Set Opties=Opties_";GAO"   ;XMLWrite van KaderDeur zeker Omschrijving-opties meegeven
  ..  Set GAProd=##class(Prod.GADef.AfgeleidDef).%OpenId(GAProdID)
  . ; Als GAProd bestaat, dan XMLWrite() uitvoeren.
  . If $IsObject(GAProd) Do