Hi list,
John, thanks for the suggestions but the first one gives me a n rc of -1,
the second one gives an rc of 127
Anybody any idea?
Thanks,
j@n
On Fri, Jan 31, 2014 at 2:07 PM, John McKown
<john.archie.mck...@gmail.com>wrote:
> The problem is with the way you did the readfile. You have:
>
> "readfile ("pathname") htmlh."
>
> You should have one of the following instead:
>
> "readfile (pathname) htmlh." /* note that the (readfile) is inside the
> quotes, not outside */
>
> "readfile "pathname" htmlh." /* note lack of parentheses */
>
> The manual is a bit confusing.
>
>
> On Fri, Jan 31, 2014 at 7:02 AM, jan de decker <jan.je...@gmail.com>
> wrote:
>
> > 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 lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
>
>
> --
> Wasn't there something about a PASCAL programmer knowing the value of
> everything and the Wirth of nothing?
>
> Maranatha! <><
> John McKown
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
