Answer / mohan

HI,

NOT POSSIBLE TO ADD NEW MODULE TO THE EXISTING SERVICE
PROGRAM. ONLY UPDATE POSSIBLE FOR THE EXITING SERVICE PGM.
USING UPDSRVPGM COMMAND WE CAN UPDATE ANY MODULE IN SERVICE PGM.
IF U WANT TO ADD NEW MODULE,THEN U RECREATE THE SERVICE PGM.

BINDER LANGUAGE:
1)IT IS USED FOR EXPORT ONLY PROCEDURES IN MODULE.
2)SUPPOSE IN UR MODULE CONTAIN 5 PROCEDURES,IF U WANT TO USE
ONLY 2 PROCEDURES THEN WE USE BINDER LANGUAGE.
3)GENERATE NEW SIGNATURES IT IS USED.

STRPGMEXP PGMLVL(*CURRENT)
EXPORT SYMBOL('PROCEDURE1)
EXPORT SYMBOL('PROCEDURE2')
ENDPGMEXP

PRESS F6 ON COMMAND LINE,THEN GIVE SOURCE MEMBER NAME,SOURCE
TYPE GIVE ANY NAME LIKE "BND".U CAN WRITE ABOVE CODE INTO
THIS SOURCE FILE AND SAVE IT.NO NEED TO COMPILE.

WHEN U CREATE SERVICE PGM,
CRTSRVPGM + F4 ---> NAME
LIB
MODUE1
MODULE2

AFTER FILL THE MODULES, U CAN SPECIFY
EXPORT *SRCFILE
SRCFILE NAME OF THE SOURCE FILE
MBR BND(SOURCE MEMBER NAME)

BND IS THE NAME OF SOURCE MEMBER NAME, TO SAVED THE ABOVE
CODE IN THAT MEMBER.

THESE ARE STEPS FOR CREATING SIGNATURE USING BINDER LANGUAGE
FOR SERVICE PROGRAM.

IF u want to generate new signature,that creating new pgm
object,this need 3 procedures,
so just edit the above BND file like below

STRPGMEXP PGMLVL(*CURRENT)
EXPORT SYMBOL('PROCEDURE1)
EXPORT SYMBOL('PROCEDURE2')
EXPORT SYMBOL('PROCEDURE3')
ENDPGMEXP

ENDPGMEXPSTRPGMEXP PGMLVL(*PRV)
EXPORT SYMBOL('PROCEDURE1)
EXPORT SYMBOL('PROCEDURE2')
ENDPGMEXP

after edit above file,again u recompile the service program
only.and this *SRVPGM object add to newly created pgm object.
No need to compile all your programs which are using this
service program

THANKS
Mohan

Answer / radha sammangi

Hi,

For this change your Binding language source like below..

STRPGMEXP PGMLVL(*CURRENT)

EXPORT SYMBOL('ADDM')
EXPORT SYMBOL('SUBM')

ENDPGMEXP

STRPGMEXP PGMLVL(*PRV)

EXPORT SYMBOL('ADDM')

ENDPGMEXP

After this just recreate your service program.No need to compile all your programs which are using this service program.

Thanks
Radha

4 persons a, b , c , d have to go to concert which will held in 17 minutes. there is a bridge which only 2 persons at a time can cross. its night and they have only one flashlight with them. Flashlight cannot be thrown. one person should return with the flashlight all 4 person have different speed. a = crosses bridge in 1 min. b = crosses bridge in 2 min. c = crosses bridge in 5 min. d = crosses bridge in 10 min how can they all reach in time.?? Ex- suppose a and d crosses bridge which will take 10 mins and then d returns back with a flashlight which will make 20 mins and mission is failed.

1 Answers   Manhattan,

---

define the purpose of the *bcat function?

1 Answers   IBM,

---

what is a non-join logical file?

1 Answers   IBM,

---

what the purpose of ovrdta, ovrata keywords?

1 Answers   IBM,

---

An rpg program is processing an openquery file.The file is declared in update mode in F spec.Can we update this file? Please explain?

3 Answers  

---

What is the Difference between command attention key and command function key ?

0 Answers   IBM,

---

What is the function of DSPATR (display attributes) keyword?

1 Answers  

---

what is OUTFILE?what is the uses and disadvantage? where we can use this?

2 Answers  

---

when are the referential constraints executed?

0 Answers   IBM,

---

can I copy content of Physican file in some source Member of type TXT? Thanx..

1 Answers  

---

What is a Device file?

1 Answers  

---

we have 2 PF files with same name, how to copy data's from one file to another through RPG program logic?

3 Answers  

---