Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Ed Gould
--- On Thu, 12/9/10, Rick Fochtman  wrote:
---SNIP

This last comment is correct, but I have a serious problem with applications 
that issue system-type abend codes.

Rick

Rick,
I agree completely. When we were converting from MVT to MVS we had a user come 
down with a similar problem. He said "It says its a system abend" fix it 
because its not mine. It took me all of 30 second to figure it out from the 
dump and told the guy it was his problem and here is why... I explained the 
issue as simply as I could. The guy thought I was giving him a snow job and he 
went to his bosses boss and told him we (the system group) couldn't fix a 
system problem. All of a sudden we were told we had to go to a meeting and were 
hustled up to a huge conference room and was told to stand around in the 
corner. As it unfolded the meeting was a status meeting and every body was 
giving the status of his/her project. Then about 2/3rd's the way through one of 
the project managers got up and talked about all his project and then he says 
something to the effect that MVS was broken and the systems people had to fix 
it or this project xxx was going to fail. We
 all looked at each other and I was not sure what he was talking about so I 
asked him what MVS system problem was he refering to as far as I know no MVS 
issues (user) were outstanding. The project manager said the program was 
getting an S001 and an "S" meant it was a system problem. It was then I 
realized what was going on (I had a desk full of S/A dumps just waiting for me 
to look at). I turned my head and looked at my boss and I said "now I 
understand" to him. I looked at him and gave me the OK to go. So I said I would 
like to explain something so we could all be on the same understanding. So I 
went to the white board and explained exactly what had happen. 
Back then most people were conversant  in assembler so I did not have to go 
into bits too much but I think I explained it well enough and I turned around 
and asked does this explain what the small problem is and the "Big" boss was a 
little red in the face. I steped back to the my group and the "Big" boss said 
OK everybody that is not part of the project could leave. We filed and closed 
the door behind us. Although we had rather thick doors on our conference rooms 
it wasn't thick enough to hear the boss screaming at the top of his lungs that 
in no uncertain terms he wanted that programmer gone TODAY.
Well I heard about a week later the idiot programmer went to work for an 
insurance company in Chicago for big $$. I loss track of the guy as I was just 
hoping never to run into him again. That is one of the many reasons not to code 
it that way.
Sorry to run on and a little bit late in replying.
Ed
 




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Rick Fochtman
-- 



At 15:41 -0600 on 12/09/2010, Rick Fochtman wrote about Re: Problem 
when try compile a CBT036 FILE:



The value you have specified for the ABEND code is greater than 4095,
which isn't strictly legal under z/OS. Change that "X'001000'" value to
4095 and you'll get clean assemblies.

Rick

Sergio Lima wrote:


Hello List,

Thanks from all help.
Now our JOB run ok, have some mistakes here, that was correct with 
all opinions.

Sorry about disturb, with this like "easy" question.
The ZOS that We are migrating is 1.2, from Z/VSE 4.2.
Now, have another problem, because something don't want work in 2 of 
6 Assembler programs.

This two programs showed the same error that is :

NOTE: ABOVE LINE DESTROYS REG 15 FOR 31-BIT CALLERS
  SVC   68 ISSUE SVC   
  ABEND X'001000',DUMP  SYSTEM 001 ABEND   
  DS0H


 >  8,CC EXCEEDS SPECIFIED LIMITS



The comment says S001 so the ABEND call needs to be fixed to issue a 
System Code ABEND not a USER CODE one. The value is correct for a S001 
but could be coded as:


   L  1,=AL4(X'001000')S001 ABEND CODE
   ABEND (1),DUMP  SYSTEM 001 ABEND



This last comment is correct, but I have a serious problem with 
applications that issue system-type abend codes.


Rick

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Robert A. Rosenberg
At 15:41 -0600 on 12/09/2010, Rick Fochtman wrote about Re: Problem 
when try compile a CBT036 FILE:



The value you have specified for the ABEND code is greater than 4095,
which isn't strictly legal under z/OS. Change that "X'001000'" value to
4095 and you'll get clean assemblies.

Rick

Sergio Lima wrote:


Hello List,

Thanks from all help.
Now our JOB run ok, have some mistakes here, that was correct with 
all opinions.

Sorry about disturb, with this like "easy" question.
The ZOS that We are migrating is 1.2, from Z/VSE 4.2.
Now, have another problem, because something don't want work in 2 
of 6 Assembler programs.

This two programs showed the same error that is :

NOTE: ABOVE LINE DESTROYS REG 15 FOR 31-BIT CALLERS
  SVC   68 ISSUE SVC   
  ABEND X'001000',DUMP  SYSTEM 001 ABEND   
  DS0H

 >  8,CC EXCEEDS SPECIFIED LIMITS


The comment says S001 so the ABEND call needs to be fixed to issue a 
System Code ABEND not a USER CODE one. The value is correct for a 
S001 but could be coded as:


   L  1,=AL4(X'001000')S001 ABEND CODE
   ABEND (1),DUMP  SYSTEM 001 ABEND

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Rick Fochtman
The value you have specified for the ABEND code is greater than 4095, 
which isn't strictly legal under z/OS. Change that "X'001000'" value to 
4095 and you'll get clean assemblies.


Rick

Sergio Lima wrote:


Hello List,

Thanks from all help.
Now our JOB run ok, have some mistakes here, that was correct with all opinions.
Sorry about disturb, with this like "easy" question.
The ZOS that We are migrating is 1.2, from Z/VSE 4.2.
Now, have another problem, because something don't want work in 2 of 6 
Assembler programs.
This two programs showed the same error that is :

NOTE: ABOVE LINE DESTROYS REG 15 FOR 31-BIT CALLERS 
 SVC   68 ISSUE SVC
 ABEND X'001000',DUMP  SYSTEM 001 ABEND
 DS0H  
 8,CC EXCEEDS SPECIFIED LIMITS 
 CNOP  0,4 
 B *+8BRANCH AROUND CONSTANTS  
 DCAL4(X'001000')  
 L 1,*-4  LOAD REG1 WITH COMPCODE  
 LA0,128(0,0) DUMP/STEP/DUMPOPTS/REASON
 SLL   0,24(0)SHIFT TO HIGH ORDER  
 OR1,0OR IN WITH COMPCODE  



How said, have six programs :

SYSPRINT SPFCNTL  ASM
SYSPRINT SPFCORE  ASM
SYSPRINT SPFFIX   ASM
SYSPRINT SPFMAIN  ASM
SYSPRINT SPFSCAN  ASM
SYSPRINT SPFSRCH  ASM

And the SPFFIX / SPFSRCH had the error above.

This may be because the release of ZOS ?
Someone know, how contact the person that wrote this program ?
Someone are using this program that do a recovery of a PDS file deleted ?

Thanks very much again, and Best Regards.

Sergio

 


Date: Thu, 9 Dec 2010 17:15:00 +0300
From: sergio...@hotmail.com
Subject: Re: Problem when try compile a CBT036 FILE
To: IBM-MAIN@bama.ua.edu

Hello Scott,

What We need change?

Thanks,

Sergio

   


Date: Wed, 8 Dec 2010 17:06:48 -0500
From: scott.r...@joann.com
Subject: Re: Problem when try compile a CBT036 FILE
To: IBM-MAIN@bama.ua.edu

The PARMs for the ASM step specify DECK and NOLOAD, so the object output is
going to SYSPUNCH, not SYSLIN.

CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains
confidential and privileged information intended only for the addressee.
If you are not the intended recipient, please be advised that you have
received this material in error and that any forwarding, copying, printing,
distribution, use or disclosure of the material is strictly prohibited.
If you have received this material in error, please (i) do not read it,
(ii) reply to the sender that you received the message in error, and
(iii) erase or destroy the material. Emails are not secure and can be
intercepted, amended, lost or destroyed, or contain viruses. You are deemed
to have accepted these risks if you communicate with us by email. Thank you.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
   

		 	   		  
--

For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

 




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Sergio Lima
Hello Chris Mason.
 
First thanks very much from your help.
 
Chris, Before start my JOB here, I worked with ZOS, but with CICS SUPPORT for 
nine years.
I start work here, at March of this year, but really JCL I never know very well.
For more then 30 years, I worked with VM/VSE, so, at 2001 year was working with 
CICS under ZOS.
When start work with ZOS, was not very easy for me, and for this reason, I put 
some questions here, when I dont' know.
I  want to apologize for putting this list as seemingly easy questions.
 
Regards,
 
Sergio
 
 



 
> Date: Thu, 9 Dec 2010 10:41:53 -0600
> From: chrisma...@belgacom.net
> Subject: Re: Problem when try compile a CBT036 FILE
> To: IBM-MAIN@bama.ua.edu
> 
> Sergio
> 
> What you need to change is the apparent management attitude which 
> imposes a VSE to MVS (z/OS) conversion onto you without having 
> *previously* arranged for adequate education.
> 
> If your management's attitude is for education to be provided by asking 
> questions on the IBM-MAIN and other lists, please arrange for a funding 
> stream to be set up so that payments can somehow be arranged for 
> consultancy fees to all of us attempting to provide assistance!
> 
> -
> 
> Now having dealt with the *real* problem, let's deal with what appears to be 
> the superficial problem which is very, very simple - for someone with the 
> most 
> basic training - I won't even dignify it with the word *education* in the use 
> of 
> MVS procedures and general understanding of compilation[1] and linkage 
> editing.
> 
> I strongly expect that the JCL you need is the following:
> 
> //***// 
> 
> //* INSTALL SPFPDS LOAD MODULE FOR FIXPDS *// 
> //***// 
> 
> //FPDSASM PROC M= 
> //ASM EXEC PGM=ASMA90,REGION=3500K, (IBM ASSEMBLER H) 
> // PARM='DECK,RENT,NOLOAD' 
> //SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR SYSTEM MACRO LIBRARY 
> // DD DSN=SYS1.MODGEN,DISP=SHR SYSTEM MACRO LIBRARY 
> // DD DSN=IBMUSER.FILE036,DISP=SHR <== THIS LIBRARY 
> //SYSUT1 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> //SYSUT2 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> //SYSUT3 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> //SYSTERM DD SYSOUT=* 
> //SYSPRINT DD SYSOUT=* 
> //SYSLIN DD DISP=SHR,DSN=IBMUSER.OBJECT 
> //SYSIN DD DISP=SHR,DSN=IBMUSER.FILE036(&M) 
> //SYSPUNCH DD DSN=IBMUSER.OBJECT(&M),DISP=OLD 
> //* 
> //PEND PEND 
> //* 
> //SPFCNTL EXEC FPDSASM,M=SPFCNTL 
> //SPFCORE EXEC FPDSASM,M=SPFCORE 
> //SPFFIX EXEC FPDSASM,M=SPFFIX 
> //SPFMAIN EXEC FPDSASM,M=SPFMAIN 
> //SPFSCAN EXEC FPDSASM,M=SPFSCAN 
> //SPFSRCH EXEC FPDSASM,M=SPFSRCH 
> //* 
> //LKED EXEC PGM=IEWL,PARM='TERM,XREF,LIST,LET,TEST', 
> // COND=(7,LT) 
> //SYSLMOD DD DSN=IBMUSER.LOAD,DISP=SHR 
> //ISPLIB DD DSN=SYS1.LINKLIB,DISP=SHR 
> //SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(2,1)) 
> //SYSTERM DD SYSOUT=* 
> //SYSPRINT DD SYSOUT=* 
> //SYSLIB DD DISP=SHR,DSN=IBMUSER.OBJECT 
> //SYSLIN DD * 
> INCLUDE SYSLIB(SPFCNTL) 
> INCLUDE SYSLIB(SPFCORE) 
> INCLUDE SYSLIB(SPFFIX) 
> INCLUDE SYSLIB(SPFMAIN) 
> INCLUDE SYSLIB(SPFSCAN) 
> INCLUDE SYSLIB(SPFSRCH) 
> INCLUDE ISPLIB(ISPLINK) 
> SETCODE AC(0) 
> NAME SPFPDS(R) 
> /*
> 
> 
> The only change I have made is to replace "FILE036" in the SYSPUNCH DD-
> statement with "OBJECT".
> 
> The technical reason for this is that the repeated calls to the procedure 
> cause 
> a number of source modules to be assembled *from* the SYSIN DD-
> statement, IBMUSER.FILE036(&M), and placed as object modules in "DECK" 
> form in the SYSPUNCH DD-statement, IBMUSER.OBJECT(&M), under the 
> influence of the "DECK" parameter to the assembler H program.
> 
> The repeated calls to the assembler procedure are then followed by a linkage 
> edit - I believe the name "binder" has become a replacement for the old-
> fashioned term "linkage editor" these days - procedure which takes all the 
> object modules in "DECK" form from the PDS identified as the SYSLIB DD-
> statement - *and* - an object module in what must be "load" form from the 
> PDS identified as the ISPLIB DD-statement - which is expected to be 
> SYS1.LINKLIB - and linkage edits them into a module in "load" form with name 
> SPFPDS and stores it in the PDS identified with the SYSLMOD DD-statement, 
> IBMUSER.LOAD. 
> 
> Note, incidentally, that including IBMUSER.FILE036 as a PDS in the SYSLIB 
> concatenation to the assembler program will allow any macros specifically 
> created for this set of source modules to be found.
> 
> Note also that I haven't removed SYSUT2 and SYSUT3 f

Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Chris Mason
t they are unnecessary. 
Leaving them in can't do any harm and this has nothing whatsoever to do with 
your problem!

Looking at that procedure again, I'm not at all sure there is any role for the 
SYSLIN DD-statement.

> The SYSLIN STATEMENT before the PEND command was inserted here by 
us, because We imagine that this parameter was missing.

What this appears to say, I don't understand but I can mention that 
*knowledge* beats *imagination* every time - when it comes to solving this 
sort of problem anyhow!

-

All the above was composed before checking other contributions since your 
last was

> What We need change?

Clearly, they had not been sufficiently helpful.

Also I missed the additional point which Lizette Kohler addressed which was 
that you need to verify which "load" module PDS contains the ISPLINK module. 
It is clearly *not* SYS1.LINKLIB and - for all I know not having a system to 
hand - may well be SYS1.ISP.SISPLOAD.

If it is the latter, you will need to replace 

//ISPLIB   DD  DSN=SYS1.LINKLIB,DISP=SHR

with

//ISPLIB   DD  DSN=SYS1.ISP.SISPLOAD,DISP=SHR

in the linkage editor step.

Finally, I see you have had so much help you have just become confused! 
You - and probably also your colleagues - need to get that education I 
mentioned initially!

-

Incidentally, I couldn't see what contribution Binyamin Dissen had made until I 
appreciated he was probably intending you to spot the final comment I believe 
he makes on all of his posts:

>...> I very rarely bother responding to challenge/response systems, 
especially those from irresponsible companies.

This, in a rather strong form, supports the my initial point. Clearly your 
question is one of the rare cases!

Chris Mason

[1] Actually, this is Assembler H - is it not? - and so I wonder that the 
person 
who set up the original job control file didn't know that Assembler H used only 
*one* work file and not the "traditional" three - although that is a change 
that is either ancient history now - or I have I just somehow imagined it - a 
consequence of old age! Note I don't have a system to hand these days to 
verify potentially false memories!


On Thu, 9 Dec 2010 17:15:00 +0300, Sergio Lima  
wrote:

>Hello Scott,
> 
>What We need change?
> 
>Thanks,
> 
>Sergio
> 
>> Date: Wed, 8 Dec 2010 17:06:48 -0500
>> From: scott.r...@joann.com
>> Subject: Re: Problem when try compile a CBT036 FILE
>> To: IBM-MAIN@bama.ua.edu
>> 
>> The PARMs for the ASM step specify DECK and NOLOAD, so the object 
output is
>> going to SYSPUNCH, not SYSLIN.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Sergio Lima
Hello List,
 
Thanks from all help.
Now our JOB run ok, have some mistakes here, that was correct with all opinions.
Sorry about disturb, with this like "easy" question.
The ZOS that We are migrating is 1.2, from Z/VSE 4.2.
Now, have another problem, because something don't want work in 2 of 6 
Assembler programs.
This two programs showed the same error that is :
 
NOTE: ABOVE LINE DESTROYS REG 15 FOR 31-BIT CALLERS 
  SVC   68 ISSUE SVC
  ABEND X'001000',DUMP  SYSTEM 001 ABEND
  DS0H  
  8,CC EXCEEDS SPECIFIED LIMITS 
  CNOP  0,4 
  B *+8BRANCH AROUND CONSTANTS  
  DCAL4(X'001000')  
  L 1,*-4  LOAD REG1 WITH COMPCODE  
  LA0,128(0,0) DUMP/STEP/DUMPOPTS/REASON
  SLL   0,24(0)SHIFT TO HIGH ORDER  
  OR1,0OR IN WITH COMPCODE  
 
 
How said, have six programs :
 
SYSPRINT SPFCNTL  ASM
SYSPRINT SPFCORE  ASM
SYSPRINT SPFFIX   ASM
SYSPRINT SPFMAIN  ASM
SYSPRINT SPFSCAN  ASM
SYSPRINT SPFSRCH  ASM
 
And the SPFFIX / SPFSRCH had the error above.
 
This may be because the release of ZOS ?
Someone know, how contact the person that wrote this program ?
Someone are using this program that do a recovery of a PDS file deleted ?
 
Thanks very much again, and Best Regards.
 
Sergio
 
> Date: Thu, 9 Dec 2010 17:15:00 +0300
> From: sergio...@hotmail.com
> Subject: Re: Problem when try compile a CBT036 FILE
> To: IBM-MAIN@bama.ua.edu
> 
> Hello Scott,
> 
> What We need change?
> 
> Thanks,
> 
> Sergio
> 
> > Date: Wed, 8 Dec 2010 17:06:48 -0500
> > From: scott.r...@joann.com
> > Subject: Re: Problem when try compile a CBT036 FILE
> > To: IBM-MAIN@bama.ua.edu
> > 
> > The PARMs for the ASM step specify DECK and NOLOAD, so the object output is
> > going to SYSPUNCH, not SYSLIN.
> > 
> > CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains
> > confidential and privileged information intended only for the addressee.
> > If you are not the intended recipient, please be advised that you have
> > received this material in error and that any forwarding, copying, printing,
> > distribution, use or disclosure of the material is strictly prohibited.
> > If you have received this material in error, please (i) do not read it,
> > (ii) reply to the sender that you received the message in error, and
> > (iii) erase or destroy the material. Emails are not secure and can be
> > intercepted, amended, lost or destroyed, or contain viruses. You are deemed
> > to have accepted these risks if you communicate with us by email. Thank you.
> > 
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> > Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
  
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Scott Rowe
Sergio,

I honestly don't know where to start.  I thought I gave you the information
you needed to understand your problem and fix it yourself.  There are many
different ways you could change the JCL to make it work, but I suspect you
are going to have to start again, from the beginning, because you have
overwritten your source dataset.  I am really struggling here, because it
appears that you do not understand what this JCL is supposed to do, and I
don't think you should proceed until you do understand it.

I don't like to tell people how to do something, I prefer to try to help
them understand where their problem lies. In this case, the thing you need
to understand is that the assembler (ASMA90) is writing the object output to
ddname SYSPUNCH, not SYSLIN.  It would appear that the changes you made to
the JCL caused it to overwrite the source code with the object.

CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains
confidential and privileged information intended only for the addressee.
If you are not the intended recipient, please be advised that you have
received this material in error and that any forwarding, copying, printing,
distribution, use or disclosure of the material is strictly prohibited.
If you have received this material in error, please (i) do not read it,
(ii) reply to the sender that you received the message in error, and
(iii) erase or destroy the material. Emails are not secure and can be
intercepted, amended, lost or destroyed, or contain viruses. You are deemed
to have accepted these risks if you communicate with us by email. Thank you.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Sergio Lima
Hello Scott,
 
What We need change?
 
Thanks,
 
Sergio
 
> Date: Wed, 8 Dec 2010 17:06:48 -0500
> From: scott.r...@joann.com
> Subject: Re: Problem when try compile a CBT036 FILE
> To: IBM-MAIN@bama.ua.edu
> 
> The PARMs for the ASM step specify DECK and NOLOAD, so the object output is
> going to SYSPUNCH, not SYSLIN.
> 
> CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains
> confidential and privileged information intended only for the addressee.
> If you are not the intended recipient, please be advised that you have
> received this material in error and that any forwarding, copying, printing,
> distribution, use or disclosure of the material is strictly prohibited.
> If you have received this material in error, please (i) do not read it,
> (ii) reply to the sender that you received the message in error, and
> (iii) erase or destroy the material. Emails are not secure and can be
> intercepted, amended, lost or destroyed, or contain viruses. You are deemed
> to have accepted these risks if you communicate with us by email. Thank you.
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
  
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Sergio Lima
Hello Hal,
 
Thanks from your help,
 
Change here :
 
01 //TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440,  
02 //MSGLEVEL=(1,1),MSGCLASS=T   
03 //***//   
04 //*   INSTALL SPFPDS LOAD MODULE FOR FIXPDS *//   
05 //***//   
06 //FPDSASM PROC M= 
07 //ASMEXEC  PGM=ASMA90,REGION=3500K,  (IBM ASSEMBLER H)
08 // PARM='DECK,RENT,NOLOAD'
09 //SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR   SYSTEM MACRO LIBRARY
10 // DD  DSN=SYS1.MODGEN,DISP=SHR  SYSTEM MACRO LIBRARY 
11 // DD  DSN=IBMUSER.FILE036,DISP=SHR  <== THIS LIBRARY 
12 //SYSUT1   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA   
13 //SYSUT2   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA   
14 //SYSUT3   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA   
15 //SYSTERM  DD  SYSOUT=*   
16 //SYSPRINT DD  SYSOUT=*   
17 //SYSLIN   DD  DISP=SHR,DSN=IBMUSER.OBJECT(&M)
18 //SYSINDD  DISP=SHR,DSN=IBMUSER.FILE036(&M)   
 
And got this :
 
12.09.51 JOB00334  THURSDAY,  09 DEC 2010  
12.09.51 JOB00334  IRR010I  USERID IBMUSR3  IS ASSIGNED TO THIS JOB.   
12.09.51 JOB00334  ICH70001I IBMUSR3  LAST ACCESS AT 12:04:04 ON THURSDAY, DECE
12.09.51 JOB00334  $HASP373 TST2FIXP STARTED - INIT 1- CLASS A - SYS CPAC  
12.09.51 JOB00334  IEF403I TST2FIXP - STARTED - TIME=12.09.51  
12.09.51 JOB00334  IEC217I B14-10,IGG0201Z,TST2FIXP,ASM,SYSLIN,0122,D9ECAT,IBMU
12.09.51 JOB00334  IEA995I SYMPTOM DUMP OUTPUT  829
   829 SYSTEM COMPLETION CODE=B14  REASON CODE=0010
   829  TIME=12.09.51  SEQ=00032  CPU=  ASID=0023  
   829  PSW AT TIME OF ERROR  075C1000   80DE5CF6  ILC 2  INTC 0D  
   829NO ACTIVE MODULE FOUND   
   829NAME=UNKNOWN 
   829DATA AT PSW  00DE5CF0 - 41003846  0A0DB20A  00509808 
   829AR/GR 0: 880D5C66/00DE5F00   1: /A4B14000
   829  2: /64B0   3: /00DE56BA
   829  4: /008BBD60   5: /00DFC000
 .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  . 
 
Thanks again,
 
Sergio 
 
> Date: Wed, 8 Dec 2010 15:11:59 -0600
> From: hmerr...@jackhenry.com
> Subject: Re: Problem when try compile a CBT036 FILE
> To: IBM-MAIN@bama.ua.edu
> 
> Not sure, but part of the problem may be in the assembler step:
> 
> //SYSLIN DD DISP=SHR,DSN=IBMUSER.OBJECT 
> 
> Reallocate IBMUSER.OBJECT as a PDS and change the JCL to:
> 
> //SYSLIN DD DISP=OLD,DSN=IBMUSER.OBJECT(&M) 
> 
> 
> Another problem is that module ISPLINK is not in SYS1.LINKLIB. Specify the 
> correct library. 
> 
> HTH and good luck. 
> 
> 
> 
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf 
> Of Sergio Lima
> Sent: Wednesday, December 08, 2010 2:47 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Problem when try compile a CBT036 FILE
> 
> Hello List,
> 
> We try compile here, the CBT036 FILE (FIXPDS), and something wrong happen 
> here.
> 
> We got this jcl :
> 
> //TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440, 
> // MSGLEVEL=(1,1),MSGCLASS=T 
> //***// 
> //* INSTALL SPFPDS LOAD MODULE FOR FIXPDS *// 
> //***// 
> //FPDSASM PROC M= 
> //ASM EXEC PGM=ASMA90,REGION=3500K, (IBM ASSEMBLER H) 
> // PARM='DECK,RENT,NOLOAD' 
> //SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR SYSTEM MACRO LIBRARY 
> // DD DSN=SYS1.MODGEN,DISP=SHR SYSTEM MACRO LIBRARY 
> // DD DSN=IBMUSER.FILE036,DISP=SHR <== THIS LIBRARY 
> //SYSUT1 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> //SYSUT2 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> //SYSUT3 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> //SYSTERM DD SYSOUT=* 
> //SYSPRINT DD SYSOUT=* 
> //SYSLIN DD DISP=SHR,DSN=IBMUSER.OBJECT 
> //SYSIN DD DISP=SHR,DSN=IBMUSER.FILE036(&M) 
> //SYSPUNCH DD DSN=IBMUSER.FILE036(&M),DISP=OLD 
> //* 
> //PEND PEND 
> //* 
> //SPFCNTL EXEC FPDSASM,M=SPFCNTL 
> //SPFCORE EXEC FPDSASM,M=SPFCORE 
> /

Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Sergio Lima
Hello Lizette,
 
After change the ISPLIB to ISP.SISPLOAD, something change here, and now have a 
program in my load, look please :
 
EDIT  IBMUSER.LOAD  Row 1 of 1
Command ===>  Scroll ===> PAGE
   Name PromptAlias-of Size  TTR AC   AM   RM 
_ SPFPDS 01B8   07   0031  ANY
  **End** 
 
But, still have this error :
 
IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST   

IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY ENTRIES  
 FROM DDNAME SYSLIB.
IEW2650I 5102 MODULE ENTRY NOT PROVIDED.  ENTRY DEFAULTS TO SECTION ISPLINK.
IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  12. 
 
 
 
Thanks,
 
Sergio
 

 
> Date: Wed, 8 Dec 2010 16:04:26 -0500
> From: stars...@mindspring.com
> Subject: Re: Problem when try compile a CBT036 FILE
> To: IBM-MAIN@bama.ua.edu
> 
> Could you post the JOBLOG (Or the return codes for each step)?
> 
> One correction. Your ISPLIB should point to the library that contain ISPF 
> modules. Typically in SYS1.ISP.SISPLOAD 
> 
> Lizette
> 
> 
> > Sergio Lima Wrote
> >Hello List,
> > 
> >We try compile here, the CBT036 FILE (FIXPDS), and something wrong happen 
> >here.
> > 
> >We got this jcl :
> > 
> >//TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440, 
> >// MSGLEVEL=(1,1),MSGCLASS=T 
> >//***// 
> >//* INSTALL SPFPDS LOAD MODULE FOR FIXPDS *// 
> >//***// 
> >//FPDSASM PROC M= 
> >//ASM EXEC PGM=ASMA90,REGION=3500K, (IBM ASSEMBLER H) 
> >// PARM='DECK,RENT,NOLOAD' 
> >//SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR SYSTEM MACRO LIBRARY 
> >// DD DSN=SYS1.MODGEN,DISP=SHR SYSTEM MACRO LIBRARY 
> >// DD DSN=IBMUSER.FILE036,DISP=SHR <== THIS LIBRARY 
> >//SYSUT1 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> >//SYSUT2 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> >//SYSUT3 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> >//SYSTERM DD SYSOUT=* 
> >//SYSPRINT DD SYSOUT=* 
> >//SYSLIN DD DISP=SHR,DSN=IBMUSER.OBJECT 
> >//SYSIN DD DISP=SHR,DSN=IBMUSER.FILE036(&M) 
> >//SYSPUNCH DD DSN=IBMUSER.FILE036(&M),DISP=OLD 
> >//* 
> >//PEND PEND 
> >//* 
> >//SPFCNTL EXEC FPDSASM,M=SPFCNTL 
> >//SPFCORE EXEC FPDSASM,M=SPFCORE 
> >//SPFFIX EXEC FPDSASM,M=SPFFIX 
> >//SPFMAIN EXEC FPDSASM,M=SPFMAIN 
> >//SPFSCAN EXEC FPDSASM,M=SPFSCAN 
> >//SPFSRCH EXEC FPDSASM,M=SPFSRCH 
> >//* 
> >//LKED EXEC PGM=IEWL,PARM='TERM,XREF,LIST,LET,TEST', 
> >// COND=(7,LT) 
> >//SYSLMOD DD DSN=IBMUSER.LOAD,DISP=SHR 
> >//ISPLIB DD DSN=SYS1.LINKLIB,DISP=SHR 
> >//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(2,1)) 
> >//SYSTERM DD SYSOUT=* 
> >//SYSPRINT DD SYSOUT=* 
> >//SYSLIB DD DISP=SHR,DSN=IBMUSER.OBJECT 
> >//SYSLIN DD * 
> > INCLUDE SYSLIB(SPFCNTL) 
> > INCLUDE SYSLIB(SPFCORE) 
> > INCLUDE SYSLIB(SPFFIX) 
> > INCLUDE SYSLIB(SPFMAIN) 
> > INCLUDE SYSLIB(SPFSCAN) 
> > INCLUDE SYSLIB(SPFSRCH) 
> > INCLUDE ISPLIB(ISPLINK) 
> > SETCODE AC(0) 
> > NAME SPFPDS(R) 
> >/*
> > 
> >The SYSLIN STATEMENT before the PEND command was inserted here by us, 
> >because We imagine that this parameter was missing.
> > 
> >After try compile, receive the error below:
> > 
> >IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST 
> > 
> >IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY 
> >ENTRIES 
> > FROM DDNAME SYSLIB. 
> >IEW2303E 1030 MEMBER ISPLINK OF THE DATA SET SPECIFIED BY ISPLIB COULD NOT 
> >BE 
> > FOUND. 
> >IEW2230S 0414 MODULE HAS NO TEXT. 
> >IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED. 
> >IEW2008I 0F03 PROCESSING COMPLETED. RETURN CODE = 12. 
> > 
> >z/OS V1 R10 BINDER 18:38:44 WEDNESDAY DECEMBER 8, 2010 
> >BATCH EMULATOR JOB(TST2FIXP) STEP(LKED ) PGM= IEWL 
> >IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST 
> > 
> >IEW2322I 1220 1 INCLUDE SYSLIB(SPFCNTL) 
> >IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY 
> >ENTRIES F
> >IEW2322I 1220 2 INCLUDE SYSLIB(SPFCORE) 
> >IEW2322I 1220 3 INCLUDE SYSLIB(SPFFIX) 
> >IEW2322I 1220 4 INCLUDE SYSLIB(SPFMAIN) 
> &

Re: Problem when try compile a CBT036 FILE

2010-12-09 Thread Sergio Lima
0MIN 00.
 
 
Thanks .
 
Sergio
 
> Date: Wed, 8 Dec 2010 16:04:26 -0500
> From: stars...@mindspring.com
> Subject: Re: Problem when try compile a CBT036 FILE
> To: IBM-MAIN@bama.ua.edu
> 
> Could you post the JOBLOG (Or the return codes for each step)?
> 
> One correction. Your ISPLIB should point to the library that contain ISPF 
> modules. Typically in SYS1.ISP.SISPLOAD 
> 
> Lizette
> 
> 
> > Sergio Lima Wrote
> >Hello List,
> > 
> >We try compile here, the CBT036 FILE (FIXPDS), and something wrong happen 
> >here.
> > 
> >We got this jcl :
> > 
> >//TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440, 
> >// MSGLEVEL=(1,1),MSGCLASS=T 
> >//***// 
> >//* INSTALL SPFPDS LOAD MODULE FOR FIXPDS *// 
> >//***// 
> >//FPDSASM PROC M= 
> >//ASM EXEC PGM=ASMA90,REGION=3500K, (IBM ASSEMBLER H) 
> >// PARM='DECK,RENT,NOLOAD' 
> >//SYSLIB DD DSN=SYS1.MACLIB,DISP=SHR SYSTEM MACRO LIBRARY 
> >// DD DSN=SYS1.MODGEN,DISP=SHR SYSTEM MACRO LIBRARY 
> >// DD DSN=IBMUSER.FILE036,DISP=SHR <== THIS LIBRARY 
> >//SYSUT1 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> >//SYSUT2 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> >//SYSUT3 DD SPACE=(CYL,(5,5)),UNIT=SYSDA 
> >//SYSTERM DD SYSOUT=* 
> >//SYSPRINT DD SYSOUT=* 
> >//SYSLIN DD DISP=SHR,DSN=IBMUSER.OBJECT 
> >//SYSIN DD DISP=SHR,DSN=IBMUSER.FILE036(&M) 
> >//SYSPUNCH DD DSN=IBMUSER.FILE036(&M),DISP=OLD 
> >//* 
> >//PEND PEND 
> >//* 
> >//SPFCNTL EXEC FPDSASM,M=SPFCNTL 
> >//SPFCORE EXEC FPDSASM,M=SPFCORE 
> >//SPFFIX EXEC FPDSASM,M=SPFFIX 
> >//SPFMAIN EXEC FPDSASM,M=SPFMAIN 
> >//SPFSCAN EXEC FPDSASM,M=SPFSCAN 
> >//SPFSRCH EXEC FPDSASM,M=SPFSRCH 
> >//* 
> >//LKED EXEC PGM=IEWL,PARM='TERM,XREF,LIST,LET,TEST', 
> >// COND=(7,LT) 
> >//SYSLMOD DD DSN=IBMUSER.LOAD,DISP=SHR 
> >//ISPLIB DD DSN=SYS1.LINKLIB,DISP=SHR 
> >//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(2,1)) 
> >//SYSTERM DD SYSOUT=* 
> >//SYSPRINT DD SYSOUT=* 
> >//SYSLIB DD DISP=SHR,DSN=IBMUSER.OBJECT 
> >//SYSLIN DD * 
> > INCLUDE SYSLIB(SPFCNTL) 
> > INCLUDE SYSLIB(SPFCORE) 
> > INCLUDE SYSLIB(SPFFIX) 
> > INCLUDE SYSLIB(SPFMAIN) 
> > INCLUDE SYSLIB(SPFSCAN) 
> > INCLUDE SYSLIB(SPFSRCH) 
> > INCLUDE ISPLIB(ISPLINK) 
> > SETCODE AC(0) 
> > NAME SPFPDS(R) 
> >/*
> > 
> >The SYSLIN STATEMENT before the PEND command was inserted here by us, 
> >because We imagine that this parameter was missing.
> > 
> >After try compile, receive the error below:
> > 
> >IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST 
> > 
> >IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY 
> >ENTRIES 
> > FROM DDNAME SYSLIB. 
> >IEW2303E 1030 MEMBER ISPLINK OF THE DATA SET SPECIFIED BY ISPLIB COULD NOT 
> >BE 
> > FOUND. 
> >IEW2230S 0414 MODULE HAS NO TEXT. 
> >IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED. 
> >IEW2008I 0F03 PROCESSING COMPLETED. RETURN CODE = 12. 
> > 
> >z/OS V1 R10 BINDER 18:38:44 WEDNESDAY DECEMBER 8, 2010 
> >BATCH EMULATOR JOB(TST2FIXP) STEP(LKED ) PGM= IEWL 
> >IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST 
> > 
> >IEW2322I 1220 1 INCLUDE SYSLIB(SPFCNTL) 
> >IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY 
> >ENTRIES F
> >IEW2322I 1220 2 INCLUDE SYSLIB(SPFCORE) 
> >IEW2322I 1220 3 INCLUDE SYSLIB(SPFFIX) 
> >IEW2322I 1220 4 INCLUDE SYSLIB(SPFMAIN) 
> >IEW2322I 1220 5 INCLUDE SYSLIB(SPFSCAN) 
> >IEW2322I 1220 6 INCLUDE SYSLIB(SPFSRCH) 
> >IEW2322I 1220 7 INCLUDE ISPLIB(ISPLINK) 
> >IEW2303E 1030 MEMBER ISPLINK OF THE DATA SET SPECIFIED BY ISPLIB COULD NOT 
> >BE FO
> >IEW2322I 1220 8 SETCODE AC(0) 
> >IEW2322I 1220 9 NAME SPFPDS(R) 
> >IEW2230S 0414 MODULE HAS NO TEXT. 
> >IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED. 
> >IEW2008I 0F03 PROCESSING COMPLETED. RETURN CODE = 12. 
> > 
> > 
> >We have no much experience, because here start a migration from Z/VSE to 
> >Z/OS.
> > 
> >Someone can help us please ?
> > 
> >Thanks very much,
> > 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
  
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-08 Thread Rick Fochtman
Lizette, you should look more carefully at the JCL. It replaces the 
source member with the object of the same name. :-) I've also replied to 
his original post.


Rick
-
Lizette Koehler wrote:


Could you post the JOBLOG (Or the return codes for each step)?

One correction.  Your ISPLIB should point to the library that contain ISPF modules.  Typically in SYS1.ISP.SISPLOAD 


Lizette


 


Sergio Lima  Wrote
Hello List,

We try compile here, the CBT036 FILE (FIXPDS), and something wrong happen here.

We got this jcl :

//TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440,   
//MSGLEVEL=(1,1),MSGCLASS=T
//***//
//*   INSTALL SPFPDS LOAD MODULE FOR FIXPDS *//
//***//
//FPDSASM PROC M=  
//ASMEXEC  PGM=ASMA90,REGION=3500K,  (IBM ASSEMBLER H) 
// PARM='DECK,RENT,NOLOAD' 
//SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR   SYSTEM MACRO LIBRARY 
// DD  DSN=SYS1.MODGEN,DISP=SHR  SYSTEM MACRO LIBRARY  
// DD  DSN=IBMUSER.FILE036,DISP=SHR  <== THIS LIBRARY  
//SYSUT1   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSUT2   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSUT3   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSTERM  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSLIN   DD  DISP=SHR,DSN=IBMUSER.OBJECT 
//SYSINDD  DISP=SHR,DSN=IBMUSER.FILE036(&M)
//SYSPUNCH DD  DSN=IBMUSER.FILE036(&M),DISP=OLD 
//* 
//PEND   PEND   
//* 
//SPFCNTL  EXEC FPDSASM,M=SPFCNTL   
//SPFCORE  EXEC FPDSASM,M=SPFCORE   
//SPFFIX   EXEC FPDSASM,M=SPFFIX
//SPFMAIN  EXEC FPDSASM,M=SPFMAIN   
//SPFSCAN  EXEC FPDSASM,M=SPFSCAN   
//SPFSRCH  EXEC FPDSASM,M=SPFSRCH   
//* 
//LKED   EXEC  PGM=IEWL,PARM='TERM,XREF,LIST,LET,TEST', 
// COND=(7,LT)  
//SYSLMOD  DD  DSN=IBMUSER.LOAD,DISP=SHR
//ISPLIB   DD  DSN=SYS1.LINKLIB,DISP=SHR
//SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(2,1)) 
//SYSTERM  DD  SYSOUT=* 
//SYSPRINT DD  SYSOUT=* 
//SYSLIB   DD  DISP=SHR,DSN=IBMUSER.OBJECT  
//SYSLIN   DD  * 
INCLUDE SYSLIB(SPFCNTL) 
INCLUDE SYSLIB(SPFCORE) 
INCLUDE SYSLIB(SPFFIX)  
INCLUDE SYSLIB(SPFMAIN) 
INCLUDE SYSLIB(SPFSCAN) 
INCLUDE SYSLIB(SPFSRCH) 
INCLUDE ISPLIB(ISPLINK) 
SETCODE AC(0)   
NAME SPFPDS(R)  
/*


The SYSLIN STATEMENT before the PEND command was inserted here by us, because 
We imagine that this parameter was missing.

After try compile, receive the error below:

IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST   
  
IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY ENTRIES  
   FROM DDNAME SYSLIB.
IEW2303E 1030 MEMBER ISPLINK OF THE DATA SET SPECIFIED BY ISPLIB COULD NOT BE   
   FOUND. 
IEW2230S 0414 MODULE HAS NO TEXT.   
IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED.  
IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  12. 

z/OS V1 R10 BINDER 18:38:44 WEDNESDAY DECEMBER  8, 2010 
BATCH EMULATOR  JOB(TST2FIXP) STEP(LKED) PGM= IEWL  
IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST   
  
IEW2322I 1220  1INCLUDE SYSLIB(SPFCNTL) 
IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY ENTRIES F
IEW2322I 1220  2INCLUDE SYSLIB(SPFCORE) 
IEW2322I 1220  3INCLUDE SYSLIB(SPFFIX)  
IEW2322I 1220  4INCLUDE SYSLIB(SPFMAIN) 
IEW2322I 1220  5INCLUDE SYSLIB(SPFSCAN)

Re: Problem when try compile a CBT036 FILE

2010-12-08 Thread Rick Fochtman
Sergio, the SYSLIN statement you added serves no purpose and should be 
deleted.


Point the SYSPUNCH DD at a newly-created card-image PDS 
(RECFM=FB,LRECL=80,BLKSIZE=0), SPACE=(TRK,(15,15,15))


Also point your LKED SYSLIB statement at this same PDS. Using the TEST 
option on the LKED parm also serves no purpose here. Take a look at what 
I added/changed in your JCL.


Is LMOD ISPLINK in your SYS1.LINKLIB ?? If not, you'll have to locate it 
and adjust the DSNAME in the LKED step. SMP/E can tell you where the 
ISPLINK module actually resides.


Rick

Sergio Lima wrote:


Hello List,

We try compile here, the CBT036 FILE (FIXPDS), and something wrong happen here.

We got this jcl :

//TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440,   
//MSGLEVEL=(1,1),MSGCLASS=T
//***//
//*   INSTALL SPFPDS LOAD MODULE FOR FIXPDS *//
//***//
//FPDSASM PROC M=  
//ASMEXEC  PGM=ASMA90,REGION=3500K,  (IBM ASSEMBLER H) 
// PARM='DECK,RENT,NOLOAD' 
//SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR   SYSTEM MACRO LIBRARY 
// DD  DSN=SYS1.MODGEN,DISP=SHR  SYSTEM MACRO LIBRARY  
// DD  DSN=IBMUSER.FILE036,DISP=SHR  <== THIS LIBRARY  
//SYSUT1   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSUT2   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSUT3   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSTERM  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSLIN   DD  DISP=SHR,DSN=IBMUSER.OBJECT 
//SYSINDD  DISP=SHR,DSN=IBMUSER.FILE036(&M)
//SYSPUNCH DD  DSN=USER.OBJECT(&M),DISP=OLD <--- note dsn change 
//* 
//PEND   PEND



Insert:
//OBJFILE  DD  DSN=USER.OBJECT,DISP=(,CATLG),UNIT=SYSDA,
//SPACE=(trk,(15,15,15)),RECFM=FB,LRECL=80,BLKSIZE=0,DSORG=PO

  
//* 
//SPFCNTL  EXEC FPDSASM,M=SPFCNTL   
//SPFCORE  EXEC FPDSASM,M=SPFCORE   
//SPFFIX   EXEC FPDSASM,M=SPFFIX
//SPFMAIN  EXEC FPDSASM,M=SPFMAIN   
//SPFSCAN  EXEC FPDSASM,M=SPFSCAN   
//SPFSRCH  EXEC FPDSASM,M=SPFSRCH   
//* 
//LKED   EXEC  PGM=IEWL,PARM='TERM,XREF,LIST,LET,TEST', 
// COND=(7,LT)  
//SYSLMOD  DD  DSN=IBMUSER.LOAD,DISP=SHR
//ISPLIB   DD  DSN=SYS1.LINKLIB,DISP=SHR
//SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(2,1)) 
//SYSTERM  DD  SYSOUT=* 
//SYSPRINT DD  SYSOUT=* 
//SYSLIB   DD  DISP=SHR,DSN=USER.OBJECT  
//SYSLIN   DD  * 
INCLUDE SYSLIB(SPFCNTL) 
INCLUDE SYSLIB(SPFCORE) 
INCLUDE SYSLIB(SPFFIX)  
INCLUDE SYSLIB(SPFMAIN) 
INCLUDE SYSLIB(SPFSCAN) 
INCLUDE SYSLIB(SPFSRCH) 
INCLUDE ISPLIB(ISPLINK) 
SETCODE AC(0)   
NAME SPFPDS(R)  
/*


The SYSLIN STATEMENT before the PEND command was inserted here by us, because 
We imagine that this parameter was missing.

After try compile, receive the error below:

IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST   
   
IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY ENTRIES  
FROM DDNAME SYSLIB.
IEW2303E 1030 MEMBER ISPLINK OF THE DATA SET SPECIFIED BY ISPLIB COULD NOT BE   
FOUND. 
IEW2230S 0414 MODULE HAS NO TEXT.   
IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED.  
IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  12. 

z/OS V1 R10 BINDER 18:38:44 WEDNESDAY DECEMBER  8, 2010 
BATCH EMULATOR  JOB(TST2FIXP) STEP(LKED) PGM= IEWL  
IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST   
   
IEW2322I 1220  1INCLUDE SYSLIB(SPFCNTL) 
IEW2801S D41C AN I/O ERROR OCCURRED

Re: Problem when try compile a CBT036 FILE

2010-12-08 Thread Pommier, Rex R.
Doesn't he need to actually allocate IBMUSER.OBJECT as a PDS (FB80) and point 
the assemble proc to

//SYSPUNCH DD DSN=IBMUSER.OBJECT(&M),DISP=SHR   instead of FILE036?  Then the 
linkedit step could find the object code.  He is putting the output of the 
assemble step back into IBMUSER.FILE036 then trying to locate it for the link 
in IBMUSER.OBJECT.


Another option would be to change the LKED step to point SYSLIB to 
IBMUSER.FILE036 instead of IBMUSER.OBJECT.



-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Scott Rowe
Sent: Wednesday, December 08, 2010 4:07 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Problem when try compile a CBT036 FILE

The PARMs for the ASM step specify DECK and NOLOAD, so the object output is
going to SYSPUNCH, not SYSLIN.


The information contained in this e-mail may contain confidential and/or 
privileged information and is intended for the sole use of the intended 
recipient. If you are not the intended recipient, you are hereby notified that 
any unauthorized use, disclosure, distribution or copying of this communication 
is strictly prohibited. If you received this e-mail in error, please reply to 
sender and destroy or delete the message and any attachments. Thank you.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-08 Thread Scott Rowe
The PARMs for the ASM step specify DECK and NOLOAD, so the object output is
going to SYSPUNCH, not SYSLIN.

CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains
confidential and privileged information intended only for the addressee.
If you are not the intended recipient, please be advised that you have
received this material in error and that any forwarding, copying, printing,
distribution, use or disclosure of the material is strictly prohibited.
If you have received this material in error, please (i) do not read it,
(ii) reply to the sender that you received the message in error, and
(iii) erase or destroy the material. Emails are not secure and can be
intercepted, amended, lost or destroyed, or contain viruses. You are deemed
to have accepted these risks if you communicate with us by email. Thank you.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Problem when try compile a CBT036 FILE

2010-12-08 Thread Binyamin Dissen
On Wed, 8 Dec 2010 23:46:50 +0300 Sergio Lima  wrote:

:>We try compile here, the CBT036 FILE (FIXPDS), and something wrong happen 
here.
 
:>We got this jcl :
 
:>//TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440,   
:>//MSGLEVEL=(1,1),MSGCLASS=T
:>//***//
:>//*   INSTALL SPFPDS LOAD MODULE FOR FIXPDS *//
:>//***//
:>//FPDSASM PROC M=  
:>//ASMEXEC  PGM=ASMA90,REGION=3500K,  (IBM ASSEMBLER H) 
:>// PARM='DECK,RENT,NOLOAD' 
:>//SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR   SYSTEM MACRO LIBRARY 
:>// DD  DSN=SYS1.MODGEN,DISP=SHR  SYSTEM MACRO LIBRARY  
:>// DD  DSN=IBMUSER.FILE036,DISP=SHR  <== THIS LIBRARY  
:>//SYSUT1   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
:>//SYSUT2   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
:>//SYSUT3   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
:>//SYSTERM  DD  SYSOUT=*
:>//SYSPRINT DD  SYSOUT=*
:>//SYSLIN   DD  DISP=SHR,DSN=IBMUSER.OBJECT

(&M)
 
:>//SYSINDD  DISP=SHR,DSN=IBMUSER.FILE036(&M)
:>//SYSPUNCH DD  DSN=IBMUSER.FILE036(&M),DISP=OLD 
:>//* 
:>//PEND   PEND   
:>//* 
:>//SPFCNTL  EXEC FPDSASM,M=SPFCNTL   
:>//SPFCORE  EXEC FPDSASM,M=SPFCORE   
:>//SPFFIX   EXEC FPDSASM,M=SPFFIX
:>//SPFMAIN  EXEC FPDSASM,M=SPFMAIN   
:>//SPFSCAN  EXEC FPDSASM,M=SPFSCAN   
:>//SPFSRCH  EXEC FPDSASM,M=SPFSRCH   
:>//* 
:>//LKED   EXEC  PGM=IEWL,PARM='TERM,XREF,LIST,LET,TEST', 
:>// COND=(7,LT)  
:>//SYSLMOD  DD  DSN=IBMUSER.LOAD,DISP=SHR
:>//ISPLIB   DD  DSN=SYS1.LINKLIB,DISP=SHR
:>//SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(2,1)) 
:>//SYSTERM  DD  SYSOUT=* 
:>//SYSPRINT DD  SYSOUT=* 
:>//SYSLIB   DD  DISP=SHR,DSN=IBMUSER.OBJECT  
:>//SYSLIN   DD  * 
:> INCLUDE SYSLIB(SPFCNTL) 
:> INCLUDE SYSLIB(SPFCORE) 
:> INCLUDE SYSLIB(SPFFIX)  
:> INCLUDE SYSLIB(SPFMAIN) 
:> INCLUDE SYSLIB(SPFSCAN) 
:> INCLUDE SYSLIB(SPFSRCH) 
:> INCLUDE ISPLIB(ISPLINK) 
:> SETCODE AC(0)   
:> NAME SPFPDS(R)  
:>/*
:> 
:>The SYSLIN STATEMENT before the PEND command was inserted here by us, because 
We imagine that this parameter was missing.
:> 
:>After try compile, receive the error below:
:> 
:>IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST 
  
:>  
  
:>IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY 
ENTRIES  
:> FROM DDNAME SYSLIB.  
  
:>IEW2303E 1030 MEMBER ISPLINK OF THE DATA SET SPECIFIED BY ISPLIB COULD NOT BE 
  
:> FOUND.   
  
:>IEW2230S 0414 MODULE HAS NO TEXT. 
  
:>IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED.
  
:>IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  12.   
  
:> 
:>z/OS V1 R10 BINDER 18:38:44 WEDNESDAY DECEMBER  8, 2010   
  
:>BATCH EMULATOR  JOB(TST2FIXP) STEP(LKED) PGM= IEWL
  
:>IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST 
  
:>  
  
:>IEW2322I 1220  1INCLUDE SYSLIB(SPFCNTL)   
  
:>IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY 
ENTRIES F
:>IEW2322I 1220  2INCLUDE SYSLIB(SPFCORE)   
  
:>IEW2322I 1220  3INCLUDE SYSLIB(SPFFIX)
  
:>IEW2322I 1220  4INCLUDE SYSLIB(SPFMAIN)   
  
:>IEW2322I 1220  5INCLUDE SYSLIB(SPFSCAN)   
  
:>IEW2322I 1220  6INCLUDE SYSLIB(SPFSRCH)   
  
:>IEW2322I 1220  7INCLUDE ISPLIB(ISPLINK)

Re: Problem when try compile a CBT036 FILE

2010-12-08 Thread Hal Merritt
Not sure, but part of the problem may be in the assembler step:

//SYSLIN   DD  DISP=SHR,DSN=IBMUSER.OBJECT   

Reallocate IBMUSER.OBJECT as a PDS and change the JCL to:

//SYSLIN   DD  DISP=OLD,DSN=IBMUSER.OBJECT(&M)


Another problem is that module ISPLINK is not in SYS1.LINKLIB. Specify the 
correct library.

HTH and good luck. 


 


-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Sergio Lima
Sent: Wednesday, December 08, 2010 2:47 PM
To: IBM-MAIN@bama.ua.edu
Subject: Problem when try compile a CBT036 FILE

Hello List,
 
We try compile here, the CBT036 FILE (FIXPDS), and something wrong happen here.
 
We got this jcl :
 
//TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440,   
//MSGLEVEL=(1,1),MSGCLASS=T
//***//
//*   INSTALL SPFPDS LOAD MODULE FOR FIXPDS *//
//***//
//FPDSASM PROC M=  
//ASMEXEC  PGM=ASMA90,REGION=3500K,  (IBM ASSEMBLER H) 
// PARM='DECK,RENT,NOLOAD' 
//SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR   SYSTEM MACRO LIBRARY 
// DD  DSN=SYS1.MODGEN,DISP=SHR  SYSTEM MACRO LIBRARY  
// DD  DSN=IBMUSER.FILE036,DISP=SHR  <== THIS LIBRARY  
//SYSUT1   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSUT2   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSUT3   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
//SYSTERM  DD  SYSOUT=*
//SYSPRINT DD  SYSOUT=*
//SYSLIN   DD  DISP=SHR,DSN=IBMUSER.OBJECT 
//SYSINDD  DISP=SHR,DSN=IBMUSER.FILE036(&M)
//SYSPUNCH DD  DSN=IBMUSER.FILE036(&M),DISP=OLD 
//* 
//PEND   PEND   
//* 
//SPFCNTL  EXEC FPDSASM,M=SPFCNTL   
//SPFCORE  EXEC FPDSASM,M=SPFCORE   
//SPFFIX   EXEC FPDSASM,M=SPFFIX
//SPFMAIN  EXEC FPDSASM,M=SPFMAIN   
//SPFSCAN  EXEC FPDSASM,M=SPFSCAN   
//SPFSRCH  EXEC FPDSASM,M=SPFSRCH   
//* 
//LKED   EXEC  PGM=IEWL,PARM='TERM,XREF,LIST,LET,TEST', 
// COND=(7,LT)  
//SYSLMOD  DD  DSN=IBMUSER.LOAD,DISP=SHR
//ISPLIB   DD  DSN=SYS1.LINKLIB,DISP=SHR
//SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(2,1)) 
//SYSTERM  DD  SYSOUT=* 
//SYSPRINT DD  SYSOUT=* 
//SYSLIB   DD  DISP=SHR,DSN=IBMUSER.OBJECT  
//SYSLIN   DD  * 
 INCLUDE SYSLIB(SPFCNTL) 
 INCLUDE SYSLIB(SPFCORE) 
 INCLUDE SYSLIB(SPFFIX)  
 INCLUDE SYSLIB(SPFMAIN) 
 INCLUDE SYSLIB(SPFSCAN) 
 INCLUDE SYSLIB(SPFSRCH) 
 INCLUDE ISPLIB(ISPLINK) 
 SETCODE AC(0)   
 NAME SPFPDS(R)  
/*
 
The SYSLIN STATEMENT before the PEND command was inserted here by us, because 
We imagine that this parameter was missing.
 
After try compile, receive the error below:
 
IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST   

IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY ENTRIES  
 FROM DDNAME SYSLIB.
IEW2303E 1030 MEMBER ISPLINK OF THE DATA SET SPECIFIED BY ISPLIB COULD NOT BE   
 FOUND. 
IEW2230S 0414 MODULE HAS NO TEXT.   
IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED.  
IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  12. 
 
z/OS V1 R10 BINDER 18:38:44 WEDNESDAY DECEMBER  8, 2010 
BATCH EMULATOR  JOB(TST2FIXP) STEP(LKED) PGM= IEWL  
IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST   

IEW2322I 1220  1INCLUDE SYSLIB(SPFCNTL) 
IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY ENTRIES F
IEW2322I 1220  2INCLUDE SYSLIB(SPFCORE) 
IEW2322I 1220  3IN

Re: Problem when try compile a CBT036 FILE

2010-12-08 Thread Lizette Koehler
Could you post the JOBLOG (Or the return codes for each step)?

One correction.  Your ISPLIB should point to the library that contain ISPF 
modules.  Typically in SYS1.ISP.SISPLOAD 

Lizette


> Sergio Lima  Wrote
>Hello List,
> 
>We try compile here, the CBT036 FILE (FIXPDS), and something wrong happen here.
> 
>We got this jcl :
> 
>//TST2FIXP JOB ,'TECH.SUPPORT',CLASS=A,NOTIFY=&SYSUID,TIME=1440,   
>//MSGLEVEL=(1,1),MSGCLASS=T
>//***//
>//*   INSTALL SPFPDS LOAD MODULE FOR FIXPDS *//
>//***//
>//FPDSASM PROC M=  
>//ASMEXEC  PGM=ASMA90,REGION=3500K,  (IBM ASSEMBLER H) 
>// PARM='DECK,RENT,NOLOAD' 
>//SYSLIB   DD  DSN=SYS1.MACLIB,DISP=SHR   SYSTEM MACRO LIBRARY 
>// DD  DSN=SYS1.MODGEN,DISP=SHR  SYSTEM MACRO LIBRARY  
>// DD  DSN=IBMUSER.FILE036,DISP=SHR  <== THIS LIBRARY  
>//SYSUT1   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
>//SYSUT2   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
>//SYSUT3   DD  SPACE=(CYL,(5,5)),UNIT=SYSDA
>//SYSTERM  DD  SYSOUT=*
>//SYSPRINT DD  SYSOUT=*
>//SYSLIN   DD  DISP=SHR,DSN=IBMUSER.OBJECT 
>//SYSINDD  DISP=SHR,DSN=IBMUSER.FILE036(&M)
>//SYSPUNCH DD  DSN=IBMUSER.FILE036(&M),DISP=OLD 
>//* 
>//PEND   PEND   
>//* 
>//SPFCNTL  EXEC FPDSASM,M=SPFCNTL   
>//SPFCORE  EXEC FPDSASM,M=SPFCORE   
>//SPFFIX   EXEC FPDSASM,M=SPFFIX
>//SPFMAIN  EXEC FPDSASM,M=SPFMAIN   
>//SPFSCAN  EXEC FPDSASM,M=SPFSCAN   
>//SPFSRCH  EXEC FPDSASM,M=SPFSRCH   
>//* 
>//LKED   EXEC  PGM=IEWL,PARM='TERM,XREF,LIST,LET,TEST', 
>// COND=(7,LT)  
>//SYSLMOD  DD  DSN=IBMUSER.LOAD,DISP=SHR
>//ISPLIB   DD  DSN=SYS1.LINKLIB,DISP=SHR
>//SYSUT1   DD  UNIT=SYSDA,SPACE=(CYL,(2,1)) 
>//SYSTERM  DD  SYSOUT=* 
>//SYSPRINT DD  SYSOUT=* 
>//SYSLIB   DD  DISP=SHR,DSN=IBMUSER.OBJECT  
>//SYSLIN   DD  * 
> INCLUDE SYSLIB(SPFCNTL) 
> INCLUDE SYSLIB(SPFCORE) 
> INCLUDE SYSLIB(SPFFIX)  
> INCLUDE SYSLIB(SPFMAIN) 
> INCLUDE SYSLIB(SPFSCAN) 
> INCLUDE SYSLIB(SPFSRCH) 
> INCLUDE ISPLIB(ISPLINK) 
> SETCODE AC(0)   
> NAME SPFPDS(R)  
>/*
> 
>The SYSLIN STATEMENT before the PEND command was inserted here by us, because 
>We imagine that this parameter was missing.
> 
>After try compile, receive the error below:
> 
>IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST  
> 
>   
>  
>IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY ENTRIES 
> 
> FROM DDNAME SYSLIB.   
>  
>IEW2303E 1030 MEMBER ISPLINK OF THE DATA SET SPECIFIED BY ISPLIB COULD NOT BE  
> 
> FOUND.
>  
>IEW2230S 0414 MODULE HAS NO TEXT.  
> 
>IEW2677S 5130 A VALID ENTRY POINT COULD NOT BE DETERMINED. 
> 
>IEW2008I 0F03 PROCESSING COMPLETED.  RETURN CODE =  12.
> 
> 
>z/OS V1 R10 BINDER 18:38:44 WEDNESDAY DECEMBER  8, 2010
> 
>BATCH EMULATOR  JOB(TST2FIXP) STEP(LKED) PGM= IEWL 
> 
>IEW2278I B352 INVOCATION PARAMETERS - TERM,XREF,LIST,LET,TEST  
> 
>   
>  
>IEW2322I 1220  1INCLUDE SYSLIB(SPFCNTL)
> 
>IEW2801S D41C AN I/O ERROR OCCURRED WHILE ATTEMPTING TO READ DIRECTORY ENTRIES 
>F
>IEW2322I 1220  2INCLUDE SYSLIB(SPFCORE)
> 
>IEW2322I 1220  3INCLUDE SYSLIB(SPFFIX) 
> 
>IEW2322I 1220  4INCLUDE SYSLIB(SPFMAIN)
> 
>IEW2322I 1220  5INCLUDE SYSLIB(SPFSCAN)
> 
>IEW2322I 1220  6INCLUDE SYSLIB(SPFSRCH)