Answer Posted / bharatiya

I was trying it last night and wrote the below code that works for this scenario, please have a look----

DArr1 S 1 DIM(10)
DArr2 S 1 DIM(10)
DCnt S 2 0
Dn1 S 2 0 Inz(1)
Dn2 S 2 0 Inz(1)
DFld1 S 15 Inz('aaabbbbdddddyyy')
C
C Do 15
C EVAL Arr1(n1) = %subst(FLD1:n1:1)

C If Arr1(n1) = 'd'
C Eval Arr2(n2) = Arr1(n1)

C Eval n2 = n2 +1
C Endif
C Eval n1 = n1+1
C Enddo
C Eval cnt = n2 - 1

can I touch the array during treatments?

1219

---

How to define data area in RPG program? In which scenario multi occurrence DS is use in AS400?

2062

---

write an RPG program to calculate the marks of 5 students (A,B, C, D, E)in 3 different subjects (eng, math, sci) an display on the screen

1357

---

Explain mdt?

1204

---

What is the difference between iter and do?

1269

---

How to call one program from another program in RPG? please help me with the code

1792

---

1. What is bound-by-call and bound-by-reference? 2. Where and why is *Nomain used? 3. What are the difficulties faced by programmers when using service programs? 4. Explain the different ways of parsing and compiling XML in iSeries.

6627

---

what do you mean by an input subfile, what are the keywords required?

1308

---

what happens when sflsiz = sflpag? What are the advantages and disadvantages?

1243

---

How to handle duplicate error handling in RPG?

2354

---

what was the robotech rpg?

1269

---

which program rpg or cl is efficent to update a transaction onto a database file and why ?

1293

---

can anybody help me to solve this problem. the program that i m checking display error message saying "Record format for file AJDSPFFD does not match model file and decimal error. how to solve this problem. The AJDSPFFD is snapshot the AJTLOG that is the audit trail list.

2845

---

How do u design a physical file, when you have 2 Unique fields like for eg in A student file student ID and student examination no both are unique

1060

---

What is ment by record level identifier?

1189

---