# This program draws from db the following information on all faxes except # links: # Next Review Date Whether Out for Review File Name Revision Date Group # # It sorts the entried by Next Review Date, with the earliest at the # beginning. It DOES NOT remove any entries based on Next Review Date. # That may be a candidate for a future modification. # # Puts output in these files: # NOUTDIR Candidates for quarterly review # QOUTDIR List of documents out for quarterly review # COUTIDR List of documents out for change approval # # # Author: Cynthia Roush # Creation Date: 08/22/94 # Change History: # 9/28/94 CR Separate faxes based on out status # 4/5/95 CR Add comments from database (db) in list, because # comments may contain note that fax should be reviewed # by someone other than the person it would automatically # be sent to. # 4/5/95 CR Remove creation of pending.my.action list because its # notation ("m") is no longer used in database. # # set variables . setvars NOUTDIR=${TMPDIR}/review.list QOUTDIR=${TMPDIR}/out.for.qrev COUTDIR=${TMPDIR}/out.for.change.review cd $TMPDIR # remove unwanted lines from temporary copy of database sed "/ tmp$$ sed "/^#/d" tmp$$ > db$$ # extract wanted info from database cut -c$NRV_COLS db$$ > nrv$$ cut -c$FN_COLS db$$ > fn$$ cut -c$DT_COLS db$$ > dt$$ cut -c$CMP_COLS db$$ > cmp$$ cut -c$OUT_COLS db$$ > out$$ cut -c$CMT_COLS db$$ > cmt$$ paste -d"\0" out$$ nrv$$ fn$$ dt$$ cmp$$ cmt$$ > list$$ # sort by Next Review Date sort +1 list$$ > tmp$$ grep "^ q" tmp$$ > $QOUTDIR grep "^ c" tmp$$ > $COUTDIR grep "^ n" tmp$$ > $NOUTDIR # remove extra blanks at end of lines /u/hsim/execs/endblanks $QOUTDIR /u/hsim/execs/endblanks $COUTDIR /u/hsim/execs/endblanks $NOUTDIR echo " " echo "Results are in in these files:" echo " $QOUTDIR" echo " $COUTDIR" echo " $NOUTDIR (run send.qrevs after editing this file)" echo " " rm *$$