how to move cursor to a particular field when position is
not known?

Answer Posted / kunti

If you wish to position the cursor to a specified field,
you can use the MARK option,
eg.
INPUT
MARK *#MAP.#ACTION
USING MAP 'IVCLNTM1'

and and to position to a
particular position within a specified field, you use the
MARK POSITION option.


DEFINE DATA LOCAL
1 #A (A10)
1 #B (N4)
1 #C (N4)
END-DEFINE
*
INPUT (AD=M) #A #B #C
IF #A = ’ ’
COMPUTE #B = #B + #C
RESET #C
REINPUT FULL ’Enter a value’ MARK POSITION 5 IN *#A
END-IF
END

Is This Answer Correct ?    9 Yes 1 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

Explain adabas basic concepts. Like inverted list, address converter ,data storage?

766


Explain how to ftp the natural program to desktop? (From mainframe to pc), is it possible?

794


Explain the address converter?

767


Explain the like inverted list?

727


What is the difference between read work file 1 and read work file once? Why we are using work file once?

741


Explain control variable in online screens?

781


Explain how to receive data passed through jcl parm parameter in a natural program? How data definition is defined in the program?

820


Explain the difference between external subroutine and subprogram?

864


In a Natural program i used the below code for report FORMAT LS=132 PS=60 And down the line I want to change either LS/PS like FORMAT LS=120 PS=50, is it possible? How it will work?

1679


Explain how to find occurrence of mu and pe fields in a file?

711


Can you explain control variable in online screens?

748


Explain how are you going to remove duplicates from the file that is being read?

768


What is the difference between read(1) and read work file once?

757


Explain how to move cursor to a particular field when position is not known?

755


What is the difference between escape(top or bottom) and escape immediate(top or bottom?

758