|
Dale, It should be the actual RRN. Although I don't use it often, I've never seen it wrong unless storage was corrupted. Copybook is on the way.... Terry > -----Original Message----- > From: cobol400-l-bounces@xxxxxxxxxxxx > [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of > cobol400-l@xxxxxxxxxxxx > Sent: Tuesday, April 19, 2005 3:14 PM > To: COBOL Programming on the iSeries/AS400 > Subject: RE: [COBOL400-L] IO Feedback Area > > > I thought my area was correct, can you send me the area you > are using???? > Is it supposed to give the actual record RRN or is it a block???? > > Dale Nieswiadomy > > Livingston County Information & Technology Services > (585) 243-7113 > > dnieswiadomy@xxxxxxxxxxxxxxxxxxx > > > > > > cobol400-l@midran > > ge.com > > Sent by: > To > cobol400-l-bounce "COBOL Programming on > the > s@xxxxxxxxxxxx iSeries/AS400" > > > <cobol400-l@xxxxxxxxxxxx> > > cc > 04/19/2005 03:09 > > PM > Subject > RE: [COBOL400-L] IO > Feedback Area > > > Please respond to > > COBOL Programming > > on the > > iSeries/AS400 > > <cobol400-l@midra > > nge.com> > > > > > > > > > > Dale, > > Are you sure your offsets are correct for the I/O > feedback area? I have a copybook that I use for > this - holler if you would like a copy :) > > Terry > > > -----Original Message----- > > From: cobol400-l-bounces@xxxxxxxxxxxx > > [mailto:cobol400-l-bounces@xxxxxxxxxxxx] On Behalf Of > > cobol400-l@xxxxxxxxxxxx > > Sent: Tuesday, April 19, 2005 2:54 PM > > To: cobol400-l@xxxxxxxxxxxx > > Subject: [COBOL400-L] IO Feedback Area > > > > > > I'm trying to get the rrn of a keyed file --- and using the > > IO-Feedback > > area --- problem is that it appears to be giving me the rrn > > of a block of > > records instead of a different one for each record read. > > > > My feedback area is defined as: > > 01 WS-FEEDBACK-AREA. > > 03 FEED-LENGTH PIC 9(4) BINARY. > > 03 FILLER PIC X(172). > > 03 RRN-IND PIC 9(8) BINARY. > > 03 FILLER PIC X(20). > > > > Any ideas???? > > > > Dale Nieswiadomy > > > > Livingston County Information & Technology Services > > (585) 243-7113 > > > > dnieswiadomy@xxxxxxxxxxxxxxxxxxx > > > > _______________________________________________ > > This is the COBOL Programming on the iSeries/AS400 > > (COBOL400-L) mailing list > > To post a message email: COBOL400-L@xxxxxxxxxxxx > > To subscribe, unsubscribe, or change list options, > > visit: http://lists.midrange.com/mailman/listinfo/cobol400-l > > or email: COBOL400-L-request@xxxxxxxxxxxx > > Before posting, please take a moment to review the archives > > at http://archive.midrange.com/cobol400-l. > > > > > > _______________________________________________ > This is the COBOL Programming on the iSeries/AS400 > (COBOL400-L) mailing > list > To post a message email: COBOL400-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/cobol400-l > or email: COBOL400-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the archives > at http://archive.midrange.com/cobol400-l. > > > > > _______________________________________________ > This is the COBOL Programming on the iSeries/AS400 > (COBOL400-L) mailing list > To post a message email: COBOL400-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/cobol400-l > or email: COBOL400-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the archives > at http://archive.midrange.com/cobol400-l. > >
As an Amazon Associate we earn from qualifying purchases.
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.
midrange.com
