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.

Answer Posted / 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



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

how you will find an error which is not in the first page of the subfile without using rolldown key?

566


what does opcode post do ?

1107


is it possible, in the same cgi, to run more than one gethtml or gethtmlifs?

600


what are the three line types in rlu ?

1490


how will you display a particular page in subfile ?

1060






Hello, I have created a CMD type object. In one of the fields in Display file , I would like to see All the Source files present by pass the name of Library. Tried using CHoice(Keyword) and Choicepgm on PARM , but doesn't seems to be working. Any help please..

1793


what is the disadvantage of using global variable?

692


define subsystem?

1042


what is the maximum number of parameters allowed in rpg?

1047


how can I automatically refresh a web page?

640


http default port 80 is used by some other production http service. How can I create an http instance on another port to run cgidev2 and my future cgi developments?

599


can we use ASCII ,CDUP,SENDPASV commands in SFTP?

3154


What is the use of jdftval in as400?

920


What is file access opcodes?

765


how can I give more performance to some selected pages?

621