× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



This works for me:

 *------------------
Fddb500p   o    e             printer usropn
F                                     infds(infds)
D infds           ds
D  curLine              367    368i 0

Phil

> -----Original Message-----
> From: rpg400-l-admin@midrange.com [mailto:rpg400-l-admin@midrange.com]On
> Behalf Of Jim Franz
> Sent: Tuesday, April 09, 2002 8:12 PM
> To: rpg400-l@midrange.com
> Subject: Re: INFDS
>
>
> i went to the info center
> http://publib.boulder.ibm.com/pubs/html/as400/v5r1/ic2924/index.htm
> selected programming in left column, then rpg reference
> in Adobe, goto page 91 - 94 (printed page# not the same)
> have not done this in years. Assume you are using Post opcode?
> jim
>
> ----- Original Message -----
> From: "Buzz Fenner" <bfenner@jonesborocwl.org>
> To: <rpg400-l@midrange.com>
> Sent: Tuesday, April 09, 2002 5:57 PM
> Subject: RE: INFDS
>
>
> > I totally agree.  But, when using those offsets in a program, I get an
> abend
> > and viewing the dump shows a hex value of '4040'x.
> >
> >
> > According to my layouts, it should still be at that position.
> >
> > > -----Original Message-----
> > > From: Buzz Fenner [SMTP:bfenner@jonesborocwl.org]
> > > Sent: Tuesday, April 09, 2002 3:12 PM
> > > To:   RPG Discussion
> > > Subject:      INFDS
> > >
> > > I've been unable to find definitive info on how to define the offsets
> > > dealing with printer file I/O.  Used to, one could consult
> the good old
> > > CPF
> > > manual, but those days are gone.  I've gone to the iSeries Information
> > > Center website and have found some specs on common I/O
> feedback and the
> > > device dependent stuff, but no documentation on how you use them
> together.
> > > I used to be able to retrieve the printer file line number at offset
> > > 367-368
> > > (binary) but using that in an ILE RPG program gets me blanks.  Anyone
> > > point
> > > me in the right direction on good documentation for the file I/O
> feedback?
> > >
> > > Buzz Fenner
> > > mailto:bfenner@jonesborocwl.org
> > >
> > > "Consider the dafodill.  While you are doing that, I'll be over here
> > > looking
> > > through your stuff."
> > >
> > >
> > > _______________________________________________
> > > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing
> list
> > > To post a message email: RPG400-L@midrange.com
> > > To subscribe, unsubscribe, or change list options,
> > > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > > or email: RPG400-L-request@midrange.com
> > > Before posting, please take a moment to review the archives
> > > at http://archive.midrange.com/rpg400-l.
> >
> >
> >
> ******************************************************************
> **********
> >
> ******************************************************************
> **********
> > ****************************************************
> > This message originates from Lincare Holdings Inc. It contains
> information
> > which maybe confidential or privileged and is intended only for the
> > individual or entity named above.
> > It is prohibited for anyone else to disclose, copy, distribute
> or use the
> > contents of this message.
> > All personal messages express views solely of the sender, which
> are not to
> > be attributed to Lincare Holdings Inc., and may not be copied or
> distributed
> > without this disclaimer.
> > If you received this message in error, please notify us immediately at
> > MailAdmin@lincare.com or (800) 284-2006.
> >
> ******************************************************************
> **********
> >
> ******************************************************************
> **********
> > ****************************************************
> >
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> > To post a message email: RPG400-L@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
> > _______________________________________________
> > This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> > To post a message email: RPG400-L@midrange.com
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> > or email: RPG400-L-request@midrange.com
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> >
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.