<html>
  <head>
    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
  </head>
  <body text="#000000" bgcolor="#FFFFFF">
    I still do not understand why anything more than "TeX out of the
    box" is required.  I have shewn in a previous message how a simple
    text file, in conjunction with TeX, can be used to generate a
    monotonic increasing sequence of integers, and if each document
    requires its own sequence then the following trivial modification is
    all that is required — <br>
    <br>
    <blockquote><tt>\newread \trackerin</tt><tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\newwrite \trackerout</tt></p>
      <tt> </tt>
      <p style="-qt-paragraph-type:empty; margin-top:0px;
        margin-bottom:0px; margin-left:0px; margin-right:0px;
        -qt-block-indent:0; text-indent:0px; line-height:100%;"><tt><br>
        </tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\newcount \seqno</tt></p>
      <tt> </tt>
      <p style="-qt-paragraph-type:empty; margin-top:0px;
        margin-bottom:0px; margin-left:0px; margin-right:0px;
        -qt-block-indent:0; text-indent:0px; line-height:100%;"><tt><br>
        </tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\openin \trackerin = \jobname.seqno</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\ifeof \trackerin</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>     \seqno = 0</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\else</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>     \read \trackerin to \seqtmp</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>     \seqno = \seqtmp</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\fi</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\closein \trackerin</tt></p>
      <tt> </tt>
      <p style="-qt-paragraph-type:empty; margin-top:0px;
        margin-bottom:0px; margin-left:0px; margin-right:0px;
        -qt-block-indent:0; text-indent:0px; line-height:100%;"><tt><br>
        </tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\advance \seqno by 1</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\message {New sequence number = \number
          \seqno}</tt></p>
      <tt> </tt>
      <p style="-qt-paragraph-type:empty; margin-top:0px;
        margin-bottom:0px; margin-left:0px; margin-right:0px;
        -qt-block-indent:0; text-indent:0px; line-height:100%;"><tt><br>
        </tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\immediate \openout \trackerout = </tt><tt><tt>\jobname.seqno</tt></tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\immediate \write \trackerout {\number
          \seqno}</tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\immediate \closeout \trackerout</tt></p>
      <tt> </tt>
      <p style="-qt-paragraph-type:empty; margin-top:0px;
        margin-bottom:0px; margin-left:0px; margin-right:0px;
        -qt-block-indent:0; text-indent:0px; line-height:100%;"><tt><br>
        </tt></p>
      <tt> </tt>
      <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
        margin-right:0px; -qt-block-indent:0; text-indent:0px;
        line-height:100%;"><tt>\end<br>
        </tt></p>
    </blockquote>
    <p style=" margin-top:0px; margin-bottom:0px; margin-left:0px;
      margin-right:0px; -qt-block-indent:0; text-indent:0px;
      line-height:100%;">-- <br>
      <i>Philip Taylor</i><tt><br>
      </tt></p>
  </body>
</html>