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
