home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c160 / 1.ddi / SOURCE / D4RECALL.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-06-22  |  447 b   |  30 lines
  1.  
  2. /*  d4recall.c   
  3.     (C) Copyright Sequiter Software Inc., 1987-1990.  All rights reserved.
  4.  
  5.     Un-deletes a record.
  6. */
  7.  
  8. #include "d4base.h"
  9.  
  10. extern  BASE  *v4base ;
  11. extern  int    v4cur_base ;
  12.  
  13.  
  14. int d4recall( long rec_num )
  15. {
  16.    int  rc ;
  17.  
  18.    if ( (rc = d4go(rec_num)) != 0)
  19.       return( rc ) ;
  20.  
  21.    v4base[v4cur_base].buffer[0] =  ' ' ;
  22.  
  23.    if ( (rc = d4write( rec_num))  < 0)
  24.     return  rc ;
  25.  
  26.    return( 0 ) ;
  27. }
  28.  
  29.  
  30.