Answer Posted / vivek

TRY THIS CODE...
F1 Opcode F2 Result
Z-ADD *DATE A 8
A DSPLY
A retrieve current sysdate then 'subst' and increase day or month or year as per your requirement.
@Viv

What Is The Object Type Of Pf, Lf, Printer File & Display File?

1119

---

Service Program : S1 Modules in S1 : M1 M1 having two procedures : ADD, SUB Current Binder Language STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP Doubt: I need to add one new Module to the Service Program M2 having one procedure ‘MULT’ How to add this new module to the service program S1 ? If I need to recreate the service program again, Do I need to mention the Module M1 again while recreating along with new Module M2? There is no Binding Directory. Binder language structure will be like this STRPGMEXP PGMLVL(*CURRENT) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") EXPORT SYMBOL("MULT") ENDPGMEXP STRPGMEXP PGMLVL(*PREVIOUS) EXPORT SYMBOL("ADD") EXPORT SYMBOL("SUB") ENDPGMEXP

2349

---

when would you use or not use this approach?

1484

---

define subsystem?

1576

---

what is the maximum number of fields under a record format of physical file?

1771

---

How to debug a batch job when it is in messagewait(mswg) status. I know the steps for batch ebugging, but im confusing with when we submit any job for batch debug we put in held state. So here also do same thing or any other way?

1219

---

which of the cl command can be used to determine which logical files are dependent on a specific file?

1051

---

how many maximum spaces could be given in o specs?

1047

---

How to reverse a string using RPG?

1417

---

the maximum number of subfiles that can defined in a rpg program for one display file is ___ .

3221

---

difference between sflrcdnbr and sflnxtchg?

1135

---

how can a message from a message file appear as a constant on the screen?

1514

---

what is message subfile?

1686

---

what is the syntax for plist?

1084

---

a multiple format logical file is also known as?

1022

---