Re: Exit Point - QIBM_QTG_DEVINIT

["Scott Klement" <infosys@xxxxxxxxxxxx>]

Hi Frank,

I took a look at this URL, and how these exit programs work, and
it appears that this support is not available until V4R2.

I looked at the C code a little bit, and it appears that you should
be able to do the same things in RPG IV...  Shouldnt be too bad for
someone who knows both C and RPG IV to translate it.

But, since I'm stuck (for now, anyway) at V3R2, I can't justify using
my company's AS/400 to translate it to RPG :)   Heck, even if I do
it on my own time, I still can't debug it without a newer system...

So, sorry... I'd like to help you, but I can't :(

best of luck,

Scott Klement


"Frank Magee" <frank.magee@mailcity.com> wrote:
>
> Scott:
> I may be wrong but I think this exit point is available under V3R2.
> I hope this is of more help to you than it was to me.
>
> You can download the code from:
>         http://www.as400.ibm.com/tstudio/tech_ref/tcp/telex/telexdwn
>  tm
> --
>
> On 22 Sep 1999 14:23:10 -050   Scott Klement wrote:
> >Frank,
> >
> >     Where is the example code in C?  I'd like to check it out.. it
> >might be useful for our shop, if it works in V3R2.
> >
> >If it is, I'll convert it to RPG IV, and post a copy of the convert
> >code.
> >
> >
> >
> >"Frank Magee" <frank.magee@mailcity.com> wrote:
> >> Hi:
> >>
> >> Hope someone out there can help me.
> >>
> >> We have several AS400's attached to our network.  The AS/400's ar
>  a
> >>  at V4R3 and the network is 100mb Ethernet.   IBM's Personal
> >>  Communications product is used to access these systems.  (telnet
>  52
> >>  sessions)
> >>
> >> This product does not allow device naming.  A random virtual devi
> >>  selected at session initialization time.
> >>
> >> I need to be able to segment our users into different subsystems.
>  I
> >>  thought I could do this by creating and registering an exit poin
> >>  program.  This way I could, based on the IP address, assign a
> >>  specific virtual device and thereby direct jobs into specific
> >>  subsystems.
> >>
> >> I went to the IBM web site and found a sample program on how to d
> >>  this.  Unfortunately the example is in "C".  Which is of no valu
>  t
> >>  me.
> >>
> >> Does anyone have an example program, in RPG that could help me wi
> >>  this.
> >>
> >> I would really appreciate any help.
> >>
> >>                            Thanks,
> >>                                   Frank
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---