what procedure should we use to find whether the following
operations are successful or not
setll
setgt
chain
read
reade
readp
pls tell with example
i'm not lazy to read the manual or not lazy to do
anything.but sometimes i cannot understand the things given
in manual in high level english its little bit complicated
for me,i can't understand their way of writing thats why i
ask these questions here and find the solution in simple
words that i can understand thats the real reason sir.sorry
if i had hurt you or disturbed you.please understand my
situation.
- 5 Answers
- 6552 Views
- iGate, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / ps
Anyways here is small example
ITEM CHAIN ITEMMAST
C IF %FOUND
C ITEM SETLL ITEMARCH
C IF NOT %EQUAL
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / ps
Do you mean to say Build in functions ?
Dude Instead of writing 10 lines explanation try to
understand question first .
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / guest
By using Indicator IN RPG400 , % found build in function
for RPGLE
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sreedhar reddy
C ITEM CHAIN ITEMMAST
C IF %FOUND
C ITEM SETLL ITEMARCH
C IF NOT %EQUAL
Little more for READ*
C Read ItemMast
C If Not %EOF
| Is This Answer Correct ? | 1 Yes | 0 No |
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.
What is the length of Signature?
explain sflclr, sflend, sfldlt, and sflcsrrrn?
what is EXCEPT command in rpg and use
why subproc not run in dftactgrp?????/plz explain
parameters cannot be passed in which one??
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.
what are the array operations?
What would be the effect on the field where reverse image, underline and high intensity?
how do I declare a table or array in rpg iv?
1.Suppose my file has 10 fields and I want to make the 2nd field Zeros in all records. And assume I have millions of records and I dont want to read each record and update the desired field with 0. Any other way to do this in one step operation? 2. Assume my file has 100 records and I want to see only first 10 records. Is this possible through LF? 3.I have 3 jobs A B and C. I want to submit B after successful completion of A and want to submit C after successful completion of B. Without using job scheduler or job queue, how can i do that through CL program? 4.What is difference between Bind by copy and bind by reference?
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."
RPG400 
