Retrieving the Relative Record Number
Q: In an RPG program, how do I retrieve the relative record number (RRN) of a record read using a keyed file? The file being read is a logical with duplicate keys allowed. After loading the records into a subfile in key sequence, I want to select a record for update. In order to grab the correct record, I thought I would write out the RRN to the subfile in a hidden field. Where can I find the RRN?
A: The relative record number of a database record in an RPG program is in binary form in positions 397 to 400 of the INFDS. If the RPG compiler requests blocking, then the INFDS will be updated only when a block of records is read. You may need to prevent your program from reading blocks of records in order to get the RRN for each read. You can do this by specifying SEQONLY(*YES 1) on the Override Database File (OVRDBF) command.
Business users want new applications now. Market and regulatory pressures require faster application updates and delivery into production. Your IBM i developers may be approaching retirement, and you see no sure way to fill their positions with experienced developers. In addition, you may be caught between maintaining your existing applications and the uncertainty of moving to something new.
IT managers hoping to find new IBM i talent are discovering that the pool of experienced RPG programmers and operators or administrators with intimate knowledge of the operating system and the applications that run on it is small. This begs the question: How will you manage the platform that supports such a big part of your business? This guide offers strategies and software suggestions to help you plan IT staffing and resources and smooth the transition after your AS/400 talent retires. Read on to learn:
LATEST COMMENTS
MC Press Online