Index: CHUI/MN/TRANSPCLOF.cls.xml
===================================================================
diff -u -r29059 -r50581
--- CHUI/MN/TRANSPCLOF.cls.xml	(.../TRANSPCLOF.cls.xml)	(revision 29059)
+++ CHUI/MN/TRANSPCLOF.cls.xml	(.../TRANSPCLOF.cls.xml)	(revision 50581)
@@ -31,7 +31,7 @@
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
 	#dim result As %Boolean = 0
-	if $D(^HULP(%J)),($P($G(^HULP(%J,SelClose("SELECT"))),D,1)=5036) set result = 1
+	if $D(^HULP(%J)),($P($G(^HULP(%J,SelClose("SELECT"))),D,1)=##class(DOM.TRANSP.enu.Transporteur).GLSBelgiumFreight()) set result = 1
 	quit result
 ]]></Implementation>
 </Method>