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
- 7650 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 |
when are the unique constraints executed?
What is the use of OVRDBF ?
What is the function of DSPATR (display attributes) keyword?
Describe the function of SETGT operation in RPG language?
what are different record spacing keywords in rlu ?
what is qcmdexc?
how will you search an array?
STRTCPFTP command is used to start FTP in CL Language (ILECL)....can u plz tell me which command is used to start SFTP in CL language(ILECL)?
1.what operation cannot be used in conjunction with file coded as divice type disk? 2.Difference between INCLUDE AND COPY?
why is the declare cursor statement is used for?
I am fresher 2009 passedout.can you pls explain me what is AS400 and where it can be used and how about growth in the position as well as salary, whether it is a programming language or else?
What is the difference between a Physical File & a Logical?
28 Answers Accenture, ACS, IBM,
RPG400 
