MVSFORUMS.com Forum Index MVSFORUMS.com
A Community of and for MVS Professionals
 
 FAQFAQ   SearchSearch   Quick Manuals   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

To me, this is strange ...

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF
View previous topic :: View next topic  
Author Message
ds390
Beginner


Joined: 23 Jan 2007
Posts: 82
Topics: 39

PostPosted: Wed Nov 11, 2009 8:54 pm    Post subject: To me, this is strange ... Reply with quote

Hi all,

I have a simple program which does the 'hello world.' thing.

If I compile it to t003 it doesn't print the output. It works if I give I gave it another name. This is strange. The source, compile jcl, run jcl are all the same except the load module name.

What could be the problem?
Back to top
View user's profile Send private message
papadi
Supermod


Joined: 20 Oct 2009
Posts: 594
Topics: 1

PostPosted: Wed Nov 11, 2009 9:11 pm    Post subject: Reply with quote

What happens when you execute t003?

It may help if you post all (3 or 4?) of the sysouts from a t003 execution.
_________________
All the best,

di
Back to top
View user's profile Send private message
semigeezer
Supermod


Joined: 03 Jan 2003
Posts: 1014
Topics: 13
Location: Atlantis

PostPosted: Wed Nov 11, 2009 10:06 pm    Post subject: Reply with quote

have you checked for naming conflicts in steplib, joblib, sysproc, sysexec, and ispllib? does it work with a direct CALL 'dsn(t003)' command?
_________________
New members are encouraged to read the How To Ask Questions The Smart Way FAQ at http://www.catb.org/~esr/faqs/smart-questions.html.
Back to top
View user's profile Send private message Visit poster's website
ds390
Beginner


Joined: 23 Jan 2007
Posts: 82
Topics: 39

PostPosted: Wed Nov 11, 2009 10:13 pm    Post subject: Reply with quote

If I execute t003, it ends normally with return code 0. And I checked the job log, no 'hello world' .

If I delete t003, and compile the same source to t005, and execute t005, it has the sysout with 'hello world' in it.

Then I change the target object back to t003, and run it and there is no sysout.

Has anyone ever experienced the similar thing?
Back to top
View user's profile Send private message
ds390
Beginner


Joined: 23 Jan 2007
Posts: 82
Topics: 39

PostPosted: Wed Nov 11, 2009 10:20 pm    Post subject: Reply with quote

tso call 'ibmuser.atest.load(t005)' got 'hello world.'
tso call 'ibmuser.atest.load(t003)' got nothing.

BTW, I am using my ADCD 1.6, without LLA.

Thanks for your help.
Back to top
View user's profile Send private message
ds390
Beginner


Joined: 23 Jan 2007
Posts: 82
Topics: 39

PostPosted: Wed Nov 11, 2009 10:25 pm    Post subject: Reply with quote

Interesting, if I delete t003 and rename t005 to t003, and call t003 either in TSO or JCL, I got my 'hello world.'

I am totally confused.
Back to top
View user's profile Send private message
ds390
Beginner


Joined: 23 Jan 2007
Posts: 82
Topics: 39

PostPosted: Wed Nov 11, 2009 10:34 pm    Post subject: Reply with quote

Here is my JCL. If I change line # 4, and #8 from t003 to t005, I got hello world. If I use t003 on these line numbers, I got no sysout.

But if I delete t003 in ispf, and rename t005 to 003 and call t003 from tso or JCL , I got 'hello world.'

What is the problem?
Code:

****** ***************************** Top of Data ******************************
000001 //T003J    JOB MCA,CLASS=F,MSGLEVEL=(1,1),MSGCLASS=A,                   
000002 //         NOTIFY=&SYSUID                                               
000003 //         SET FILENAME=T005COB1                                       
000004 //         SET RUNNAME=T003                                             
000005 //STEP0   EXEC PGM=IDCAMS                                               
000006 //SYSPRINT DD SYSOUT=*                                                 
000007 //SYSIN   DD *                                                         
000008  DELETE IBMUSER.ATEST.LOAD(T003)                                       
000009 /*                                                                     
000010 //STEP1          EXEC IGYWCL,GOPGM=&RUNNAME,PARM='LIB' COPYBOOK         
000011 //COBOL.SYSIN    DD DSN=IBMUSER.ATEST.SRC(&FILENAME),DISP=SHR           
000012 //COBOL.SYSLIB   DD DSN=IBMUSER.ATEST.SRC,DISP=SHR COPYBOOK             
000013 //LKED.SYSLMOD   DD DISP=SHR,DSN=IBMUSER.ATEST.LOAD(&RUNNAME)           
000014 //SYSPRINT DD SYSOUT=*                                                 
000015 //S2    EXEC PGM=&RUNNAME                                               
000016 //STEPLIB  DD  DSN='IBMUSER.ATEST.LOAD',DISP=SHR                       
000017 //SYSOUT   DD SYSOUT=*                                                 
****** **************************** Bottom of Data ****************************
Back to top
View user's profile Send private message
papadi
Supermod


Joined: 20 Oct 2009
Posts: 594
Topics: 1

PostPosted: Wed Nov 11, 2009 11:10 pm    Post subject: Reply with quote

What does the linkedit output show?

What is the program-id in the source?

What happens if you use the same value for the source name, loadlib name, and program-id?

It may be that you've confused the system between the module name and the entry point Smile
_________________
All the best,

di
Back to top
View user's profile Send private message
semigeezer
Supermod


Joined: 03 Jan 2003
Posts: 1014
Topics: 13
Location: Atlantis

PostPosted: Thu Nov 12, 2009 4:02 pm    Post subject: Reply with quote

just out of curiosity, if you go to TSO and type TSO ISRDDN ; B T003 (or if needed, LOAD T003) do you see the module you expect to run? Does the command S T003 show it coming from where you want it to come from?
_________________
New members are encouraged to read the How To Ask Questions The Smart Way FAQ at http://www.catb.org/~esr/faqs/smart-questions.html.
Back to top
View user's profile Send private message Visit poster's website
ds390
Beginner


Joined: 23 Jan 2007
Posts: 82
Topics: 39

PostPosted: Thu Nov 12, 2009 8:44 pm    Post subject: Reply with quote

Thanks, SG, and I can see the direction you are pointing to. I tried what you said and I got message says 'module not loaded'.

Please notice, if I delete t003 from ibmuser.atest.load library and submit JCL with pgm=t003, it will tell me requested module not found. I have a feeling that I have a wrong copy of t003 in the memery/storage that is not purged.
Back to top
View user's profile Send private message
ds390
Beginner


Joined: 23 Jan 2007
Posts: 82
Topics: 39

PostPosted: Fri Nov 13, 2009 12:16 am    Post subject: Reply with quote

Hi All,

I found the cause of the problem. A few month ago I modified my IGYWCL to keep my temporary module before HEWL. So what happened is , although every time I delete the program, but the new program is being created from my old module.

Thanks for your help everyone.
Back to top
View user's profile Send private message
papadi
Supermod


Joined: 20 Oct 2009
Posts: 594
Topics: 1

PostPosted: Fri Nov 13, 2009 4:36 pm    Post subject: Reply with quote

Thanks for posting the "solution" - so much nicer than it remaining a mystery Wink
_________________
All the best,

di
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> TSO and ISPF All times are GMT - 5 Hours
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


MVSFORUMS
Powered by phpBB © 2001, 2005 phpBB Group