diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 7ad88406c3..c03c164bfb 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -16,6 +16,11 @@
    The license applies to all entries newer than 2009-04-28.
 */
 
+2012-06-04 17:00 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
+  * contrib/hbqt/qtgui/hbqt_errorsys.prg
+    * Changed: ISNUMBER() => HB_ISNUMERIC()
+               ISCHARACTER() => HB_ISCHAR()
+
 2012-06-05 01:06 UTC+0200 Viktor Szakats (harbour syenar.net)
   * contrib/hbgd/gdbar.prg
   * contrib/hbqt/tests/demoqt.prg
diff --git a/harbour/contrib/hbqt/qtgui/hbqt_errorsys.prg b/harbour/contrib/hbqt/qtgui/hbqt_errorsys.prg
index 931aba428e..1546d4e58a 100644
--- a/harbour/contrib/hbqt/qtgui/hbqt_errorsys.prg
+++ b/harbour/contrib/hbqt/qtgui/hbqt_errorsys.prg
@@ -171,21 +171,21 @@ STATIC FUNCTION ErrorMessage( oError )
    LOCAL cMessage := iif( oError:severity > ES_WARNING, "Error", "Warning" ) + " "
 
    // add subsystem name if available
-   IF ISCHARACTER( oError:subsystem )
+   IF HB_ISCHAR( oError:subsystem )
       cMessage += oError:subsystem()
    ELSE
       cMessage += "???"
    ENDIF
 
    // add subsystem's error code if available
-   IF ISNUMBER( oError:subCode )
+   IF HB_ISNUMERIC( oError:subCode )
       cMessage += "/" + hb_NToS( oError:subCode )
    ELSE
       cMessage += "/???"
    ENDIF
 
    // add error description if available
-   IF ISCHARACTER( oError:description )
+   IF HB_ISCHAR( oError:description )
       cMessage += "  " + oError:description
    ENDIF