home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: InfoMgt / InfoMgt.zip / MArb92a.zip / Read.CMD < prev    next >
OS/2 REXX Batch file  |  1996-04-04  |  343b  |  15 lines

  1. /* REXX */
  2.  
  3. /*  Function     : When invoked, this function attempts to open the simple
  4.                    file.
  5.     Created      : February 10, 1996
  6.     Modifications:
  7. */
  8.     SELECT
  9.         WHEN LINES("d:\MA_Development\Sample.Txt") <> 0
  10.             THEN 
  11.                 RETURN 1
  12.         OTHERWISE
  13.             RETURN 0
  14.     END
  15.