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 why do we use file-aid for seqential files?
Can you explain control variable in online screens?
Explain how to receive data passed through jcl parm parameter in a natural program? How data definition is defined in the program?
Explain what happens when you issue a escape routine in a program? Will there be any compilation /run time erro?
Explain control variable in online screens?
Define cobol coding sheet?
Explain is it possible to code goto statement in natural? If yes please provide the syntax of the same?
Explain the data storage?
What is the quality process in development?
What happens when you issue a escape routine in a program? Will there be any compilation /run time erro?
Suppose you are processing an input file in a natural program and you want the program to fail if the file is empty. What command you use in natural to force it to fail?
Explain how to ftp the natural program to desktop? (From mainframe to pc), is it possible?
How to receive data passed through jcl parm parameter in a natural program?
Explain how many work file we can code in jcl?
Tell me what type of files we can process thru file-aid?