Tuesday, 14 May 2013

Offset Example


Below code gives the exact position of  Variable  J in the variable name.


PARAMETERS name TYPE LENGTH 26 DEFAULT 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'.
PARAMETERS TYPE LENGTH 10.

DATA TYPE i.

FIND IN name MATCH OFFSET k.


WRITE / name/ k.


In below Below code  M is the position of character that is printed when we enter  M.
Offset starts from '0' always.
Offset of A is 0 , B is 1....  Z is 25.


PARAMETERS name TYPE LENGTH 26 DEFAULT 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'.
PARAMETERS TYPE LENGTH 10.
PARAMETERS TYPE " give offset
DATA TYPE i.

FIND IN name MATCH OFFSET k.


WRITE / name/ k.
WRITE 'Offset at 'name+m(1.

No comments:

Post a Comment