• Subject: Positioning cursor
  • From: "Robin Sapiro" <robin.sapiro@xxxxxxxx>
  • Date: Fri, 16 Jul 1999 22:48:31 -0400

The attached program when called with the qualified display file name (*LIBL
is valid) and the name of the record format and the field name, will return
the row and column of the first byte of the named field. This can then be
used to position the cursor.

The following must be included in the display file record format.


     A                                      RTNCSRLOC(&RCDNAME &FIELDNAME)
     A                                      CSRLOC(ROW        COL)
     A            RCDNAME       10A  H
     A            FIELDNAME     10A  H
     A            COL            3S 0H
     A            ROW            3S 0H

The program was originally written on a V3R2 machine and has since been run
on V4R1, V4R2 and V4R3.

RTVDFRCRG


This thread ...

Replies:

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

This mailing list archive is Copyright 1997-2019 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].