What would be the result on writing a data record to a PF
file using the "WRITE" opcode after the SETON *ON *INLR
statment?
Answers were Sorted based on User's Feedback
Answer / prabhas
All files used remain opened till it executes last 'C' spec
statement
| Is This Answer Correct ? | 9 Yes | 1 No |
Answer / naveen chandra joshi
It will write the record in the database file even after LR
indicator sets on.
Program execution continues till last C specification.
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / syam
Hi Prabhas thanks....Why it is writing? Seton *On *Inlr not
closing the pf file?
| Is This Answer Correct ? | 4 Yes | 2 No |
Answer / raghavendra malwadkar
It will sucessfully write the data record to a PF and only
after executing the last record, LR indicator sets on,
hence even if you specify Seton *LR any where in the
program, the LR indicator is *ON only after executing the
last record.
Hope it suffies you concern.
| Is This Answer Correct ? | 5 Yes | 3 No |
Answer / harshad r suryawaunshi
Write statement will get executed successfully and record
will get added in the file. Program execution continues til
the last line of C specs.
| Is This Answer Correct ? | 3 Yes | 1 No |
Answer / sree
The LR indicator says, the last record in the file has
reached and hence there are no input records to process. But
this will not prevent in writing the record to file.
Please correct me if I am wrong.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / sakshi anand
i think it will not be executed because the files is closed when we use seton lr/or the odp is closed now.
| Is This Answer Correct ? | 0 Yes | 2 No |
Answer / sakthi
all files will be closed with inlr on and we can't perform write operation on a closed file. We will get error.
| Is This Answer Correct ? | 0 Yes | 2 No |
Answer / gsp
The 'Write' statement has to be witten before
the Lr On statement.
Reason: All files are closed and program ends
as soon as Lr is on.
| Is This Answer Correct ? | 5 Yes | 10 No |
IN RLU what are the record level keyword is used?
Let?s consider a variable X of length 20. Move value ?ABC? to it.How to determine how many characters does X have?
Can any one plz explain the concept of INFSR, *PSSR, INFDS AND PSDS, I' confusing about PSDS and *PSSR, Wat is the difference btw them, wat PSDS will do????
can anybody explain significance of *loval setll with example code????
Mr.Sidc sirfor my question{how to convert date format from one format to another i think in CL/400 its CVTDAT,Please tell in RPG/400 sir not in RPGILE} you have answered using MOVE opcode,can you illustrate me with a small example sir very kind of you.
How to update selected fields from pf without using update opcode. How to read all member in Rpg-3,without using any cl command?
1.Load an runtime array of length 99 from the pf and you want to handle all the possible errors?
1. If my rpg program has a date field, What extra care I have to take while compiling that RPG program? 2. If the file is keyed and I have declared the file as well as Key list properly in my program. Still am getting an error message like "Chain/reade operation is not allowed" What may be the case?
1.find most occurrences of a character. for exm: input:aaabbbbdddddyyy output: d 5 times how can i get that?
As400 Command to find the Name of the Program to which a Particular Module is Bound..? Ex: IC210AMR (*MODULE) is bound with Other Modules which Forms Program Object as IC210ABP(*PGM) . As400 Command to find the IC210ABP Using IC210AMR..? Thanks
what is data area and how it is used in rpg program ?
Please help me, I have created window subfile,I have created Footer with same lengh and postion of window SFL. When I call the pgm, first is shows only Footer and then it shows subfile records.This time Footer is not showsing ..plz hel me how can i do it...? Sameple DDS and RPG: A R WIN1 SFL A*%%TS SD 20090130 165346 MUNSHIJ REL-V4R2M0 5769- PW1 A FLD001 1Y 0B 4 3EDTCDE (Z) A ATFILE R O 4 7REFFLD (QWHFDBAS/ATFILE LIB/LIBF- A ILE) A R WINCTL SFLCTL (WIN1) A*%%TS SD 20090202 123459 MUNSHIJ REL-V4R2M0 5769- PW1 A ALTNAME ('y') A SFLSIZ (0004) A SFLPAG (0004) A WINDOW (FOOTER) A ROLLUP (27) A ROLLDOWN (28) A CF12 (12 'Cancel') A 50 SFLDSP A N51 SFLDSPCTL A 51 SFLCLR A 1 2'Select Option,Press enter' A 2 3'1= Select' A R FOOTER A* A WINDOW(8 31 9 43) A 8 4'F12 = Cancel' A R DUMMY ASSUME A 24 10' ' in RPG: Dow *IN12 = *Off Write Footer Fxfmt WInCTL