i want to perform uniqness on db file bt my db file nt
hving key by useing rpgle.
Answers were Sorted based on User's Feedback
Answer / ravi kumar
Create LF for PF and take UNIQUE keyword in file level and take one field as key field(Whenever UNIQUE keyword is used in LF, It will be compiled successfully if your PF doesn't have DUPLLICATE RECORDS orher wise it will not be compiled.)
After creating LF, You have to use LF in RPGLE. Then you can retrieve and insert records through RPGLE.
I have got success in this way...
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / raghav
Try using CL program
1.OVRDBF (Share ODP - *YES)
2.OPNQRYF - Define keyfield
3.Call RPGprogram
4.DLTOVR
| Is This Answer Correct ? | 0 Yes | 1 No |
list down and describe the sub systems vailable
We have a Physical file, after reading 5 records,it has to read LF of that same Physical file,Will it start reading from Ist record or will start reading from 5th record?
how to find whether a date format is valid or not in RPG400 not in RPGILE.Can you please write the coding for this sir,i'm new to AS400.Please help.
How to declare the pull button in AS/400..
i)What is the command to lock a file in a program ii)2. Can you get a level check error in a CL program
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
parameters cannot be passed in which one??
The PGMA calls PGMB.PGMB generates a report.The report should contain the called program name(PGMA).How do i get the called program name in PGMB to print it on the spool file?(calling program name should NOT be hard coded or passed as parameter to called program?
what is EXCEPT command in rpg and use
Write the subfile logic program for the given concept. Load the data to the subfile depends upon the designation where designation is not a key field?
How do you do indexing in a physical file?
1.Are there any errors in the following statement?If so then list them.DTAARA is a data area having a field EMP # and EMPNO is a field in the file EMPPF.Which has one record. READ EMPPF IF %FOUND(EMPPF) IN DTAARA EVAL EMP#=EMPNO OUT DTAARA ENDIF