Public Function CommandEnabled( _
   ByVal CommandID As Integer, _
   ByVal strEnvironment As String, _
   ByRef bLicensed As Boolean, _
   ByRef bUnknownCmd As Boolean _
) As Boolean