Hi Rex,
   
  I tried your suggestion and received an error.  Below is the Jcl and 
error message I received.  Can you please spot my error.  This is 
driving me mad, and I cannot seem to find this simple error.  Maybe a fresh 
pair of eyes will spot my mistake.  Thanks for your help.  
   
  JCL:
   
  //DASD     DD UNIT=SYSALLDA,VOL=SER=D38P01,DISP=SHR                   
//         DD UNIT=SYSALLDA,VOL=SER=D38P02,DISP=SHR                   
//         DD UNIT=SYSALLDA,VOL=SER=D38P03,DISP=SHR                   
//         DD UNIT=SYSALLDA,VOL=SER=D38P04,DISP=SHR                   
//         DD UNIT=SYSALLDA,VOL=SER=D38P06,DISP=SHR                   
//TAPE     DD DSN=Z8002D.TEST,DISP=(,KEEP,KEEP),                      
//            UNIT=(CART),VOL=(,,,35),LABEL=RETPD=10                  
//SYSIN    DD *                                                       
  DUMP  DATASET(INCLUDE(IST*.**    -                                  
                      MED*.**   -                                     
                      X*.**     -                                     
                      Y*.**     -                                     
                      Z*.**     -                                     
                      SRT.**    -                                     
                      SYS*.**   -                                     
                      TEMP.**   -                                     
                      *SYSUT*.**)  -                                  
      BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -                       
      LOGINDDNAME(DASD) -                                             
      OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -                         
      TOL(ENQF)                                                       

  Execution & error message:
   
  ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
IN NORUN MOD
  DUMP  DATASET(INCLUDE(IST*.**    -                                            
                      MED*.**   -                                               
                      X*.**     -                                               
                      Y*.**     -                                               
                      Z*.**     -                                               
                      SRT.**    -                                               
                      SYS*.**   -                                               
                      TEMP.**   -                                               
                      *SYSUT*.**)  -                                            
      BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -                                 
      LOGINDDNAME(DASD) -                                                       
      OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -                                   
      TOL(ENQF)                                                                 
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP 
'        
ADR109I (R/I)-RI01 (01), 2006.143 14:07:44 INITIAL SCAN OF USER CONTROL 
STATEMEN
ADR129E (001)-RI01 (01), KEYWORD 'LOGINDDNAME ' IS IMPROPER                     
ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND                 
ADR017E (001)-CLTSK(01), 2006.143 14:07:44 TASK NOT SCHEDULED DUE TO 
ERROR. TASK


"Pommier, Rex R." <[EMAIL PROTECTED]> wrote:  Try 
BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -

Rex


                
---------------------------------
On Yahoo!7
  Socceroos Central: Latest news, schedule, blogs and videos.  

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

Reply via email to