how to move cursor to a particular field when position is
not known?
- 3 Answers
- 9965 Views
- I also Faced
- E-Mail Answers
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 |
How to receive data passed through jcl parm parameter in a natural program?
What is the difference between READ BY ISN and FIND
What is the difference between read(1) and read work file once?
How to receive data passed through jcl parm parameter in a natural program? How data definition is defined in the program?
How do you pass data from a Natural Program to an External Subroutine? Can it share the LDA of Program as in Internal Subroutine.
Explain how many work file we can code in jcl?
what type of files we use in file-aid
differnce between read work file 1 and read work file once? why we are using work file once?
Can you explain control variable in online screens?
Can we see the copy book length using file-aid?
difference between fetch , call and callnat
A field declared as P8 needs to be redefined as Alphanumeric. What would be its new size?
COBOL 
