Interested to Buy Any Domain ? << Click Here >> for more details...
why we use binding directory and service pgm
- 4 Answers
- 15052 Views
- TCS, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / nikhil
Binding directory is user to bind 1 or more modules into a
program this is purely a concept of ILE. It basically
creats an envlope (*PGM) over different modules
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / pravin
through srvpgm we can use/add modules,srvpgm and bnddir to
a program
through bnddir u can use/add modules and srvpgm to pgm
| Is This Answer Correct ? | 4 Yes | 2 No |
Answer / abhay
Binding Directory is use when we physically want to copy
source into PGM at the time of creation.
However if don't, then we use Service Program.
At the time of Invoking the Progrma which is using SRVPGM,
it take signature of that service progrma and use it's
module accordingly.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / vaiv20
When U want to use a procedure defined in another module or
service pgm in your pgm. This can be used only in ILE pgms
but not in OPM pgms as per my knowledge
| Is This Answer Correct ? | 2 Yes | 5 No |
all i need to know about cmpseqdat parameter in cmppfm, how it works and can we retrieve line sequence and date from the output?
What is the native language of AS/400?
I have created a command that display Source file and library. Now i want that when i enter library name and press f4 on Source file, pgm should display all the PF- SRC's in that Library. For F4 option i have used Choice program but since only limited paramters are passed in Choice pgm i am not able to paas library name and further can't call a pgm that will display list of Source files. Below is the Code snippet for CMD type object :- CMD PROMPT('Source Scan for HUB Standard') PARM KWD(SOURCE) TYPE(*CHAR) LEN(1) RSTD(*YES) + VALUES(N A) MIN(1) + CHOICE('N,A') PARM KWD(SRCFILE) TYPE(FILE) RSTD(*NO) + PROMPT('SOURCE FILE') FILE: QUAL TYPE(*NAME) LEN(10) RSTD(*NO) EXPR (*YES) + CHOICE(*PGM) + CHOICEPGM (XXXXXLIB/YYYPGM) QUAL TYPE(*NAME) LEN(10) DFT(*LIBL) + SPCVAL((*LIBL)) EXPR(*YES) PROMPT ('Library') Below is the Choice pgm:- PGM PARM(&PARM1 &PARM2) DCL VAR(&PARM1) TYPE(*CHAR) LEN (21) DCL VAR(&PARM2) TYPE(*CHAR) LEN (2000) IF COND(%SST(&PARM1 1 10) = 'CHOICE ' *AND + %SST(&PARM1 11 10) = 'SRCFILE ' *AND + (%SST(&PARM1 21 1) = 'C' *OR %SST (&PARM1 + 21 1) = 'P')) THEN (DO) /* (%SST(&PARM1 21 1) = 'C' *OR %SST (&PARM1 + */ CHGVAR VAR(&PARM2) VALUE('Name, F4 for List') ENDDO IF COND(%SST(&PARM1 1 10) = 'CHOICE ' *AND + %SST(&PARM1 11 10) = 'SRCFILE ' *AND + %SST(&PARM1 21 1) = 'P') THEN (DO) CHGVAR VAR(&PARM2) VALUE('Name, F4 for List') CALL PGM(GTSQL) PARM ('XXXXLIB') return ENDDO Thanks in Advance for looking into.
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
What is the purpose of reorganizing the physical file i.e. , RGZPFM?
Can fields be concatenated INa logical file level?
What is the purpose of the following? FORDHDR1 IF E K DISK ORDHDRF KRENAMEORDHDRF1
What is the draw back of Procedures? why we are going to Modules?
how do you pass parameters in cl?
What is SAA?
What is RETURN CURSER LOCATION in subfile?
What is left outer join?
RPG400 
