home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a063 / 6.img / SAMPLE / APTSQL / GTHDR_1.FPL < prev    next >
Encoding:
Text File  |  1990-08-24  |  146 b   |  12 lines
  1. create apt proc gthdr_1() as
  2. begin
  3.  
  4.     submit 
  5.     sqlbegin
  6.         select date = getdate(), login = user_name()
  7.         use pubs
  8.     sqlend
  9.     
  10.     return
  11. end
  12.