| Other COBOL Interview Questions |
| |
| Question | Asked @ | Answers |
| |
| I have PS flat file with 14 records. I want to read from
4th to 9th record and want to write those 6 records (4th
record to 9th record) to another PS file (output file).
there is no key defined in the input file. I just want read
a certain Consecutive records. can any one please give me
the procedure division Coding for this. I have coded the
below coding but the READ-PARA is performing only 1 time
even though I have 14 records in my input file (i.e FILE-1):
PROCEDURE DIVISION.
A000-SECTION.
MOVE 0 TO I.
OPEN INPUT FILE-1.
IF CHECK-KEY1 > 0
DISPLAY "OPEN ERROR FOR FILE-1, CODE IS:" CHECK-KEY1
END-IF.
OPEN EXTEND NEWFILE-1
IF CHECK-KEY3 > 0
DISPLAY "OPEN ERROR FOR NEWFILE-1 COD IS" CHECK-KEY3
END-IF.
PERFORM READ-PARA THRU EXIT-PARA UNTIL EOF-REC = 'YES'.
DISPLAY " FINALLY OUT OF LOOP"
CLOSE FILE-1
CLOSE NEWFILE-1
STOP RUN.
READ-PARA.
ADD 1 TO I
READ FILE-1
AT END MOVE 'YES' TO EOF-REC
IF I > 3 AND < 10
PERFORM WRITE-PARA
ELSE
DISPLAY "NOT IN RANGE"
END-IF.
EXIT-PARA.
EXIT.
WRITE-PARA.
WRITE NEW-REC FROM FILE1-REC.
| IBM | 5 |
| What are the differences between OS VS COBOL and VS COBOL
II? | IBM | 1 |
| in how many mode we can open a file ? | | 3 |
| What is the Linkage section? What is the Use and Why the
parm length use alway "PARM-LENGTH PIC S9(4) or PIC S9
(4) COMP." any reason?.Please let me know any one...
Cheers,Prasad | Syntel | 3 |
| Have you code any new programs in COBOL ? What is the
functionality of the programs? | Xansa | 2 |
| Can anyone please give the example of Inline Perform. | TCS | 4 |
| What is Alternate Index ? How is it different from regular
index ? | | 2 |
| What is the difference between comp and comp-3 usage?
Explain other COBOL usage?s. | | 1 |
| How can you pass values from COBOL program to non-COBOL
programs? | | 2 |
| Why occurs can not be used in 01 level ? | TCS | 2 |
| which generation language is cobol | Kanbay | 3 |
| SSRange is used to do a range check on which of the
Following.
SUBSCRIPT,INDEX,REFERENCE MODIFICATION,Run-time option. | Lehman-Brothers | 2 |
| Minimum how many Number of Paragraphs are there in ID-
Divison? | IBM | 6 |
| When is a scope terminator mandatory? | | 2 |
| What is the significance of 'above the line' and 'below the
line'? | | 1 |
| How is sign stored in a comp-3 field? | | 4 |
| The following entries appear in the WORKING-STORAGE SECTION:
01 DATE-TODAY.
05 YY PIC XX VALUE "90".
05 MM PIC XX VALUE "12".
05 DD PIC XX VALUE :31".
01 DATE-EDIT PIC XX/XX/XX.
MOVE DATE-TODAY TO DATE-EDIT.
(a) 901231
(b) 90/12/31
(c) 31/12/90
(d) 311290
| TCS | 3 |
| HELLO FRIENDS,
THIS IS JANARDHAN.GADIRAJU, I FACED ONE INTERESTING
QUESTION IN COBOL, THAT IS WHAT ARE THE VALUES WE CAN SEE
IN HIGHVALUES AND LOWVALUES, CAN U PLEASE GIVE ME THE ANSWER | Patni | 5 |
| What should be the sorting order for SEARCH ALL? | | 3 |
| Can the OCCURS clause be at the 01 level? | | 6 |
| |
| For more COBOL Interview Questions Click Here |
Site Map