Re: [WEB400] read Standard In Problems

[Justin Houchin <jhouchin9@xxxxxxxxxxx>]

Ok now the program gets EnvRec=24, EnvLen=2,RcvLen=24,RcvRec=0. Why isn't
the RcvRec getting any data? The #CvtDb is unsecssful because there is no
RvcRec.


Justin
----- Original Message -----
From: "Joel R. Cochran" <jrc@masi-brac.com>
To: <web400@midrange.com>
Sent: Friday, April 19, 2002 3:16 PM
Subject: RE: [WEB400] read Standard In Problems


> You need to specify 'value' on your RcvRec parameter on the PR and PI
> blocks.  This will allow the routine to return the changed RcvRec
values...
>
>
> > Here is my Sub Procedure for #RdStin:
> >
> >
> > P #RdStin         B                   Export
> >
> > *====================================================================*
> > D #RdStin         PI
> > D  RcvRec                     1024    *****ADD 'value' HERE*****
> > D  RcvLen                        9B 0
> >  *
> > D RcvRecLen       S              9B 0
> >
> > *====================================================================*
> > C                   CallB     'QtmhRdStin'
> > C                   Parm                    RcvRec
> > C                   Parm                    RcvLen
> > C                   Parm                    RcvRecLen
> >  C                   Parm                    WPError
> >   *
> >
> > *====================================================================*
> >  P #RdStin         E
> _______________________________________________
> This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
> To post a message email: WEB400@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/web400
> or email: WEB400-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/web400.
>
>