You can simplify your code quite a bit..

NOTE: The addition of @ERROR and @SERROR
Code:

$REG="HKCU\SOFTWARE\BRIO SOFTWARE\BRIOQRY\BRIOQRY"

$BRIO=ReadValue($REG,"MODENUMBER")

IF InGroup("CX_Brio Designer","COR_CX_Brio Designer","CX_Brio Explorer","COR_CX_Brio Explorer")

   IF $BRIO <> "XXX-XXX" 

          $RC=WriteValue ($REG,"MODENUMBER", "XXX-XXX","REG_SZ")

            IF @ERROR = 0

               ? "The update of your registry was successful"

            ELSE

               ? " The system could not write the registry value"

               @ERROR+" "+@SERROR

               SLEEP 3

         ENDIF

   ENDIF

ENDIF


HTH,

Kent

_________________________
Utilize these resources:
UDFs (Full List)
KiXtart FAQ & How to's