Comments on: INFDS in RPGLE http://itknowledgeexchange.techtarget.com/itanswers/infds-in-rpgle-2/ Wed, 22 May 2013 02:14:48 +0000 hourly 1 By: tomliotta http://itknowledgeexchange.techtarget.com/itanswers/infds-in-rpgle-2/#comment-108731 tomliotta Fri, 22 Jun 2012 21:31:22 +0000 #comment-108731 The RTNCSRLOC() keyword might not be specified. In such a case, the CURSOR area of the INFDS can be used.

CURSOR can be broken into ROW and COLUMN. Those can be used to examine the list of fields in the display file record formats and to determine which field occupies that location.

Much more difficult than adding RTNCSRLOC() to the DDS, but sometimes you can’t change the DDS.

Tom

]]> By: philpl1jb http://itknowledgeexchange.techtarget.com/itanswers/infds-in-rpgle-2/#comment-108724 philpl1jb Fri, 22 Jun 2012 13:33:59 +0000 #comment-108724 Sorry ROW and COLUMN we not necessary

A RTNCSRLOC(&FORMAT &FIELD)
A FORMAT 10A H
A FIELD 10A H

]]> By: philpl1jb http://itknowledgeexchange.techtarget.com/itanswers/infds-in-rpgle-2/#comment-108723 philpl1jb Fri, 22 Jun 2012 13:33:02 +0000 #comment-108723 Field name but not using INFDS
add this to the Display record – on return to the rpg program the field FIELD will contain the FieldName

A RTNCSRLOC(&FORMAT &FIELD)
A ROW 3S 0H
A COLUMN 3S 0H
A FORMAT 10A H
A FIELD 10A H

]]>