Interested to Buy Any Domain ? << Click Here >> for more details...
Hi i have one question In my srvpgm one module ADDM is there
now i want to add new module i.e SUBM , please answer me IN
STEPS how to write bndlanguage and how it was attach to SRVPGM
- 2 Answers
- 8483 Views
- IBM, Satyam, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
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
| Is This Answer Correct ? | 5 Yes | 1 No |
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
| Is This Answer Correct ? | 5 Yes | 4 No |
What is access path in as400?
Hi All, Can any one give me a suggestion for below prob One job is in MSGW due to decimal dara error and I find out stmt error and Value in DMUP. but my file has millions of records.So how can i find out on which record the error was occured....?
different type of cursor?
How can you check the existence of object in a system?
What are the system objects required for journalling?
what is jurnal?what is the use of theis?what is difference between commitment control and jurnaling?
what are the different types of arrays?
What would be the output of the variable result? D RESULT S 5S O INZ(00011) C EVAL RESULT = %TRIM(RESULT) Please give me the correct answer for this A.0001 b.compile time error c.11 d.Runtime error
what are the parameters required for calling ls & get command(SFTP COMMANDS) from cl progtram.... e.g call PGM(qp2shell) PARM('/qopensys/usr/bin/sh' '-c' 'sftp -b /home/mydir/tmp.txt user@host.com') Plz reply in detail...
how can you specify no duplicate key?
list some of the commonly used commands for debugging?
what keyword must be used with protect keyword ?
RPG400 
