Interested to Buy Any Domain ? << Click Here >> for more details...
wht happens if we dnt give scope terminator ?
- 4 Answers
- 8424 Views
- TCS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / rahul
For better readablity, we use scope terminators in the
program.
scope terminator closes are not the executable statements.
Nothing will happen to the program by not using these
terminators.
| Is This Answer Correct ? | 7 Yes | 1 No |
Answer / renga
For Inline Perform and End-evaluate scope terminator is
mandatory. So it will result in compilation err. For others
the program logic will got impacted.
| Is This Answer Correct ? | 3 Yes | 2 No |
Answer / prachi
exapamples of scope terminators are end-if for if statement
end-evaluate for evaluate function. So if we dont give end-
if when we are using if statement ...it willl throw
compilation error..So scope terminator is needed to end the
loop..if we dont give scope terminator it will throw
compilation error...
| Is This Answer Correct ? | 3 Yes | 5 No |
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.
What is the different between index and subscript?
What are the different types of condition in cobol and write their forms.
What are the cobol coding sheets?
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)
What is the problem of ordered sequential files access?
what is the difference between COBOL2 AND COBOL390?
why mainframe we use not like java as frontend oracle as backend. or not word excel.In there also huge ammount data stored.
if i am reading a file with some 50000 records and moving to a DB2 table and suddenly the program abends in between, is there anyway i could restart from the exact record at which the job failed once the program restarts.
What are different file OPEN modes available in COBOL?
how to change picture class of copy book variable inside program?
how we can reverse the string in the cobol for example satheesh can be reveresed as hseehtas
COBOL 
