Sujet : Re: Capturing DCL output in symbol
De : arne (at) *nospam* vajhoej.dk (Arne Vajhøj)
Groupes : comp.os.vmsDate : 14. May 2025, 14:08:00
Autres entêtes
Organisation : A noiseless patient Spider
Message-ID : <10024jg$2good$1@dont-email.me>
References : 1 2 3
User-Agent : Mozilla Thunderbird
On 5/14/2025 5:31 AM, Lawrence D'Oliveiro wrote:
On Sat, 10 May 2025 13:40:45 +0200, hb0815 wrote:
There are limitations. This can only work if the equivalence string of
the logical name is valid, does not exceed a limit, etc.
You have to choose a logical name that won’t clash with any other use in
any other process in the same job, you have to remember to delete it
afterwards to avoid clutter ...
That is not so hard.
$ vf='f$verify(0)'
$ reslog = "RES_" + f$unique()
$ pipe 'p1' | -
(read sys$pipe lin ; qlin=""""+lin+"""" ; def/job/nolog 'reslog' &qlin) ; -
'p2'==f$trnlnm(reslog)
$ deas/job 'reslog'
$ if vf then exit f$verify(1)+1
$ exit 1
Arne