home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a065 / 1.img / TBLIB.EXE / TBAGOLST.PRG < prev    next >
Encoding:
Text File  |  1992-03-09  |  212 b   |  13 lines
  1.     // TBaGolst.prg
  2.     //
  3.     // TBaGoLast() - Go to last record supporting append mode
  4.  
  5.     FUNCTION TBaGoLast(lAppend)
  6.  
  7.       GOTO BOTTOM
  8.       IF lAppend
  9.         SKIP
  10.       ENDIF
  11.  
  12.     RETURN NIL
  13.