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 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?
What is data trace system 2.0 used for?
What is the quality process in development?
How are you going to remove duplicates from the file that is being read?
Explain is it possible to code goto statement in natural? If yes please provide the syntax of the same?
Explain how to ftp the natural program to desktop? (From mainframe to pc), is it possible?
Define cobol coding sheet?
Explain how are you going to remove duplicates from the file that is being read?
Explain difference between read work file 1 and read work file once? Why we are using work file once?
How to create 1 ddm that fetches 3 adabas files simultaneously?
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?
How to find occurrence of mu and pe fields in a file?
Explain adabas basic concepts. Like inverted list, address converter ,data storage?
Explain the difference between external subroutine and subprogram?