How will you find the currepted records in a file
Answers were Sorted based on User's Feedback
Answer / helennixa
You would use Display statements before the abend so you know what record was corrupted.
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / prasad
data integritu doen't exist for files, that why database
comes into the picture.
sol: you can use the file aid tool to find the correpted
data(only way)
$$dd01 drop(1,2,nep)
| Is This Answer Correct ? | 1 Yes | 1 No |
Can we use redefine clause in occurs clause?
describe 805 error
what is linkcard in cobol?
I have a occurs for 100 times but it has executed 101 time what could be the reason?
have in 100 records in a flat file i want to move records like 1,3,5,7,9,11,.. to Output file1 and 2,4,6,8,10,12,14 .. records moved to Output file2..Pls Provide real time answer..
wht is packed decimal in cobol
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.
i have the job which has written updated 100 records into the table and for 101th record it got abended and i want to start the job again and should wirte from 101th record not from 1st record..how to do it..?
2)Where the Plan is located in CICS-DB2?
waht is inspect verb? where it can be in real time?
Name the divisions in a COBOL program ?
What is SQL Code -904 and -903 in DB2 And how to handle it?