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
How to find occurrence of mu and pe fields in a file?
Explain why do we use file-aid for seqential files?
Explain control variable in online screens?
How can we see the copy book length using file-aid?
What is cobol coding sheet?
Tell me can we update with histogram?
What is the difference between read work file 1 and read work file once? Why we are using work file once?
How to receive data passed through jcl parm parameter in a natural program? How data definition is defined in the program?
Tell me what type of files we can process thru file-aid?
How converted the natural coding for adabas
How to create 1 ddm that fetches 3 adabas files simultaneously?
How to receive data passed through jcl parm parameter in a natural program?
What is the quality process in development?
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?
Explain how many work file we can code in jcl?