Interested to Buy Any Domain ? << Click Here >> for more details...
How can we make use of SETLL operation in CL?
- 11 Answers
- 27988 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / syam
Kumar's answer is correct.
OVRDBF FILE(File name) TOFILE(new file name) MBR(*first)
POSITION(*RRN 55)
55 = record number
OR
OVRDBF FILE(File name) TOFILE(new file name) MBR(*first)
POSITION(*KEY 1 RCD1 SYAM)
1 = no of key field
RCD1= Record format name
SYAM = Value
| Is This Answer Correct ? | 9 Yes | 1 No |
Answer / kumar pushpam
PLZ PLZ PLZ PLZ PLZ CAN ANYONE TELL ME THAT AS400 FRESHER WILL EVER GET A JOB
AND IF YES THEN WHEN THAT TIME COMES
MY NAME IS KUMAR PUSHPAM AND I M AN AS400 FRESHER AND HAVE 0(ZERO)
YEAR EXPERIENCE BUT EVEN I WANT TO
MAKE MY CAREER IN THIS FIELD SO PLZ PLZ TELL ME ANYTHING ABOUT THAT IF A COMPANY RECRUITS ANY AS400 FRESHER CANDIDATE
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / syam
Hi Chowdary.....POSDBF command allows the user to set the
position of a database file to either the beginning or end
of an open file(Member), not EQ to SETLL.
POSDBF OPNID(FILEID) POSITION(*START)
Or
POSDBF OPNID(FILEID) POSITION(*END)
| Is This Answer Correct ? | 5 Yes | 1 No |
Answer / s. croy
You can position to the beginning or end, but the functional equivalent to SETLL in CL
OVRDBF FILE(RPTEMAILL2) TOFILE(RPTEMAILL2) +
POSITION(*KEYAE 1 *N &PROGRAM) +
OVRSCOPE(*CALLLVL)
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / syam
Hi Surendra.....How to set pointer in OVRDBF? Please post
full command.....Thanks
| Is This Answer Correct ? | 0 Yes | 1 No |
Answer / chowdary s
By using POSDBF Cmmand through CL PGM, can do
Thanks
CHOWDARY S
| Is This Answer Correct ? | 2 Yes | 4 No |
Answer / surendra y mudliar
By using OVRDBF command you can set the pointer in the file
to whichever record you want.
| Is This Answer Correct ? | 0 Yes | 5 No |
I have one cl program which calls two rpg programs named a & b. I am loading a run time array in Pgm A and the control comes back to cl pgm. i call pgmb and I want to read the runtime array in pgmb which was loaded in pgma. How it can be acheived. I should not use any intermediate file or dataarea to store the loaded values.
When PGMA calls PGMB for the first time PGMB executes the *INZSR. PGMB uses the RETRN operation to return to PGMA. When PGMA call PGMB the second time is the *INZSR executed?
how do you use commitment control in rpg?
How can i keyed a flat file in RPGLE
How to check which are the pgms using 1 perticulate file.? I know there is many tool available for X-reference...but need to know is there any command available in the system...?
RETRIVING DELETED RECORDS :- I'm frequently asked how to retrieve deleted records from an unjournaled physical file when the deleted records have not yet been removed from the file. Utility UNDEL lets you undelete records in a physical file. This public domain program is available in CISC and RISC versions, and the complete source code is available for download at: UNDEL for AS/400 Save File (RISC): http://www.as400network.com/sharewarefiles/undelris.zip UNDEL for AS/400 Save File (CISC): http://www.as400network.com/sharewarefiles/undel.zip UNDEL for AS/400 Save File (Source code): http://www.as400network.com/sharewarefiles/undelsrc.zip The utility takes advantage of the fact that deleted records in physical files are only flagged as deleted, and the record data still exists until it is overwritten or the file is reorganized with a utility such as RGZPFM. UNDEL simply reads the deleted record, then reuses the record by writing over it with the new record (thus eliminating the flag for the deleted record). Some homegrown and commercial utilities copy the file containing undeleted records to a save file, then use a program to read the save file, which contains live and undeleted records, to a file to undelete the records. The UNDEL utility is superior to the SAVF technique because there's no need to copy the file to a save file, which is especially important for really large files. When run, UNDEL displays the physical file records in their unformatted, raw text form. You can either position the display to a given relative record number or use F19 or F20 to find the previous and next deleted record, respectively. The utility also includes online help, which is almost unheard of for free utilities. Other utilities include the ability to undelete records. You can use the RTVDLTRCD command in the old QUSRTOOL (no longer supported by IBM). QUSRTOOL is now a commercial product called TAA Productivity Tools ( http://www.taatool.com ). The free file editor WRKDBF has a built-in undelete capability ( http://www.wrkdbf.com ), and several commercial file editors can undelete records. For a complete list of file editors, go to http://www.sourcebook400.com, select "Programmer Tools" under "Product Category," then select "File Editors."
if i have three programs progA,progB and progC .now i call progB from progA. but the progB does not exist . now i want to call progC instead of starting dump. how can we achieve this.
If record-format name in an externally-described file has already been defined as a file-name.how to solve this?
Suppose we add one field in physical file and this physical file is used by several programs.how do we know which program is using that file? What are the impact analysis.
Can we have a Physical file without any member ? Please let me know
Can you copy the records created by the OPNQRYF to other files and how?
1.I Have a physical file , i want to read the data from the each and every member of the File in the CL Program.How do you achieve this. 2.How do you do the same in RPG?. do think is it possible to read data from all the members in the RPG?
RPG400 
