So I did a little searching and discovered a whole new REXX manual I did not
know about REXX/UNIX

Do a display on RETVAL and see what it shows after your READFILE

Lizette


> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]] On
> Behalf Of Lizette Koehler
> Sent: Friday, January 31, 2014 7:02 AM
> To: [email protected]
> Subject: Re: Compiled rexx fails on readfile
> 
> Jan
> 
> There is a TSO REXX newsgroup that might also be helpful.
> 
> If you have not done so, you can join using this URL.  Go to the bottom of
the
> WEBPAGE to join.
> http://vm.marist.edu/htbin/wlvindex?TSO-REXX
> 
> 
> 
> 
> 
> 
> Is this in z/OS or z/VM or ??  What level of OS?
> 
> 
> However your problem is the stem var htmlh.0 is not set to a number.
> 
> Your return from READFILE is 1
> 
> I am not familiar with a READFILE function.  What does a 1 mean on the
return
> from it?  Can you put displays in it to determine what it is indicating
with a
> CODE(1)?
> 
> Lizette
> 
> 
> 
> > -----Original Message-----
> > From: IBM Mainframe Discussion List [mailto:[email protected]]
> > On Behalf Of jan de decker
> > Sent: Friday, January 31, 2014 6:02 AM
> > To: [email protected]
> > Subject: Compiled rexx fails on readfile
> >
> > Hi list,
> >
> > I have a problem with a compiled simple rexx program (seee output
below).
> >
> > I searched but could find no explanation for the rc(1) of the readfile
> command.
> >
> > The purpose is to implement this as a CGI program but for the moment
> > it
> even fails
> > the same way from the OMVS command line.
> >
> > The file
> >
> > /jedsp/web/pub/cgi/html_header
> >
> > exists and is a small text file containing a few lines of html headers.
> >
> > cat /jedsp/web/pub/cgi/html_header
> >
> > works fine.
> >
> > Any help would be greatly appreciated.
> >
> > Thx,
> >
> >
> > j@n
> >
> >
> >
> > Hello
> >      9 *-* if syscalls('ON')>3
> >        >L>   "ON"
> >        >F>   "0"
> >        >L>   "3"
> >        >O>   "0"
> >     13 *-* pathname = '/jedsp/web/pub/cgi/html_header'
> >        >L>   "/jedsp/web/pub/cgi/html_header"
> >     14 *-* "readfile ("pathname") htmlh."
> >        >L>   "readfile ("
> >        >V>   "/jedsp/web/pub/cgi/html_header"
> >        >L>   ") htmlh."
> >        >O>   "readfile (/jedsp/web/pub/cgi/html_header"
> >        >O>   "readfile (/jedsp/web/pub/cgi/html_header) htmlh."
> >        +++ RC(1) +++
> >     15 *-* say rc
> >        >V>   "1"
> > 1
> >     16 *-* say retval
> >        >L>   "RETVAL"
> > RETVAL
> >     17 *-* do i = 1 to htmlh.0
> >        >L>   "1"
> >        >L>   "HTMLH.0"
> >     17 +++ do i = 1 to htmlh.0
> > EAGREX4100E Error 41 running compiled /jedsp/web/pub/cgi/sayhello,
> > line
> 17: Bad
> > arithmetic conversion
> >
> >

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

Reply via email to