Anonymous user
Program name: Difference between revisions
m
→{{header|REXX}}: removed all references to non-Classic REXX, removed STYPE from the PRE html tags.
No edit summary |
m (→{{header|REXX}}: removed all references to non-Classic REXX, removed STYPE from the PRE html tags.) |
||
Line 1,098:
The [[REXX|Rexx]] <code>PARSE SOURCE</code> instruction parses data describing the source of the program running.
The language processor returns a string that does not change while the program is running.
The source string contains operating system name, followed by either <code>COMMAND</code>, <code>FUNCTION</code>, or
<code>SUBROUTINE
function call in an expression or using the <code>CALL</code> instruction.
These two tokens are followed by the complete path specification of the program file.
<br><br>It should be noted that the format of the complete path varies depending upon the operating system.
Line 1,139:
===version with various types of invokes===
Used under Windows/XP and Windows 7 with the following REXXes:
:::* R4 REXX
:::* REGINA REXX
:::* Personal REXX
:::* ROO REXX
:::* ooRexx
<lang rexx>/*REXX pgm displays the name (& possible path) of the REXX program name.*/
parse version _version
Line 1,159:
zz = prog_nam( , 'function') /* " " " " function. */
/*stick a fork in it, we're done.*/</lang>
'''output''' when using '''R4 REXX''' with the input of: <tt> command </tt>
<pre>
───────────────────────────────────────────REXX-r4 4.00 3 Jul 2012 ◄──► command
REXX's name of system being used: Win32
Line 1,174:
name of the REXX program and path: D:\PROG_NAM.REX * * PROG_NAM
</pre>
'''output''' when using '''REGINA REXX''' with the input of: <tt> command </tt>
<pre>
──────────────────────────────REXX-Regina_3.7(MT) 5.00 14 Oct 2012 ◄──► command
REXX's name of system being used: WIN32
Line 1,189:
name of the REXX program and path: D:\PROG_NAM.rex
</pre>
'''output''' when using '''Personal REXX''' with the input of: <tt> command </tt>
<pre>
────────────────────────────────────REXX/Personal 4.00 21 Mar 1992 ◄──► command
REXX's name of system being used: PCDOS
Line 1,204:
name of the REXX program and path: D:\PROG_NAM.REX
</pre>
'''output''' when using '''ROO REXX''' with the input of: <tt> command </tt>
<pre>
─────────────────────────────────────────REXX-roo 4.00 28 Jan 2007 ◄──► command
REXX's name of system being used: Win32
Line 1,219:
name of the REXX program and path: D:\PROG_NAM.REX * * PROG_NAM
</pre>
'''output''' when using '''ooRexx''' with the input of: <tt> command </tt>
<pre>
-----------------------------------REXX-ooRexx_4.1.2(MT) 6.03 28 Aug 2012 ?--?
REXX's name of system being used: WindowsNT
| |||