home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / RMH / Examples / pname.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  2001-05-24  |  239 b   |  11 lines
  1. /*
  2. usage of ProgramName()
  3. */
  4.  
  5. l="rmh.library";if ~show("L",l) then;if ~addlib(l,0,-30) then exit
  6.  
  7. say "Simple:" ProgramName()
  8. say "NoExt: " ProgramName("NOEXT")
  9. say "Full:  " ProgramName("FULL")
  10. say "Path:  " PathPart(ProgramName("FULL"))
  11.