RE: Generate a screen print like "Print-Key"- Function

Dave, 
QsnGetCsrAdr is a procedure in the QSNAPI service program. In the program
that Carsten has written, change the BNDDIR specification to the following:

H BNDDIR('QC2LE':'QSNAPI') OPTION(*SRCSTMT)

That should take care of it... 
Or When you create the program using CRTPGM, specify BNDSRVPGM(QSYS/QSNAPI).

Either of these should work... 

Hope that helps. 

-----Original Message-----
From: Dave Mahadevan [mailto:mahadevan@fuse.net]
Sent: Thursday, March 01, 2001 7:31 PM
To: MI400@midrange.com
Subject: Re: Generate a screen print like "Print-Key"- Function


Bob:

No luck on that  It aint there in QSNAPI, must be a V4 thing.

Bob Crothers wrote:

> Try service pgm QSNAPI
>
> That is the only "strange" service pgm in my ILE/C program that grabs
> screens.
>
> The other service programs are QC2IO, QC2UTIL1 and QLEAWI
>
> This is on a V3R7 machine targeting V3R1.
>
> Bob
>
> -----Original Message-----
> From: owner-mi400@midrange.com [mailto:owner-mi400@midrange.com]On Behalf
Of
> Dave Mahadevan
> Sent: Thursday, March 01, 2001 6:08 PM
> To: MI400@midrange.com
> Subject: Re: Generate a screen print like "Print-Key"- Function
>
> Does anybody know which bind dir/srv program has  'QSNGETCSRADR'.  QC2LE
> does
> not have this in V3R2.
>
> Carsten Flensburg wrote:
>
> > PI's:  ------------------------------------------**
> >      D GetCsrAdr       Pr            10i 0 ExtProc( 'QsnGetCsrAdr' )
> >      D  Row                          10i 0
> >      D  Col                          10i 0
> >      D  LlvEnvHdl                    10i 0 Const  Options( *Omit )
> >      D  ApiError                   1024a          Options( *Omit:
> *VarSize )
> >
>
> --
> Thank You.
>
> Regards
>
> Dave Mahadevan.. mailto:mahadevan@fuse.net
>
> +---
> | This is the MI Programmers Mailing List!
> | To submit a new message, send your mail to MI400@midrange.com.
> | To subscribe to this list send email to MI400-SUB@midrange.com.
> | To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
dr2@cssas400.com
> +---
>
> +---
> | This is the MI Programmers Mailing List!
> | To submit a new message, send your mail to MI400@midrange.com.
> | To subscribe to this list send email to MI400-SUB@midrange.com.
> | To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
dr2@cssas400.com
> +---

--
Thank You.

Regards

Dave Mahadevan.. mailto:mahadevan@fuse.net


+---
| This is the MI Programmers Mailing List!
| To submit a new message, send your mail to MI400@midrange.com.
| To subscribe to this list send email to MI400-SUB@midrange.com.
| To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dr2@cssas400.com
+---
+---
| This is the MI Programmers Mailing List!
| To submit a new message, send your mail to MI400@midrange.com.
| To subscribe to this list send email to MI400-SUB@midrange.com.
| To unsubscribe from this list send email to MI400-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: dr2@cssas400.com
+---