I have a PF(ABC)with no key fields. PF(ABC)have 2 fields (cusno and cusname).

I have a PF(ABC)with no key fields.
PF(ABC)have 2 fields (cusno and cusname).
Please let me know how can i read the cusno = 1150 directly
from PF in CL and RPG program(Without creating the LF and
without reading the complete file and then compare 1150)

Question Posted / guest

3 Answers
13579 Views
Opus, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

I have a PF(ABC)with no key fields. PF(ABC)have 2 fields (cusno and cusname). Please let me know ..

Answer / vijay

In CL PGM

do CPYF from file ABC to ABC qtemp with the selection
field (CUSTNO) = 1150 (value) so ABC in qtemp have only one
record with that cust no. then read this file in CL program.

In RPGLE...

you can used SQLRPGLE program and write a SQL select
statement on the on file ABC.

Is This Answer Correct ?

13 Yes

1 No

I have a PF(ABC)with no key fields. PF(ABC)have 2 fields (cusno and cusname). Please let me know ..

Answer / mayank taneja

In CL program:
Ovrdbf and opnqryf

In RPG Program:
SQLRPGLE

Is This Answer Correct ?

11 Yes

0 No

I have a PF(ABC)with no key fields. PF(ABC)have 2 fields (cusno and cusname). Please let me know ..

Answer / manan---as400 so cute

CL
This can be done by two ways :- a)ovrdbf b) opnqry

RPG

This can be done by SETLL + READE or READ and the second
requirement by COMP

Cheers

Is This Answer Correct ?

6 Yes

13 No

Post New Answer

More RPG400 Interview Questions

1. What is bound-by-call and bound-by-reference? 2. Where and why is *Nomain used? 3. What are the difficulties faced by programmers when using service programs? 4. Explain the different ways of parsing and compiling XML in iSeries.

2 Answers

I have a RPG program of 100 Lines and first line is to SETON indicator LR. Will the program execute rest of the 99 Lines?

6 Answers

is this a rpg channel?

0 Answers IBM,

parameters cannot be passed in which one???

4 Answers CTS,

what procedure should we use to find whether the following operations are successful or not setll setgt chain read reade readp pls tell with example i'm not lazy to read the manual or not lazy to do anything.but sometimes i cannot understand the things given in manual in high level english its little bit complicated for me,i can't understand their way of writing thats why i ask these questions here and find the solution in simple words that i can understand thats the real reason sir.sorry if i had hurt you or disturbed you.please understand my situation.

5 Answers iGate,

HI,1: What is the function of 'SETON LR' AND '*INLR=*ON ? 2:Can we used "seton lr" OR "*INLR = *ON" in between the program code ? 3:if yes then according to there function the code which is written acter seton lr/ *inlr should not be execute . Can any one tell me why those code get executed ?

2 Answers

Suppose i am having 3 programs PgmA,pgmB,pgmC and using source debugger. At debugging time i found that pgmC having some code error..then in debug mode directly how can i debug pgmC

2 Answers

suppose we have 10 members in physical file and i have to use 4 out of 10 so how can we read this in RPG

3 Answers TCS,

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

2 Answers

how to change the length of the field in a physicalfile?

12 Answers

How do you find whether a record is locked or not?

2 Answers

1) How to define keyed file in CL pgm. 2) How can i read particular records in CL pgm from database file.

2 Answers

For more RPG400 Interview Questions Click Here