In a program, there are 2 sections defined say SECTION-A
and SECTION-B. There is a paragraph say CALC-INT in both
the sections. If this para has to be called directly for
SECTION-A, then PERFORM CALC-INT will not work as it is
present in both sections. How the PERFORM statement has to
be coded here?
Answer Posted / bv
It cannot be called directly . Control should go to
section A and start of that section A, perform CALC-INT.
Perform SECTION-A.
SECTION-A
Perform CALC-INT.
| Is This Answer Correct ? | 1 Yes | 0 No |
Post New Answer View All Answers
if we have " ibm mainframe ",in that how to remove first and last leading space eg:"ibm mainframe" like that the answer we need
What is cobol?
For rewrite, why is it mandatory that file needs to be opened?
Which is the default, TEST BEFORE or TEST AFTER for a PERFORM statement?
what are decleratives in cobol?
How do u write test cases?
IF I mention stop run in CICS what happens?
i want to learn mainframe..any websites and material to learn from basic..? my mail id : rajeswaribe2010@gmail.com
If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly
what is search and searchall?what is the diffrence between them?give an best example?
if we display var1 then what will b displayed in below condition. 77 var1 pic s9(2) value -10. 77 var1 pic s9(2) value -11. " " " -12. " " " -13. -14 ... ... -19.
Can a Search can be done on a table with or without Index?
Our issue is there seems to be a disconnect, or no link, between our SELECT statement and our SD. We had SELECT SORT-FILE and SELECT SORT-FILE ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1 SORTWRK2 SORTWRK3 SORTWRK4. with SD SORT_FILE RECORD CONTAINS 7833 CHARACTERS. In either case, at run time, the system ignored our SORTWRK# DD statements and allocated 16 sort works with the SORTWK## naming convention. Any ideas why the system does not recognize the connection? We do not even need the SORTWRK DD statements. Thanks
Name the divisions, which are available in a cobol program?
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?