Index: APPS/PM/OL/Export/impl/OrgaluxGammaExporter.cls.xml
===================================================================
diff -u -r29059 -r31423
--- APPS/PM/OL/Export/impl/OrgaluxGammaExporter.cls.xml	(.../OrgaluxGammaExporter.cls.xml)	(revision 29059)
+++ APPS/PM/OL/Export/impl/OrgaluxGammaExporter.cls.xml	(.../OrgaluxGammaExporter.cls.xml)	(revision 31423)
@@ -169,23 +169,24 @@
 <FormalSpec>LadeVariant:DOM.PM.enu.LadeVariant</FormalSpec>
 <ReturnType>%List</ReturnType>
 <Implementation><![CDATA[
+	#dim OLLadeFamilie As DOM.PM.OL.enu.LadeFamilie.AutoComplete = ##class(DOM.PM.OL.enu.LadeFamilie.AutoComplete).%New()
 	#dim lbResult As %List = ""
 	if LadeVariant = ##class(DOM.PM.enu.LadeVariant).TBXAntaro() {
-		set lbResult = $listbuild("TBX_antaro_Reling")
+		set lbResult = $listbuild(OLLadeFamilie.TBXAntaroReling)
 	}elseif LadeVariant = ##class(DOM.PM.enu.LadeVariant).TBXIntivo() {
-		set lbResult = $listbuild("TBX_intivo")
+		set lbResult = $listbuild(OLLadeFamilie.TBXIntivo)
 	}elseif LadeVariant = ##class(DOM.PM.enu.LadeVariant).TBXPlus() {
-		set lbResult = $listbuild("TBX_plus_Boxside_Ew_of_Dw","TBX_plus_Reling_of_BXglas")
+		set lbResult = $listbuild(OLLadeFamilie.TBXPlusBoxside,OLLadeFamilie.TBXPlusRelingOfGlas)
 	}elseif LadeVariant = ##class(DOM.PM.enu.LadeVariant).LBXPure() {
-		set lbResult = $listbuild(##class(DOM.PM.enu.LadeVariant).LBXPure())
+		set lbResult = $listbuild(OLLadeFamilie.LBXPure)
 	}
 	
 	#dim IsLBX As %Boolean = ( $ListGet(lbResult) = ##class(DOM.PM.enu.LadeVariant).LBXPure() )
 	if (' IsLBX ) {
-		set lbResult = lbResult _ $listbuild( "Alle_TBX_geen_bevestigingen_nodig" )
+		set lbResult = lbResult _ $listbuild(OLLadeFamilie.AlleTBXGeenBevestigingNodig)
 	}
 	
-	set lbResult = lbResult _ $listbuild("NietBlumLade")
+	set lbResult = lbResult _ $listbuild(OLLadeFamilie.NietBlumLade)
 
 	quit lbResult
 ]]></Implementation>