Last week I know this code was working. Now, it seems to have stopped. If I run it in debug mode, it displays the SELECT line, but I don't see it run anything after that. It is reading the user's group memberships because I can see them in the user's registry hive. But, it does not seem to be doing anything with this information. Please help! I have users calling left and right because this functionality is broken.
Code:
$BRIO = ReadValue ("HKEY_CURRENT_USER\SOFTWARE\BRIO SOFTWARE\BRIOQRY\BRIOQRY", "MODENUMBER")
SELECT
CASE InGroup("CX_Brio Designer")
IF $BRIO <> "XXX-XXX"
WriteValue ("HKEY_CURRENT_USER\SOFTWARE\BRIO SOFTWARE\BRIOQRY\BRIOQRY","MODENUMBER", "XXX-XXX","REG_SZ")
IF @ERROR = 0
? "The update of your registry was successful"
ELSE
? " The system could not write the registry value"
ENDIF
ENDIF
CASE InGroup("COR_CX_Brio Designer")
IF $BRIO <> "XXX-XXX"
WriteValue ("HKEY_CURRENT_USER\SOFTWARE\BRIO SOFTWARE\BRIOQRY\BRIOQRY","MODENUMBER", "XXX-XXX","REG_SZ")
IF @ERROR = 0
? "The update of your registry was successful"
ELSE
? " The system could not write the registry value"
ENDIF
ENDIF
CASE InGroup("CX_Brio Explorer")
IF $BRIO <> "XXX-XXX"
WriteValue ("HKEY_CURRENT_USER\SOFTWARE\BRIO SOFTWARE\BRIOQRY\BRIOQRY","MODENUMBER", "2L55-8282T","REG_SZ")
IF @ERROR = 0
? "The update of your registry was successful"
ELSE
? " The system could not write the registry value"
ENDIF
ENDIF
CASE InGroup("COR_CX_Brio Explorer")
IF $BRIO <> "XXX-XXX"
WriteValue ("HKEY_CURRENT_USER\SOFTWARE\BRIO SOFTWARE\BRIOQRY\BRIOQRY","MODENUMBER", "XXX-XXX","REG_SZ")
IF @ERROR = 0
? "The update of your registry was successful"
ELSE
? " The system could not write the registry value"
ENDIF
ENDIF
ENDSELECT