Brian,

You can review the code in errorapi.c (just search for:  
"hb_vmRequestQuery() is set").

This is a simple protection from trying to set an error before  
previous request (f.e. another error) has been processed.

Ron

On Apr 7, 2008, at 1:31 PM, bhays wrote:
Ron ( or anybody else with vm experience ):

This is a strange error report.  Can you tell us what it means when
it says " hb_vmRequestQuery() is set" ?

Does "Couldn't create error ADSISEMPTY '(null)'"  imply that the
errorsys had a problem with a badly formed error object?

I'd like to know how to handle such reports rather than just fix this
one function.

--
Brian Hays

> -----Original Message-----
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] On  
> Behalf Of
> Luis Krause Mantilla
> Sent: Monday, April 07, 2008 11:46 AM
> To: Xharbour-Developers
> Subject: [xHarbour-developers] hb_vmRequestQuery error - what does  
> this
> mean?
>
> Hi:
>
> When I make a function call in my xharbour app, I get this gpf from
> xharbour:
>
> ---------------------------
> Unrecoverable error 9000:
> ---------------------------
> hb_vmRequestQuery() is set - Couldn't create error ADSISEMPTY '(null)'
> ---------------------------
> OK
> ---------------------------
>
> This is the function I'm trying to call.  Please advise what I'm doing
> wrong:
>
> /*
> // Use AdsIsEmpty to determine if the indicated field is NULL for ADTs
> or empty for DBFs
> HB_FUNC( ADSISEMPTY )
> {
>    UNSIGNED32 ulRetVal = ~AE_SUCCESS;
>    UNSIGNED16 pbEmpty = FALSE;
>    ADSAREAP   pArea;
>    UNSIGNED8* pucFldName;
>
>    pArea = hb_rddGetADSWorkAreaPointer();
>    if( ! ISCHAR( 1 ) || ! ISNUM( 1 ) )
>    {
>       hb_errRT_DBCMD( EG_ARG, 1014, NULL, "ADSISEMPTY" );
>    }
>    else if( pArea )
>    {
>       pucFldName = (UNSIGNED8 *) ( ISCHAR( 1 ) ? hb_parcx( 1 ) :
> ADSFIELD( hb_parni( 1 ) ) );
>       ulRetVal = AdsIsEmpty( pArea->hTable, pucFldName, &pbEmpty );
>    }
>
>    if ( ! pArea || ulRetVal != AE_SUCCESS )
>    {
>       hb_errRT_DBCMD( EG_NOTABLE, 2001, NULL, "ADSISEMPTY" );
>    }
>
>    hb_retl( pbEmpty );
> }
> */
>
> --
> Luis Krause Mantilla
> lkrausem at shaw dot ca
> luis_krause at hotmail dot com
> "May the Source be with GNU"
>
>
>
> ---------------------------------------------------------------------- 
> -
> --
> This SF.net email is sponsored by the 2008 JavaOne(SM) Conference
> Register now and save $200. Hurry, offer ends at 11:59 p.m.,
> Monday, April 7! Use priority code J8TLD2.
> http://ad.doubleclick.net/clk;198757673;13503038;p?http:// 
> java.sun.com/
> javaone
> _______________________________________________
> xHarbour-developers mailing list
> xHarbour-developers@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/xharbour-developers
>
> No virus found in this incoming message.
> Checked by AVG.
> Version: 7.5.519 / Virus Database: 269.22.8/1363 - Release Date:
> 4/7/2008 8:56 AM
>


------------------------------------------------------------------------ 
-
This SF.net email is sponsored by the 2008 JavaOne(SM) Conference
Register now and save $200. Hurry, offer ends at 11:59 p.m.,
Monday, April 7! Use priority code J8TLD2.
http://ad.doubleclick.net/clk;198757673;13503038;p?http:// 
java.sun.com/javaone
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers



-------------------------------------------------------------------------
This SF.net email is sponsored by the 2008 JavaOne(SM) Conference 
Register now and save $200. Hurry, offer ends at 11:59 p.m., 
Monday, April 7! Use priority code J8TLD2. 
http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to