Interested to Buy Any Domain ? << Click Here >> for more details...
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.
- 2 Answers
- 7434 Views
- IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
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 |
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 |
Feedback about ELI Faridabad.
Q. 1.What would be structure of CL PGM. 2. What are the levels of CL PGM. 3.How many files can be defined in new CLLE program?
Why we have multiple data types in As400 and why we use numeric, packed, decimal, zoned the basic difference between this?
what would be the effect on the field where reverse image, underline and highlight display attributes were active?
Hi All, Can any one give me a suggestion for below prob One job is in MSGW due to decimal dara error and I find out stmt error and Value in DMUP. but my file has millions of records.So how can i find out on which record the error was occured....?
Pose, there are 100 records in the file.i need to retrieve all the records matching/equal to the particular name field. How can we do the above using search criteria other than using the if cond?
what is the difference between clear and reset opcodes and open and close opcodes?please tell me in real time senario with example please? And What is the use of SFLNXTCHG?Where we can use this?
1) Suppose we call a pgm from CL, how come AS400 system knows whether the called pgm is to be interactive one or batch one? 2)How many members can exist in a PF?
How can we change the uppercase to Lowercase in RPG?
Hi, can you plz tell me ...syntax for GET command in FTP & SFTP is same or different???
1.what are the builtin funtions in cl pgg?Explain with example 2.what is meant by left outer join?where we can use this?
an access path may be in which sequence?
RPG400 
