Display file in rpgle

I continued learning about RPG, and now im trying to improve the little program i did last week. This time, i want to get the row of the user I write.

I read that the way to do that is using "Chain", so i did: Code:. Re: Display records from a Physical File I got it!! Re: Display records from a Physical File Looks like you've done a good job of reading up and solving it yourself - top work!!! May 26, , PM.

Re: Display records from a Physical File Thanks gcraill! Im thinking about add Change and Delete, thought. I finished the Add info code, but when it adds a new record in the Data File, there are a couple of problems: 1. I only add the name, phone, zip and address in my program, cos i think the as has to put the ID key by itself. It does it, but it always starts from 0 and in case i add 3 rows, finish in 2.

In case I use unique keys, it crash every time it adds an existing id.. My question is, how can I set an auto-increment in as for this data file? If there is no way, how can i resolve this problem? When I exit the program, it adds by itself one blank row.. There is some one who knows why? There isnt any delete option : As always, here is my code: Physical file: Code:. May 27, , AM. Re: Display records from a Physical File Hi Plunk: The code in your post 12 does not show datafile1 as a "keyed" file.

When you do a chain with a number or a numeric field without the K you are actually getting the relative record number RRN which probably isn't the "CNUM" field. The problem with quotes on the internet is that it is hard to verify their authenticity New record. Name Type. The design screen looks like this. Select Field Keywords Constant. Y All except Hidden Colors. Y All except Hidden General keywords. If specified for more than one field,. All these attribute are dependent on the associated indicator if any.

Select Display Attributes Constant. Program-to-system field. HI Reverse image. RI Y 11 Column separators. CS Blink. BL Nondisplay. ND Underline. UL Position cursor. PC Set modified data tag. MDT Protect field. Select Colors Constant. BLU Green. GRN Pink. PNK Red. RED Turquoise. TRQ White. Viewed 1k times. Jeff Jeff 2 2 silver badges 12 12 bronze badges.

If larger than , perhaps that's the issue. Add a comment. Active Oldest Votes. David G David G 3, 1 1 gold badge 23 23 silver badges 27 27 bronze badges. Sign up or log in Sign up using Google. Sign up using Facebook. Sign up using Email and Password.

Post as a guest Name.