* Originally in 4DOS
* Crossposted in BATPOWER

Hello All,

Further, to my original message of Dec 24th, 2003:

=== Begin Cut: NODEDIFF.BTM ===
::  AllFix tosses the NodeDiff archive into the C:\Fd\Incoming\Pending\
::  directory for processing by this BTM.
iff exist C:\Fd\Incoming\Pending\NODEDIFF.* then
   set d_mod=-00 %+ gosub setting %+ set fjd=%xjd
   pkunpak C:\Fd\Incoming\Pending\NODEDIFF.A?? C:\Fd\Nodelist\
   dir/hkm C:\Fd\Nodelist\NODELIST.[0-9][0-9][0-9]
   dir/hkmo:-d C:\Fd\Nodelist\NODEDIFF.[0-9][0-9][0-9]
   except (C:\Fd\Nodelist\NODEDIFF.%FJD) del/q %=
C:\Fd\Nodelist\NODEDIFF.[0-9][0-9][0-9]
   move/q C:\Fd\Incoming\Pending\NODEDIFF.A[0-9][0-9] C:\Fd\Oldnode
   unset/q xjd tdate d_mod d_up d_day fjd
   goto compile
endiff

.......

:setting
set d_day=3
set d_mod=%{at}eval[%{at}date[%_date] %d_mod+0]
set d_up=%{at}eval[%d_mod %% 7]
iff "%d_day" != "" .and. %d_day. != %d_up. then
  if %d_day gt %d_up set d_up=%{at}eval[%d_up+7]
  set d_mod=%{at}eval[%d_mod-(%d_up-%d_day)]
endiff
  set tdate=%{at}makedate[%d_mod]
  set xjd=%{at}substr[000%{at}eval[%{at}date[%tdate]-%{at}date%=
[1-1-%{at}substr[%tdate,1,-2]]+1],2,-3]
return

.......

=== End   Cut: NODEDIFF.BTM ===

The above snippet does have some flaws; so beware!  But, for the most part,
it will handle multiple NodeDiff files within a single archive.

It will fail if you "fall behind" and get multiple NodeDiff archives at one
time (I expect that there is a cure for this, but it's very difficult to
test for).  And, it will fail if you receive the NodeDiff archive before the
expected date of the %FJD variable...

Has anyone had any success in converting my previous DIFFRUN.BTM into a
"pure" DOS batch file format?

           Cheers ... Gerald

... Great Canadian Lie #132: "We're just going for one beer..."
--- GoldED+/DPMI32 v1.1.5-30512