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

what is clile code get last digit in numarice value

2 Answers   CFC,

---

How many types of jobs?what is difference between interactive and batch and submited jobs?

3 Answers   IBM,

---

what if my system I runs with system value qccsid 65535?

0 Answers   IBM,

---

What is the purpose of OPNQRYF (Open Query File)?

1 Answers  

---

How many secondary files allowed in a program?

1 Answers  

---

What is Job description?

1 Answers  

---

If login Screen has been modified by adding current date to be displayed. What Step to be followed to Keep that date as Current date Note: If no steps taken then it will display only the compilation date

2 Answers   BridgeStone,

---

what is the maximum number of record formats in dspf?

1 Answers   IBM,

---

whare we can use IN AND OUT AND UNLCK opcodes?please can any body tell me in real time senario with example

2 Answers  

---

how can a procedure will be added in to a srvpgm

4 Answers   TCS,

---

How to retrieve data from data area?

1 Answers  

---

what is command in SFTP which is equivalent to SDUP command in FTP?

2 Answers  

---