Answer Posted / guru

Reading all the members in a pf cannot be achieved in a
single override command and which is cumbersome too. So
rather using override, you can use EXTMBR('*ALL') in the
file specification in your rpgle program. So when you read a
file, it will automatically read all the members records
from your data base file. This is FYI

Regards
Guru

What is difference between bind by copy and bind by reference?

2393

---

Hi Viewers can any body explain me how to update and ahange the already existed data in physical file using subfile ? please explain me with the code if possible?

5056

---

What is ment by record level identifier?

1084

---

what is data area and how it is used in rpg program ?

1260

---

are there any useful c runtime apis that I can call from rpg iv?

1111

---

during execution, an rpg/400 program automatically follows a sequence of operations for each record that is processed. The built-in program cycle includes the following logical steps.

1145

---

Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On

2463

---

Program to read marks of 10 students for 4 subjects and compute and display total marks and status of each student in rpg

1093

---

can you debug ile rpg program using isdb?

1183

---

what is the use of sflnxtchg?

1204

---

How Chain operation copies the record's data to the input buffer for the program?

1534

---

Explain mdt?

1065

---

What is the purpose of record level identifier?

1076

---

give an eg of ACQ-(ACQUIRE),BIT OFF,BIT ON,DEALLOC,DUMP,FEOD,FORCE,MHHZO,MHLZO,MHLLZO,MLHZO,REL,RESET,TESTZ,TESTB,TESTN----GIVE SMALL EXAMPLE TO THE OPCODES...TO UNDERSTAND FUNCTIONING...........

3766

---

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

2288

---