how to move cursor to a particular field when position is
not known?
Answers were Sorted based on User's Feedback
Answer / 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 |
Answer / satya
You may use #MARK and pass value POS(field-name) to it.
Like below,
#MARK := POS(field-name)
POS(field-name) will give you current position of this
variable on the map
| Is This Answer Correct ? | 4 Yes | 1 No |
syntax for all WRITE COMMAND in natural language
how many work file we can code in jcl?
What is the difference between READ BY ISN and FIND
What is the difference between External subroutine and subprogram?
Explain how are you going to remove duplicates from the file that is being read?
What is Natural?
why do we use file-aid for seqential files?
Define cobol coding sheet?
Explain adabas basic concepts. Like inverted list, address converter ,data storage?
Explain how many work file we can code in jcl?
Explain difference between read(1) and read work file once?
What is a hyperdescriptor?