Interested to Buy Any Domain ? << Click Here >> for more details...
what is overlay? how can we pass parameters in cl or rpg
programing? how can we get data area value in cl or rpg
programming?
- 2 Answers
- 14760 Views
- IBM, Patni, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / radha sammangi
1)
overlay : This is keyword which is used for overlays the storage of one subfield with another subfield in a data structure.
Ex:
D Datastructure DS
D Fullname 15a
D Firstname 6a OVERLAY(Fullname)
D Middlename 5a OVERLAY(Fullname:7)
D Lastname 4a OVERLAY(Fullname:12)
Even we can use OVERLAY(Fullname :*NEXT) instead of positions.
2) CALL PGM(program name) PARM(A B C....) in CL
CALL 'Pgmname' Plist /*In RPG
Plist KLIST
PARM A
PARM B
PARM C
3)
RTVDTAARA in CL
RTVDTAARA DTAARA(DA1) RTNVAR(&Var)
We can use IN and OUT operations for reading and writing data area in RPG programs.
| Is This Answer Correct ? | 15 Yes | 2 No |
What are the types of identifiers?
Hi, Can any body tell me ur experience on this questions? Questions: 1.what is the use of SFLRCDNBR other than subfile page display? 2.Which of the following operation cannot be used in conjuction with a file coded as device type disk?
two types of read performed in dataqueue?????
Some times While checking MSGW for object / member / record locks ,I have seen it's locked by itself ...? How it happen and what action we need to perform if job is updating / writing a record....?
I need to generate outfile for object of all the user lib. in the sysmte using cmd DSPOBJD. But this cmd is correcpted in my server,Any body tell me is there any alternative...?
i hav 2 logical files(L1,L2) both r derived from one physical file(P1). how can i use both the logical files in one RPG program? if yes what i have to d.
When it is desirable to describe files Internally?
I have a file .In that file i have 3 fields. Those fields are eno, ename, esal.Keyfield is eno. In that file i have data like this for eno 1,2,3,4,5. Now i need to display 2nd record. That means i need to set the pointer on 2nd record... Then, write the complete rpg program using setll.
how can we can we the data decimal error?how can we open such file in support
1.WHAT IS WRONG WITH THE CODE BELOW? C CUSTNO CHAIN CUSTMAST IF %ERROR can any body find the wrong please? 2.What builtin function will you use to achieve the following functionality? C QTY IFLT *ZERO C QTY MULT-1 QTY ENDIF
1) How to define keyed file in CL pgm. 2) How can i read particular records in CL pgm from database file.
Please tell me how to read the records from a file with load an array of size with error conditions(The logic answer for this question is ARR is array of 99 elements Z-ADD 0 IDX *LOVAL SETLL FILE READ FILE 99 *IN99 DOWEQ *OFF IDX ANDLT 99 ADD 1 IDX MOVE FIELD ARR,IDX READ FILE 99 ENDDO).So,Please give me the complete of this code.
RPG400 
