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


Please Help Members By Posting Answers For Below Questions

the output from my cgi is correctly interpreted by ms internet explorer, whereas netscape navigator would display it as a plain text. What should I do to have also netscape interpreting the html output from my cgi?

566


how to run other job when one job is active?

603


why is as/400 called object oriented machine?

955


what is the function of rlu ?

987


which single rpg opcode performs both setll and reade?

1105






What are the different opcodes used for file operation on a subfile in a rpg pgm?

1103


i am using non join multiple format my 3 database file is like that pf97 R REC ENAME ETENNO ESTATUS K ENAME pf98 R REC1 ENAME ESAL K ENAME PF99 R REC3 ENAME CRDCARD EID K EID & MY NON JOIN LOGICAL FILE IS ALSO SAME EXCEPT RECORD NAMES BEFORE I TRIED WITH 2 FILES SO ITS SAYS ERROR I.E.(Key field attributes must be same as for previous formats. ) SO I CHANGED KEYFIELD ACCORDING TO PF SO ITS WORKING BUT AFTER ADDING 3 FILES ITS SAYING SAME ERROR . I DONT KNOW I NEW IN AS400 PLLZ HELP ME I HAVE ONE MORE QUE. CANT BE USE DIFFERENT KEYFIELD (NOT ACCORDING TO PF) IN NON JOIN LOGICAL FILE.

1043


How can we update a specific field in RPG?

933


which cl command can be used at program execution to redirect the file named in an rpg program?

712


can a join logical file be updated?

594


at what level s,o are defined and what they will do?

977


what is arrival sequence?

1115


an access path may be in which sequence?

635


In AS/400 projects in Companies whats the meaning of production support team.what production support involves.also what work does development,maintenance involve what are the other teams or processes that are available for as400 project.

8535


what opcode could be used to test an alphanumeric field for all numeric values?

1077