How to declare the dynamic(run time) array in rpgle?
can you please give example
Answers were Sorted based on User's Feedback
Answer / royal
Dmonth S 5s 0 DIM(5)
DI S 2p 0 inz(1)
c dow i <= 10
c* eval month(i) = i
c month(i) dsply
c eval i = i + 1
c enddo
/FREE
*INLR = *ON ;
/END-FREE
this answer is not correct please give me correct code
| Is This Answer Correct ? | 3 Yes | 2 No |
Answer / karthik
Dary1 s dim(5)
Dn s 2p 0 inz(1)
c dow(n<=10)
c ary1(n) dsply
c eval n=n+1
c enddo
c seton lr
| Is This Answer Correct ? | 3 Yes | 5 No |
in which journalling which attributes are necessary??/
i want code and what are used key words are ...like wrkmbrpdm screen (q) i have a file with 3 fields empno,empname,empaddr... here you give the empno it displays from that number to remaining empno's how? sub file screen: employee details pos to:empno then enter empno empname empaddr so file have 100 records from 1 to 100 so the above pos you give the 55 empno...it displays the from 55 to remaining... ...... please share this answel
Hi friends, Can you give the solution for the below mention simple code.and explain.what is output D CHR1 S 4A INZ('PEN') D CHR2 S 10A INZ('MYGET') D CHR3 S 8A INZ('GOOD') D CHR4 S 22A INZ C MOVEL CHR1 CHR4 C MOVE CHR2 CHR4 C EVAL CHR4=CHR3 C MOVE CHR1 CHR4
when will come session device error?
What is the OPEN and CLOSE accesspath?
RPG/400 faqs?
how do I declare a table or array in rpg iv?
How can we search particular records from the database file in RPG. For example, there are 100 records in the file.i need to retrieve all the records matching/equal to the particular 'NAME' field. How can we do the above using SEARCH criteria other than using the IF cond?
ESCAPE message sent by child program can be handled by parent program using which keyword?
are there any useful c runtime apis that I can call from rpg iv?
if there is a module object , how to find the program object for this module object.Assume the module object name and program object name is not same.
how to display all the members records in a physical file without using ovrdbf?