Steve,

You have to code something like this:

X = LISTDSI(SYSUT1 FILE)
IF (X ¬= 0) THEN DO
   SAY 'DATASET ..' SYSUT1 '.. NOT FOUND'
   SAY SYSREASON
   EXIT
END

instead of what you have, which is

 LISTDSI(SYSUT1 FILE)

I get a -3 return code and this error message when I code LISTDSI the way
you coded it:

IKJ56621I INVALID COMMAND NAME SYNTAX
       +++ RC(-3) +++

As someone else pointed out, LISTDSI is a Rexx TSO/E external function so
it has to be invoked as a function.

Mike Shaw
MVS/QuickRef Support Group
Chicago-Soft, Ltd.


On Mon, Feb 20, 2023 at 5:04 PM Steve Thompson <[email protected]> wrote:

> I'm wondering this as well. I had it happen before.
>
> Steve Thompson
>
> On 2/20/2023 4:50 PM, Tom Brennan wrote:
> > O/T - This may not be related and I wish I knew more about it,
> > but for a time last year my tombrennansoftware.com email
> > address couldn't send to gmail.com at all.  I believe the
> > Google server was doing a DNS lookup on my address looking for
> > a particular SPF TXT record. I really can't remember, but I
> > think after I set that record up in my DNS I could send notes
> > to gmail.  Maybe Marist does something similar.
> >
> > On 2/20/2023 12:58 PM, Steve Thompson wrote:
> >
> >> ... It doesn't matter what email address I send an email to at
> >> Marist, it gets rejected by IP address.
> >
> > ----------------------------------------------------------------------
> >
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to [email protected] with the message: INFO
> > IBM-MAIN
>
> --
> Regards, Steve Thompson
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to