Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Help calling a SUBPRG from a MAINPRG

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
satya123
Warnings : 1

New User


Joined: 18 Aug 2006
Posts: 57

PostPosted: Mon Jul 16, 2007 2:57 pm    Post subject:
Reply with quote

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
View user's profile Send private message

krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Mon Jul 16, 2007 3:57 pm    Post subject:
Reply with quote

satya123

Let us know how your COMPILE JCL looks like and the error(s) you faced while compiling!
Back to top
View user's profile Send private message
satya123
Warnings : 1

New User


Joined: 18 Aug 2006
Posts: 57

PostPosted: Mon Jul 16, 2007 4:07 pm    Post subject:
Reply with quote

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
View user's profile Send private message
krisprems

Active Member


Joined: 27 Nov 2006
Posts: 649
Location: India

PostPosted: Mon Jul 16, 2007 4:16 pm    Post subject:
Reply with quote

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
View user's profile Send private message
satya123
Warnings : 1

New User


Joined: 18 Aug 2006
Posts: 57

PostPosted: Mon Jul 16, 2007 4:40 pm    Post subject:
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts "DFSRRC00 vs IKJEFT01" for ... arunsoods All Other Mainframe Topics 5 Fri Aug 12, 2016 9:54 pm
No new posts How to get the program name of callin... pkmurali COBOL Programming 8 Mon Aug 01, 2016 3:36 am
No new posts Calling Cobol DB2 program from a cobo... nkjain87 DB2 2 Thu Jul 21, 2016 5:12 pm
No new posts Calling macro via rexx in batch mode. SanaR CLIST & REXX 15 Tue Mar 08, 2016 4:46 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us