->> Perhaps then wildmail! will be so good as to inform us of the RIGHT p
->> since no FTS standards appear to have anything to say on the matter?
->> :)

 JM> Here's the reason Ian.

 JM> Several editors put the TOPT or FMPT lines BEFORE the INTL line. When
 JM> WILDMAIL! processes it, it hasn't even established a 3D address yet via
 JM> the use of a INTL line (Gotta have a Zone first).  So when it encounters
 JM> a TOPT/FMPT line, it has no 3D address to append it to turn it into a 4D
 JM> address.

 JM> Remember, you have to have a 3D address BEFORE you can have a point off
 JM> of it.  So all those editors have to do is make sure they place the
 JM> TOPT/FMPT lines AFTER the INTL kludge line in the message body and then
 JM> WILDMAIL! will handle it just fine.

that's definitely a sign of a shortsighted programmer... they should
utilize a "build as you go" format of coding for this... i know
that i do mainly as there is no guarantee of control line placement in
messages EXCEPT for the AREA: line... anything else is basically a
free-for-all

 JM> My new ViaMAIL! can deal with this situation however.  Something about
 JM> putting the cart before the horse here fits real well.

hehe, i guess... but i see nothing wrong with the following (yes it's
pascal) code other than i'm doing it online, it's not complete, and it's
not fully tested but i'm sure the idea is clear... BTW: no, this doesn't
take into account any domain or 5D type stuff... it is simply something for
the Type 2 PKTs out there...

  origaddrcmplt := '';
  origaddrzone := '';
  origaddrnode := '';
  origaddrpnt  := '';
  destaddrcmplt := '';
  destaddrzone := '';
  destaddrnode := '';
  destaddrpnt  := '';
  while not eof() do
    begin
      searchfokludges(pktname,tmpbuffer);
      if buffpos('^aTOPT:',tmpbuffer) > 0 then
        origaddrpnt := getkludge('^aTOPT',tmpbuffer);
      if buffpos('^aFMPT:',tmpbuffer) > 0 then
        destaddrpnt := getkludge('^aFMPT',tmpbuffer);
      etc... etc... etc...
    end;
  origaddrcmplt := origaddrzone + ':' + origaddrnode + '/' + origaddrnode;
  if origaddrpnt  '' then
    origaddrcmplt := origaddrcmplt + '.' + origaddrpnt;
  destaddrcmplt := destaddrzone + ':' + destaddrnode + '/' + destaddrnode;
  if destaddrpnt  '' then
    destaddrcmplt := destaddrcmplt + '.' + destaddrpnt;

)\/(ark