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 

Problem with disp parameter

 
Post new topic   Reply to topic   printer-friendly view    MVSFORUMS.com Forum Index -> Utilities
View previous topic :: View next topic  
Author Message
sonika2008
Beginner


Joined: 17 Aug 2007
Posts: 20
Topics: 9
PostPosted: Fri Sep 28, 2007 10:06 am    Post subject: Problem with disp parameter Reply with quote
hi ,
this is my JCL
Code:

//STEP02A EXEC PGM=M2806LTX                                             
//STEPLIB  DD DSN=ENDH2.H06PCCLM.SBATLOAD,DISP=SHR                     
//         DD DSN=SYS1.LE.SCEERUN,DISP=SHR                             
//         DD DSN=SYS2.COBLIB,DISP=SHR                                 
//SYSOUT   DD SYSOUT=*                                                 
//CEEDUMP  DD SYSOUT=*                                                 
//SYSTSPRT DD SYSOUT=*                                                 
//SYSUDUMP DD SYSOUT=D                                                 
//CLMFILE  DD DSN=T6201BTX.T6201.C2806.CLAIMS.DATA,DISP=SHR             
//FILEIN   DD DSN=P2806BTX.P2806H2.K2806DB2.SORTOUT7(+1),DISP=SHR       
//FILEOUT  DD DSN=P2806BTX.P2806H2.K2806DBA.FILEOUT7(+1),               
//*        DISP=SHR                                                     
//         DISP=(NEW,CATLG),                                           
//         UNIT=(TAP5,,DEFER),                                         
//         VOL=(,,,99),LABEL=RETPD=1,                                   
//         DCB=(SYS2.GDG,DSORG=PS,RECFM=FB,LRECL=3852,BLKSIZE=26964)   

//SORT2A   EXEC  PGM=SYNCSORT,                                         
//         PARM='MSG=AP,DYNALLOC=(SYSDA,150)'                           
//*                                                                     
//SORTIN  DD  DSN=P2806BTX.P2806H2.K2806DBA.FILEOUT7(+1),DISP=SHR       
//*                                             
//*                                                                     
//SORTOUT  DD DSN=P2806BTX.P2806H2.K2806DBA.OUTPUT1(+1),               
//            DISP=(NEW,CATLG),                                         
//            UNIT=(TAP5,,DEFER),VOL=(,,,99),LABEL=RETPD=5,             
//            DCB=(SYS2.GDG,DSORG=PS,RECFM=FB,LRECL=3852,BLKSIZE=26964)
//SYSIN   DD DSN=T6201BTX.T6201.SAS.CNTL(P2806222),DISP=SHR             
//*ORT FIELDS=(3,7,CH,A,10,3,CH,A,13,26,CH,A,39,2,CH,A,41,1,CH,A)       
//*                                                                     
//SYSOUT    DD SYSOUT=*                                                 
//SYSUDUMP  DD SYSOUT=D                                                 
  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .  .

when I am executing this JCl , its giving me JCL error
"SORTIN - DISP FIELD INCOMPATIBLE WITH DSNAME "
I have tried with differnet combination of disp parameter, still getting the same eroor.

Any help appreciated in resolving this..

Thanks
Back to top
View user's profile Send private message
Bill Dennis
Advanced


Joined: 03 Dec 2002
Posts: 579
Topics: 1
Location: Iowa, USA
PostPosted: Fri Sep 28, 2007 10:11 am    Post subject: Reply with quote
Are you step restarting in SORT2A ? On a restart, the (+1) generation becomes (0).
_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.
Back to top
View user's profile Send private message
sonika2008
Beginner


Joined: 17 Aug 2007
Posts: 20
Topics: 9
PostPosted: Fri Sep 28, 2007 10:24 am    Post subject: Reply with quote
no , I am not restarting, these steps are in one PROC in sequence.
Back to top
View user's profile Send private message
jsharon1248
Intermediate


Joined: 08 Aug 2007
Posts: 291
Topics: 2
Location: Chicago
PostPosted: Fri Sep 28, 2007 11:21 am    Post subject: Reply with quote
The syntax is fine. Have you verified that STEP02A executed? If it did execute, were there any records written to that file? It's been a while since I worked with TAPE, but I'm wondering if you actually catalog the dataset when you code DEFER and don't open the file. Found these notes in the JCL Reference:
Code:

DEFER when Data Set is Never Opened: If you request deferred mounting of a volume and the data set on that volume is never opened by the processing program, the volume is never mounted during the job step.

Code:

An unopened tape data set is cataloged, unless the volume request is nonspecific or unless the data set is allocated to a dual-density tape drive but no density is specified. A nonspecific volume request is a DD statement for a new data set that can be assigned to any volume or volumes.
Back to top
View user's profile Send private message
sonika2008
Beginner


Joined: 17 Aug 2007
Posts: 20
Topics: 9
PostPosted: Mon Oct 01, 2007 12:49 pm    Post subject: Reply with quote
the file in the previous step is not created.what should I use in UNIT parameter instead of UNIT=TAP5,,DEFER)? so that i will not get the error for disp parameter mismatch
Back to top
View user's profile Send private message
jsharon1248
Intermediate


Joined: 08 Aug 2007
Posts: 291
Topics: 2
Location: Chicago
PostPosted: Mon Oct 01, 2007 1:42 pm    Post subject: Reply with quote
I guess you have a few options here.

1) Modify the M2806LTX program to set the return code to a non-zero value when the output file is not opened, and then bypass step SORT2A when step STEP02A issues that return code.
2) Modify M2806LTX to always open the file even if no records are written.
3) Pre-allocate the tape dataset with an IEBGENER step prior to STEP02A and change the DISP of the FILEOUT DD to OLD.
Back to top
View user's profile Send private message
Bill Dennis
Advanced


Joined: 03 Dec 2002
Posts: 579
Topics: 1
Location: Iowa, USA
PostPosted: Mon Oct 01, 2007 1:49 pm    Post subject: Reply with quote
You can code UNIT=TAP5 without DEFER but you may still have problems if the file is not OPENED/CLOSED by the program.

Another option is to create an empty dataset(+1),DISP=(,PASS) on tape in a prior step (maybe a SORT with SORTIN DD DUMMY) Then use it as dataset(+1),DISP=(OLD,CATLG) in STEP02A. You'll be assured of a file for step SORT2A.
_________________
Regards,
Bill Dennis

Disclaimer: My comments on this foorum are my own and do not represent the opinions or suggestions of any other person or business entity.
Back to top
View user's profile Send private message
Anuj Dhawan
Intermediate


Joined: 19 Jul 2007
Posts: 298
Topics: 7
Location: Mumbai,India
PostPosted: Thu Oct 04, 2007 4:17 am    Post subject: Reply with quote
Hi,

Quote:
"SORTIN - DISP FIELD INCOMPATIBLE WITH DSNAME "

I think, according to above, the DCB parameters of SORTIN & SORTOUT are not in sync. What are the DCB of SORTIN here?
_________________
Regards,
Anuj
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 -> Utilities 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