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..?
Answers were Sorted based on User's Feedback
Answer / ravi
You can do this by using commit and restart logic.
Commit all the records and whenever commit is greater then
zero set the restart process to true.
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / chakri
Hi Ram question is on tables so we have to use Restart-Logic
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / ram.g
y u guys going for complex logic for simple problem....
just open ur file in extend mode, dats the answer for your
qn..even if u wanna start from the particular row whr abend
happens..use the cursor with hold option
Regards,
Ram.G
| Is This Answer Correct ? | 1 Yes | 2 No |
How to remove the spaces at the end of each record in the output file of variable length, via cobol program?
Where the Plan is located in CICS-DB2
) How do u handle errors in BMS macro
How to read a 100 record from a file through cobol?
I have sequential file recl 1000 i want to add another 15 bytes to it. The record length should not change..How?
consider two data items 77 W-A PIC 9(3)V99 VALUE 23.75 77 W-B PIC ZZ9V99 VLAUE 123.45 after the statement MOVE W-A TO W-B what will be W-B's value? a.123.75 b.b23.75 (where b indicates space) c.023.75 d.invalid move
wirte a pgm in using files in which we hav 10 ,20,30 40...100 records in inputfile and i want them to be send to outputfile in reverse order. PLZ HELP ME OUT .........THIS IS A RECENT QUESTION IN IGATE..
Suppose i have a Cobol field of 10 byte. it contains a decimal sign.How to know where is the point location?
How to resolve the soc4 and soc7 errors?
How to display the index.(displacement from an array)
if someone is using my file,how can i find which user id is using?
Determine the total no of bytes in the following. 01 rec1. 02 a pic x(6) 02 b redefines a. 03 c occus 6 times pic 9. 02 d occurs 6 times pic 9. 03 e pic x(5) 03 f pic 999.