RE: backup stuck on EVTW? 3 days & counting -- MIDRANGE-L

Dan,

Ah ha !  That rang a bell in my brain.
Took a look at my nightly backup program and discovered I had added check 
for MCH1668 (note comment) this to it back in 1997:

/* CHECK THAT TAPE DRIVE IS READY WITH CORRECT TAPE.                 */ 
/*  (Volume ids for Nightly Backup tapes begin with:                 */ 
/*  DCMONn, DCTUEn, DCWEDn, DCTHUn, DCFRIn, DCSATn, DCSUNx (n=seq #).*/ 
CHKTAP:      CHKTAP     DEV(&TAPEDEV) ENDOPT(*REWIND) 
 
             MONMSG     MSGID(CPF6708) /* Command ended due to error + 
                          - possibly "CPF4120 Tape device + 
                          equipment check" if tape from last nights + 
                          backup sitting unloaded in drive with + 
                          drive door open. */ 
             MONMSG     MSGID(CPF6718) /* Cannot allocate device. */ 
             MONMSG     MSGID(CPF6760) /* Device not ready. */ 
             MONMSG     MSGID(CPF6772) /* Volume cannot be processed */ 
             RCVMSG     MSGTYPE(*LAST) RMV(*NO) KEYVAR(&MSGKEY) + 
                          MSGDTA(&MSGDTA) MSGID(&MSGID) 

             IF         COND(&MSGID *EQ CPF6708) THEN(DO) 
/* If CHKTAP fails first time and we get a CPF6708 it may be caused  */ 
/*  by a CPF4168/MCH1668 and tape device may be in a FAILED state.   */ 
/*  Try once to vary off/on the tape device and retry CHKTAP.        */ 
              IF         &CHKTAP THEN(DO) 
              CHGVAR     VAR(&CHKTAP) VALUE('0') /* CHKTAP run once */ 
              VRYCFG     CFGOBJ(&TAPEDEV) CFGTYPE(*DEV) STATUS(*OFF) 
              MONMSG     MSGID(CPF2600) /* Ignore vary command error */ 
              DLYJOB     DLY(5) 
              VRYCFG     CFGOBJ(&TAPEDEV) CFGTYPE(*DEV) STATUS(*ON) 
              MONMSG     MSGID(CPF2600) /* Ignore vary command error */ 
              GOTO       CMDLBL(CHKTAP) 
              ENDDO  



Neil Palmer      DPS Data Processing Services Canada Ltd.
50 Acadia Avenue, Ste.102                   OS/400~~~~~
Markham, Ontario, Canada.   ____________          ___  ~ 
Phone:(905) 474-4890 x303   |OOOOOOOOOO| ________  o|__||= 
Cell.:(416) 565-1682 x303   |__________|_|______|_|______) 
Fax:  (905) 474-4898         oo      oo   oo  oo   OOOo=o\ 
mailto:NeilP@DPSlink.com  ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ 
http://www.DPSlink.com     IBM iSeries  The Ultimate Business Server






"Bale, Dan" <D.Bale@handleman.com>
Sent by: owner-midrange-l@midrange.com
2001/07/30 17:58
Please respond to MIDRANGE-L

 
        To:     <MIDRANGE-L@midrange.com>
        cc: 
        Subject:        RE: backup stuck on EVTW?  3 days & counting


It turned out to be a damaged *DEVD object.  Tried to DSPTAP the tape used 
in the job that hung, and as soon as the job started, got a MCH1668 & 
CPF8105.  First suggested recovery was to vary off the device and vary it 
back on, which did the trick.
Go figger. 
Dan Bale 
IT - AS/400 
Handleman Company 
248-362-4400  Ext. 4952 
D.Bale@Handleman.com 
  Quiquid latine dictum sit altum viditur. 
  (Whatever is said in Latin seems profound.) 
-------------------------- Original Message -------------------------- 
-----Original Message----- 
From:   Neil Palmer [SMTP:neilp@dpslink.com] 
Sent:   Monday, July 30, 2001 3:57 PM 
To:     MIDRANGE-L@midrange.com 
Subject:        Re: backup stuck on EVTW?  3 days & counting 
Yep - seen it once or twice.  Never did get to the bottom of it with IBM. 
Very unlikely to reoccur if you restart the backup. 
...Neil 




"Bale, Dan" <D.Bale@handleman.com> 
Sent by: owner-midrange-l@midrange.com 
2001/07/30 14:57 
Please respond to MIDRANGE-L 
  
        To:     <MIDRANGE-L@midrange.com> 
        cc: 
        Subject:        backup stuck on EVTW?  3 days & counting 

Well, I almost hate to ask since this is such an old box (9406-D60) 
running V3R2, but... 
For some strange reason, our Friday morning backup just plain up and 
stopped running, well, it's showing on WRKACTJOB that it's status is 
EVTW, and I can only presume it's been that way since Friday morning. 
Normally, the job completes by 4:30 a.m.  The job's job log shows that 
the first 20 or so libraries were saved successfully and then, bam!, 
nothing.  No message waiting in QSYSOPR, although when I checked a few 
hours ago, the message queue wrapped so that the earliest message 
occurred two hours after the last library was saved.  I checked DSPLOG, 
and nothing seems out of whack there, either.  I am presuming that the 
tape was ejected by the time the morning crew came in Friday morning 
since they always call me when this doesn't happen. 
Has anyone seen this before?  FWIW, here's the call stack: 
Request  Program or 
 Level   Procedure        Library     Statement        Instruction 
    1    QCMD             QSYS                            011F 
         HDLSAV1DEV       HDL         8200                007B 
         QSRSLCPR         QSYS                            00D6 
         QSRADOPT         QSYS                            0009 
         QSRSLCP2         QSYS                            012A 
         QSRSVCHK         QSYS                            0007 
         QSRSVPRE         QSYS                            00EE 
         QSRREQIO         QSYS                            003F 
         QSRPSTIO         QSYS                            0079 
Dan Bale 
IT - AS/400 
Handleman Company 
248-362-4400  Ext. 4952 
D.Bale@Handleman.com 
  Quiquid latine dictum sit altum viditur. 
  (Whatever is said in Latin seems profound.) 


+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---