Joined: 26 Apr 2004 Posts: 4650 Location: Raleigh, NC, USA
It doesn't work in interpreted REXX either:
4 +++ IF SYSDSN("'"tabledsn"'") \= 'OK'
IRX0043I Error running TEST437, line 4: Routine not found
so what's the point? AFAIK, SYSDSN is a TSO/E External Function, so you probably have to make a call to TSO, or a non-compiled exec running in TSO, to use that function. I didn't see any specific details in the REXX370 Compiler for z/OS Reference Manual, so I guess they should work the same as long as they are both using only REXX built-in functions.