Answer / manu

use the command FNDSTRPDM..

Answer / mahesh

with wrkmbrpdm select source library and source file. type
option 25 against all pgms.(use F13 to repeat to all pgms
<Press Enter> enter file name to be search . This will
displa program by program

Answer / manjunath

As of my knowledge, DSPPGMREF and FNDSTRPDM are the 2
commands which will fulfill the requirement but both the
commands have some flaws respective to the requirement.

If we use DSPPGMREF, the files which are opened, updated
and deleted through the SQL statements will not be listed.

If source is not available in the source file, then
FNDSTRPDM will not list those programs which are using the
required files.

So, to reduce the impact, we need to use both the commands.

Let me know if i am wrong

Answer / durgesh mishra

dsppgref......command

I know whole thing ab't Arrays related to declaration..can anyone tell me what exactly use of array or anyone faced a situation where he found use of array must....

1 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  

---

can anyone say,what is the use of operation extended H/N/P?

2 Answers  

---

i want to retrieve record b/w 2 dates in as400

2 Answers   L&T,

---

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

0 Answers   IBM,

---

Errors in Sql query will be in which state?

1 Answers  

---

ESCAPE message sent by child program can be handled by parent program using which keyword?

2 Answers  

---

i have 6 char field in program, but this field is using in all files i want to chage field size as 10 char , how can i do this except using *like defn...?

1 Answers   IBM,

---

Assume 2 users are using the same file and first user updates some record in the file. Will the 2nd user will be able to see the updated record or not?

0 Answers  

---

Why we cannot call a service program? If I add a PEP can i call the service program?

1 Answers   DELL,

---

Mr.Sidc sirfor my question{how to convert date format from one format to another i think in CL/400 its CVTDAT,Please tell in RPG/400 sir not in RPGILE} you have answered using MOVE opcode,can you illustrate me with a small example sir very kind of you.

1 Answers   CTS, IBM, iGate,

---

One of the job in subsystem is in Running status,expected time to complete this job is 2 minutes. But from last 5 -10 minutes this job is still in running status....What are the possible reasons...and What are the actions i need to perform to check this...?

4 Answers  

---