Example #1
0
/*
 * VxDGet - get some data from a client/server
 */
unsigned __pascal VxDGet( void __far *rec, unsigned len )
{
    _dword      rc;

#ifdef __WINDOWS__
    while( 1 ) {
        rc = ConvGet( __ConvId,rec, len, NO_BLOCK );
        if( (rc & 0xffff) == BLOCK ) {
            messageLoop();
        } else {
            break;
        }
    }
#else
    rc = ConvGet( __ConvId,rec, len, BLOCK );
#endif
    return( rc >> 16 );

} /* VxDGet */
Example #2
0
unsigned RemoteGet( char *rec, unsigned len )
{
unsigned long rc;

#ifdef __WINDOWS__
    while( 1 ) {
        rc = ConvGet( _id, rec, len, NO_BLOCK );
        if( (rc & 0xffff) == BLOCK ) SetExecutionFocus( _id );
        else break;
    }
#else
#ifdef DEBUG_ME
    Blip( &_a, &_b, 'G' );
#endif
    rc = ConvGet( _id, rec, len, BLOCK );
#ifdef DEBUG_ME
    Blip( &_a, &_b, 'g' );
#endif
#endif
    return( rc >> 16 );
}
Example #3
0
trap_retval RemoteGet( byte *rec, trap_elen len )
{
    unsigned long rc;

#ifdef __WINDOWS__
    for( ;; ) {
        rc = ConvGet( _id, rec, len, NO_BLOCK );
        if( (rc & 0xffff) == BLOCK ) SetExecutionFocus( _id );
        else break;
    }
#else
#ifdef DEBUG_ME
    Blip( &_a, &_b, 'G' );
#endif
    rc = ConvGet( _id, rec, len, BLOCK );
#ifdef DEBUG_ME
    Blip( &_a, &_b, 'g' );
#endif
#endif
    return( rc >> 16 );
}