/* * 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 */
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 ); }
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 ); }