View previous topic :: View next topic
|
Author |
Message |
satya123 Warnings : 1 New User
Joined: 18 Aug 2006 Posts: 57
|
|
|
|
Hi All,
I have a requirement urgently calling a SUBPRG from a MAINPRG and both are PLI programs but in different members of a PDS.
When i compile and link edit both the programs in same JCL compiler it is not calling.Can anybody help me out to define extra coding for compiler to be mentioned.
Thanks in adv.
Regards
Satyabrata |
|
Back to top |
|
|
krisprems
Active Member
Joined: 27 Nov 2006 Posts: 649 Location: India
|
|
|
|
satya123
Let us know how your COMPILE JCL looks like and the error(s) you faced while compiling! |
|
Back to top |
|
|
satya123 Warnings : 1 New User
Joined: 18 Aug 2006 Posts: 57
|
|
|
|
Thanks a lot for prompt replay....
This is the jcl we are using for compilation and run.......
//DOPROC EXEC PROC=PLICOMP
//PLI.SYSIN DD DSN=X.PLI.JCL(SUB3),DISP=SHR
//LKED.SYSLMOD DD DSN=X.PLI.LOAD(SUB3),DISP=SHR
//LKED.SYSLIB DD
// DD DSN=X.PLI.OBJ,DISP=SHR
//*
//RUN EXEC PGM=SUB3,PARM=ASDF
//STEPLIB DD DSN=X.PLI.LOAD(SUB3),DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
/*
//
Satya123 |
|
Back to top |
|
|
krisprems
Active Member
Joined: 27 Nov 2006 Posts: 649 Location: India
|
|
|
|
satya123
Please tell
1. Order of compilation(are you compiling the SUB-program first or MAIN-program First)
2.
Quote: |
When i compile and link edit both the programs in same JCL compiler it is not calling |
How do you say its not calling? |
|
Back to top |
|
|
satya123 Warnings : 1 New User
Joined: 18 Aug 2006 Posts: 57
|
|
|
|
No i am submitting sub program first and return code is 0
step-1 ---- compiling the subprogram first
SUB2:PROCEDURE OPTIONS(MAIN);
DCL A FIXED BIN EXT;
A=200;
PUT SKIP LIST('INSIDE SUB2',A);
END SUB2;
with following JCL
//DOPROC EXEC PROC=PLICOMP
//PLI.SYSIN DD DSN=X.PLI.JCL(SUB2),DISP=SHR
//LKED.SYSLMOD DD DSN=X.PLI.LOAD(SUB2),DISP=SHR
//LKED.SYSLIB DD
// DD DSN=X.PLI.OBJ,DISP=SHR
//*
//
step-2 ------compiling the main program next
Main Program is
SEC1:PROCEDURE OPTIONS(MAIN);
DCL SUB2 ENTRY;
SUB:PROCEDURE;
DCL A FIXED BIN EXT;
A=100;
PUT SKIP LIST('INSIDE SUB',A);
END SUB;
/* */
CALL SUB;
CALL SUB2;
END SEC1;
with following JCL
//DOPROC EXEC PROC=PLICOMP
//PLI.SYSIN DD DSN=X.PLI.JCL(SEC1),DISP=SHR
//LKED.SYSLMOD DD DSN=X.PLI.LOAD(SEC1),DISP=SHR
//LKED.SYSLIB DD
// DD DSN=X.PLI.OBJ,DISP=SHR
//*
//
WHEN I SUBMIT THIS IT IS SHOWING follwing error
IEW2456E 9207 SYMBOL SUB2 UNRESOLVED. MEMBER COULD NOT BE INCLUDED FROM THE DESIGNATED CALL LIBRARY
IEW2638S 4321 AN EXECUTABLE VERSION OF MODULE SEC1 EXISTS AND CANNOT BE REPLACED BY THE NON-EXECUTABLE MODULE JUST
CREATED.
IEW2008I 0F03 PROCESSING COMPLETED. RETURN CODE = 12.
thanks please guide me |
|
Back to top |
|
|
|