Answer / avinash

suppose we have to update 1000 of recrds in my cobol db2
program and my program is running fine and it has updated
999 records but the job gets abended in this scenario my
work is not commited or completed so again i have to submit
a job and again it starts updating from record 1.

so to avoid such scenario commit and rollback is used.
so if we set commit point at every 200 records then it will
update the records in 200*5=1000
so if job abends on 999 records then it rooback to the
records from 800 to 1000.
so cpu time will be less.

Answer / garry

With commit/rollback we can ensure data consistency.

Consider a scearion where commit/rollback is not used.
Suppose your program writes/updates 10 files. In case the
program fails in between (say after updating 5 files),
there will be data in 5 files and corresponding data will
not be available in 5 files.

If we introduce commit/rollback in above program. In case
of program failure changes made to 5 files can be rolled
back so that we don't have inconsistency between files.

with Commit/rollback we can ensure either all files are
updated or not file is updated.

What will be the value of STRING after line 0106 is executed in the code below? 0101 E* Fromfiletofile..tabnameprnentlenpdatabnamlenpda 0102 E ARR 8 1 0103 ISTRING DS 0104 I 1 8 ARR 0105 C MOVE *BLANK STRING 0106 C MOVEA'ABC' ARR A) 'AAAAAAAA' B) 'BBBBBBBB' C) 'CCCCCCCC' D) 'ABC ' E) ' ABC'

2 Answers  

---

what is batch debug in as400?

3 Answers  

---

If the last record of a file has been read, and the next operation on that file is a READ operation, what will be the values of the input fields for that file? A. They will be blank and/or zero. B. They will be null. C. They will equal the values of the first record in the file. D. They will equal the values of the last record read.

3 Answers  

---

How can we call CL program to RPG? How many number of parameter we can pass

2 Answers   TCS,

---

1) How to retrieve RRN through RPG ? 2) How to pass parameter by value ? 3) How to trap the error through the RPG/400

10 Answers   IBM, Tech Mahindra,

---

in which journalling which attributes are necessary

2 Answers   CTS,

---

this is rpg3 code W0RTN IFEQ @CN,002 what is the means @CN,002

1 Answers  

---

I have a file .In that file i have 3 fields. Those fields are eno, ename, esal.Keyfield is eno. In that file i have data like this for eno 1,2,3,4,5. Now i need to display 2nd record. That means i need to set the pointer on 2nd record... Then, write the complete rpg program using setll.

1 Answers  

---

two attributes which govern the excecution of a job>>>>??

2 Answers   CTS,

---

i)What is the command to lock a file in a program ii)2. Can you get a level check error in a CL program

6 Answers  

---

How do I link an existing logical file to it's Physical File without recompiling?

2 Answers  

---

3 members in databasefile .how to read records from all the members??

6 Answers   CTS,

---