how can a procedure will be added in to a srvpgm
Answer Posted / nitin
I think most appropriate answer is to add new procedure or module to binder language, make sure that the new one should be added at the end.
Suppose we are adding two procedures GetDuration and LastDayOfMonth, the updated binder should be like this
STRPGMEXP PGMLVL(*CURRENT)
EXPORT SYMBOL(DayName)
EXPORT SYMBOL(DayOfWeek)
EXPORT SYMBOL(GetDuration)
EXPORT SYMBOL(LastDayOfMonth)
ENDPGMEXP
STRPGMEXP PGMLVL(*PRV)
EXPORT SYMBOL(DayName)
EXPORT SYMBOL(DayOfWeek)
ENDPGMEXP
then Update service program with export (*SRCFILE). This will added new procedure in service program without disturbing old definition and no need to recompile programs those are using service program with old or previous signature.
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
what is the purpose of putovr (put with explicit override) keyword?
how do you use exceptional write in c specs?
when do you explicitly open files and close files in an rpg program?
how you get the relative record in a subfile in which cursor is located?
Difference Between Ca & Cf?
when would you use or not use this approach?
what is the maximum number of record formats in dspf?
what is the function of cpysplf command?
what is the maximum number of fields under a record format of physical file?
what is a query can be run in which mode?
an access path may be in which sequence?
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
what is *iso date format?
what is the sequence when using cursor?
what are various techniques to pass parameters from one program to another?