Answer Posted / guest

The system return the control from called program to the
calling program when RETURN encounter.Suppose LR is also ON
after the RETURN executed,all resources will be release.
For example,
A program pgm1 call the another pgm2 within a loop,
/free
num=0;
dow not %error;
callp(e) pgm2();
enddo;
/End-free
The pgm2 where the return is executed before LR turned ON
/free
num=num+1;
return;
/End-free
we can see the value of num will be increase all the time
when pgm1 will call the pgm2.
and opposite case:
/free
num=num+1;
*inlr=*on;
return;
/end-free
value of num will be start from zero.

what is file information data structure?

2191

---

what is program status data structure?

2404

---

do you use message subfiles? What are the necessary keywords required coding a message subfile?

1130

---

how do I declare a minor?

1156

---

1. If there are two programs using same file and 2 users are using the file at the same time and what can be done to allow them both to access? 2. How can remove lock from the file for accessing it by both users?

950

---

what is the rpg system?

1270

---

What is the diff bw PF/LF Name and their Record format name? what is restriction in record format then file name?

2997

---

how do I declare a table or array in rpg iv?

1174

---

How to define data area in RPG program? In which scenario multi occurrence DS is use in AS400?

2009

---

what do you mean by an input subfile, what are the keywords required?

1257

---

What is the difference between iter and do?

1204

---

What is ment by record level identifier?

1137

---

write an RPG program to calculate the marks of 5 students (A,B, C, D, E)in 3 different subjects (eng, math, sci) an display on the screen

1303

---

How to declare the pull button in AS/400..

2325

---

what is the difference between do while and do until?

1242

---