© serviceprofessionalgmbh

Das Gute an HELP: alle Kommandos stehen online zur Verfügung. Das Schlechte an HELP:Kein Zurückblättern, keine Suche nach Parametern. Hier wird die Ausgabe von HELP in eine temporäre Datei umgeleitet und per VIEW angezeigt.

/* REXX
*/
if arg() = 0 then do
   say "Kommando fuer HELP eingeben (enter = ende)"
   parse upper external cmd
   if cmd = "" then exit
end
else cmd = arg(1)
dmy = outtrap(hilfe.)
"help" cmd
dmy = outtrap("off")
"alloc f(hlp) new space(5) tracks lrecl(133) blksize(0) recfm(f b) reu"
"execio * diskw hlp (stem hilfe. finis"
address ispexec
"lminit dataid(did) ddname(hlp)"
"view   dataid(&did)"
"lmfree dataid(&did)"
address
"free fi(hlp)"
return