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
Explain how to receive data passed through jcl parm parameter in a natural program? How data definition is defined in the program?
How can we see the copy book length using file-aid?
How converted the natural coding for adabas
Explain adabas basic concepts. Like inverted list, address converter ,data storage?
Explain how many work file we can code in jcl?
Define cobol coding sheet?
Explain how to move cursor to a particular field when position is not known?
Explain why do we use file-aid for seqential files?
Explain difference between read work file 1 and read work file once? Why we are using work file once?
Explain difference between read(1) and read work file once?
Explain how to find occurrence of mu and pe fields in a file?
Explain the data storage?
What is data trace system 2.0 used for?
Explain is it possible to code goto statement in natural? If yes please provide the syntax of the same?
Explain the address converter?