how can a procedure will be added in to a srvpgm
Answers were Sorted based on User's Feedback
Answer / kapil kumar
UPDSRVPGM add the procedure/module then use the binder
language command as below
STRPGMEXP PGMLVL(*CURRENT)
EXPORT SYMBOL(NewProc)
EXPORT SYMBOL(pgm1)
EXPORT SYMBOL(pgm2)
STRPGMEXP PGMLVL(*PRV)
EXPORT SYMBOL(pgm1)
EXPORT SYMBOL(pgm2)
ENDPGMEXP
| Is This Answer Correct ? | 10 Yes | 3 No |
Answer / syam
If a module contained in a service program changes, the old
module can be replaced with the new module using the
UPDSRVPGM command.
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / 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 |
what are the parameters required for calling ls & get command(SFTP COMMANDS) from cl progtram.... I want to transfer files(using GET COMMAND) that are retrieved by LS command ...FROM 1 SYSTEM TO ANOTHER... STEP 1:LS-list all files...from remote system STEP 2:GET-actually transfer the files(listed in step 1) from remote system to local system & get stored in some Physical file....Plz reply in detail...Thanx
what is the necessary keyword for non-join logical file?
Can you use multi format LF in CL program?
What is a Join Logical File, Can it be used for Update ?
Define what the operation will do, the purpose of the result field and the purpose of *IN66? HI LO EQ C CALL 'CVTDAT' DTPRM 66
why is the declare cursor statement is used for?
what is default data type for the fields(sub fields) defined in data structures in rpg?
what is the difference between packed decimal and zoned decimal?
What is the maximum number of key fields allowed defining in a physical file?
Define a Job Queue?
when this error ocuurs in openqry file 'OPNID(BANKPF) for file BANKPF already exists.'?
What the difference between Source Physical File and Physical File?