Answer / abhishek bajpai

Primary File is the one which uses the RPG logic cycle. It
is defined in the F spec as:
FABPF1 IP E Disk
Here, ABPF1 is primary file.
For a primary file we cannot use any operations like Read,
Reade, Chain etc. It automatically reads from the 1st to
the last record and executes the program from the 1st to
the last line. A program can have only 1 primary file
defined.
Secondary file is exactly like the primary file in
functioning except that the program starts processing the
secondary file only when the EOF is found for primary file.
A program can have multiple secondary files defined in it.

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?

0 Answers  

---

Can we used ovrdbf command after the opnqry file if yes then What will be out put of your program?

4 Answers   IBM,

---

How to add 2 new fields in a file? How many ways are there in as400?

2 Answers  

---

1.How you will find the program is batch or online in cl pgm? 2.How you will end the batch pgm when the job runs? write an logic? 3.In wich command the option *drop is used?

2 Answers   TCS,

---

What is the purpose of Panel Groups?

4 Answers  

---

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,

---

wat is the difference between dataarea and data queue?

5 Answers   Airtel, Four soft, Shahi Exports,

---

how do I do concatenation in rpg iv, like I do in cl?

1 Answers   IBM,

---

When it is desirable to describe files Internally?

0 Answers  

---

In RPG program one file using as a PRIMARY file while running program some of the records reading twice any body know why its happening

2 Answers  

---

Write a program to display prime numbers between 1 to 100 using RPGLE.

1 Answers  

---

Hi, Can anybody give me real sinario for SFLRCDNBR?with example?

2 Answers  

---