How I can read and display three fields in the record
format DSPFM1 of the display file,while
one field(using in one file) is NAME which is Key field in
field reference file and another two fields are AGE and ROLL
NO are using another file.

Please send me coding part.

Answers were Sorted based on User's Feedback



How I can read and display three fields in the record format DSPFM1 of the display file,while on..

Answer / syam

Changes in above code.

FFILE1 IF E K DISK USROPN ->Reading pf1
FFILE2 IF E K DISK USROPN ->Reading pf2
FDSPF CF E WORKSTN USROPN ->dspy file

C OPEN FILE1
C OPEN FILE2
C OPEN DSPF
C NAME SETLL FILE1
C READ recd1 51
C *IN51 DOWEQ *OFF
C NAME CHAIN recd2 41
C N41 WRITE DSPFM1
C READ FILE1 51
C ENDDO
C CLOSE FILE1
C CLOSE FILE2
C CLOSE DSPF
C RETURN


1.File1 & File2 need NAME key field
2.In dsplay DSPFM1 need Name, Age and Roll filed.
Recd1 = record format of File1 , Recd2 = record format of
file2

Is This Answer Correct ?    3 Yes 1 No

How I can read and display three fields in the record format DSPFM1 of the display file,while on..

Answer / syam

I am Pasting Code.
FFILE1 IF E K DISK USROPN ->Reading pf
FDSPF CF E WORKSTN USROPN ->dspy file

C OPEN FILE1
C OPEN DSPF
C SETLL FILE1
C READ FILE1 51
C *IN51 DOWEQ *OFF
C WRITE DSPFM1
C READ FILE1 51
C ENDDO
C CLOSE FILE1
C CLOSE DSPF
C RETURN

it will show all the records from file undil file ends.
if you need ILE RPG Free fromat code pls post again your
request

Is This Answer Correct ?    1 Yes 0 No

Post New Answer

More IBM AS400 AllOther Interview Questions

What is binder language ?

0 Answers  


how can a cgi check whether an ifs object is available?

0 Answers   IBM,


an access path may be in which sequence?

0 Answers   IBM,


Logic cycle

1 Answers  


how do you use commitment control in rpg program ?

1 Answers   IBM,


what is clile code get last digit in numarice value

2 Answers   CFC,


what does defn do?

0 Answers   IBM,


What is an authorization list?

1 Answers  


which are the relational operators in rpg?

0 Answers   IBM,


What is Group Job?

1 Answers  


what is the maximum number of files allowed in rpg?

1 Answers   IBM,


Write a logic program for knowing the repeated number of a vowels in a given program?

0 Answers   Valtech,


Categories