Service Program
: S1
Modules in S1
: M1
M1 having two procedures
: ADD, SUB
Current Binder Language
STRPGMEXP PGMLVL(*CURRENT)
EXPORT SYMBOL("ADD")
EXPORT SYMBOL("SUB")
ENDPGMEXP
Doubt:
I need to add one new Module to the Service Program M2
having one procedure ‘MULT’
How to add this new module to the service program S1 ? If I
need to recreate the service program again, Do I need to
mention the Module M1 again while recreating along with new
Module M2?
There is no Binding Directory.
Binder language structure will be like this
STRPGMEXP PGMLVL(*CURRENT)
EXPORT SYMBOL("ADD")
EXPORT SYMBOL("SUB")
EXPORT SYMBOL("MULT")
ENDPGMEXP
STRPGMEXP PGMLVL(*PREVIOUS)
EXPORT SYMBOL("ADD")
EXPORT SYMBOL("SUB")
ENDPGMEXP
No Answer is Posted For this Question
Be the First to Post Answer
Hey, What is the difference between SCAN,CHECK,XLATE OPCODES? please give me the answeres with example in real time senario?
What are the two main attributes, which govern the execution of a job?
What is Sub-System?
What is a Library in AS/400?
records can be read/update/deleted with which file?
Q.Hi All friends, I have one Question, I have three fields in display file SUP LOT, ISSUED to Prod and Line Grp. Field SUP LOT is mentioned in one field reference file WRSLT and key field as a key field LP.Fields ISSUED to PROD,Line GRP are mentioned in the another Field reference file WMDTF. So I want to read SUP LOT on the basis of key field LP from the first file WFSLTand then i want ot read another two fields ISSUED to DATE and LINE GRP from second file on the basis of SUP LOT, which i got from first file.Now i want to display these fields in the display file DSPWMMS. but Condition is that 'Supplier Lot,ISSUED to Prod and Line Grp will not be shown if their respective fields are blanks/Zero. Please Let me Know coding part of this senerio and what would be coding for display file to now shown fields if fields are blanks/zero. My mob. no. is 9836300345. Please reply me asap.
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
i have recently moved to hyd. i would like to know which is the best institue to learn AS400. are there any in ameerpet? thanks.
what are the different commands used in rlu ?
What do you mean by ODP?
how to declare a constant variable in the freeformat?
what is the purpose of ovrdta (override data) keyword?