Conference iosg::all-in-1_v30

992.0. "File Cabinet not found in OAMTIMAIL" by PASM09::STEVENTAM (Steven Tam @PAS) Mon Jul 06 1992 13:33

I'm running ALL-IN-1 V2.4.

Recently, I've found that there is a message in my OAMTIMAIL.LOG.  The message is
"The current File Cabinet document can not be found".  I've attached the log below.

Why is this message come out?  Does my A1 system has problem?

Would someone comment on this?

Thanks in advance,
Steven.

$ !
$ !  ALL-IN-1 Mail fetcher command procedure
$ ! 
$ set verify
$ set noon
$ show daytime					! Write the time
   6-JUL-1992 19:18:35
$ !
$ ! If OA$MTI_SFLOG is defined we can log run information such as node, time, 
$ ! Sender/Fetcher, and what we're up to.
$ !
$ start_time = f$time()
$ Node := "PASM01"
$ DEB$LOG := F
$ IF "" .EQS. "" THEN GOTO PNAME
$PNAME:
$ SET PROCESS/NAME="A1 Fetcher"
$ !
$ ! Set delay time for rescheduling using a local Message Router
$ !
$ wait_time := "+0:15"
$ queue:=A1$BATCH
$ !
$ ! Get the current username
$ uname = f$getjpi("","username")
$ uname = f$edit(uname,"COLLAPSE")
$ ! Reshedule the batch job
$ !
$ SUBMIT OA$LIB:OAMTIMAIL/RESTART/NOPRINT/NONOTIFY/AFTER="+0:15" -
	/QUEUE=A1$BATCH
$ !
$ ! See if there's anything in the FETCHER QUEUE record in the pending file.
$ ! If there is, we've got to run ALL-IN-1 anyway.
$ !
$ IF DEB$LOG THEN WRITE LOGFILE -
" 6-JUL-1992 19:18:40.64	%FETCHER-I-CHECK, Checking for messages"
$ RUN OA$LIB:FETCHCHECK
The queue contains 0 messages waiting to be fetched.
$ IF $STATUS .EQ. 3 THEN GOTO RUN_A1
$ !
$ ! Ask Message Router if there is anything to fetch, to save firing up
$ ! ALL-IN-1, if MR is on this node. If it is on another node, we've got
$ ! to run A1 anyway, because we need the mailbox password. If it's on another 
$ ! node, OA$MTI_MR_NODE will be the nodename.
$ !
$ IF "" .NES. "" THEN GOTO RUN_A1
$ MBX = F$LOGICAL("OA$MTI_MAILBX")
$ !
$ ! Work out the correct DECNET object to link to
$ MRN = F$LOGICAL ("MR$NODE")
$ IF F$EXTRACT(0,5,MRN).eqs. """""::""" THEN GOTO NONODE
$ OPEN/READ/WRITE/ERROR=OPNLNKERR MRLINK PASM01::"22="
$ GOTO LINKOPEN
$LINKOPEN:
$ ON ERROR THEN GOTO LNKERR
$ !
$ ! We don't use the password, because this job must run under the same VMS 
$ ! account as Manager and Postmaster.
$ !
$ WRITE MRLINK "IA1"
$ READ MRLINK ANSWER
$ IF "I" .EQS. "I" THEN GOTO LNKIDENT
$LNKIDENT:
$ !
$ WRITE MRLINK "Q"
$ READ MRLINK ANSWER
$ CLOSE MRLINK
$ IF ANSWER .NES. "C0" THEN GOTO MESSAGE
$MESSAGE:
$ !
$ WRITE SYS$OUTPUT  "There are messages to be fetched"
There are messages to be fetched
$ !
$ ! Run ALL-IN-1 and call the fetch routine.
$ ALLIN1/NOINIT/USER=POSTMASTER/PASSWORD=DECMAIL
OA$INI_INITIALIZE

DO OA$LIB:FETCHER_REFILE
%OA-I-CAB_CANT_FIND, The current File Cabinet document can not be found
MAIL MTI_FETCH_REMOTE
$ !

    Steven,
    
    There is nothing wrong with your Postmaster's file cabinet. It is
    quite normal for the Postmaster to have no entries in his file cabinet
    and in fact his mail destination is NO MAIL so he shouldn't have
    any.
    
    The message you see is only informational and is nothing to worry about
    it is a side-effect of the FETCHER_REFILE script that appeared in 
    an ALL-IN-1 v2.3 patch and in ALL-IN-1 v2.4. 
    
    The script could be a little more elegant and not put out that message 
    but there are bigger problems in the Sender/Fetcher to worry about.
    
    Regards,
    
    Andrew.D.Wicks

I remember this informational message the very first time I entered ALL-IN-1.

For my understanding, there ARE NO documents in the file cabinet of
POSTMASTER, and therefore there is nothing found.

Enter the POSTMASTER account, create a dummy document, and this message will
disappear. This is an untested guess.

Regards
Tomas