Interested to Buy Any Domain ? << Click Here >> for more details...
is it possible to declare index in cobol program?
if it is not why its tell me pls
- 3 Answers
- 10466 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / amjith pillai
No need to 'Declare' Index in working Storage section.since
Index is internally represented by 'Index Register' which
is Full-Word binary.
Yes, you can directly mention Index in Occurs clause and
can increment and re-positioning the index variable
| Is This Answer Correct ? | 9 Yes | 0 No |
Answer / kiran
yes it is possible
ex PERFORM TEST AFTER VARYING WS-INDEX FROM
1 BY 1 UNTIL WS-INDEX = 10
DISPLAY "WS-INDEX is now equal to " WS-INDEX
END-PERFORM
| Is This Answer Correct ? | 0 Yes | 6 No |
Explain about Redefines cluse?
after udatingg first 110 rows, my job abends. now how do i change my cobol program so that when i restart the Job it will start updating from 111th row ( i.e in next run I di=ont want to update those 110 rows which are already been updated in the first run before job abend)
How to read the 2nd last record of a VSAM file? (The file size is huge and we don't know the key)
How is sign stored in a COMP field ?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
How to display string in the reverse order using occurs clause?
What is a scope terminator? Give examples.
subscript and index r not coded in u r application program what will happen?
how we separate the cobol cics statements from cobol&cics programming?
I have a source program compiled with Cobol-2. The output file has a record length of 100 defined in the program but a record of 60 bytes getting written into it. i.e. The rest of 40 bytes I am not Writing anything. But it by default puts some values into the last 40 bytes. However it does not impact anything. But when Compiled the module with Enterprise Cobol the last 40 bytes were spaces as fillers. Can anyone explain?
input:- 12233344445555566666... output:- 1=1,2=4,3=9... Here firstno i.e 1 should be displayed and after that the alikeno.s should be added n displayed.i.e 2+2=4 like tat it goeson.
what are decleratives in cobol?
COBOL 
