zOs/REXX.O13/DSNRLI

/* rexx */
say 'calling'
call dsnRli 'abc'
say rc