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
What is the difference between read(1) and read work file once?
What happens when you issue a escape routine in a program? Will there be any compilation /run time erro?
Explain how to receive data passed through jcl parm parameter in a natural program? How data definition is defined in the program?
What is the quality process in development?
How to create 1 ddm that fetches 3 adabas files simultaneously?
Explain difference between read(1) and read work file once?
What is cobol coding sheet?
Define cobol coding sheet?
Explain is it possible to code goto statement in natural? If yes please provide the syntax of the same?
Explain how to find occurrence of mu and pe fields in a file?
What is the difference between escape(top or bottom) and escape immediate(top or bottom?
Tell me what type of files we can process thru file-aid?
How to receive data passed through jcl parm parameter in a natural program?
How to receive data passed through jcl parm parameter in a natural program? How data definition is defined in the program?
What is a hyperdescriptor? How does it work?