%
% insure time range in posted telem from xtx after time gate
% move records from xtx\xtime to xtx between gates
% move records to xtx\xtime before time gate
% move records to xtx between gates
% move records to postedtelem after gate
%
% stack: begin-time end-time device-id
%
!device
jsmsec
"endr" log)(
!endr
jsmsec
"beginr" log)(
!beginr

_device &"\xtx" ofconn folder( !devx
&"xtime" folder !devxt

_device &"\PostedTelem" ofconn folder !devpt

"md*.*" !wilder

_devxt
empty
{
 nextfile ?
 dup noext term2
 dup _beginr lt
 {
  pop
 }
 {
  _endr ge
  {
   filing
   second ^_devpt
   overwrite
  }
  {
   filing
   second ^_devx
   overwrite   
  } ifelse
 } ifelse
} loop
filing)

_devx
empty
{
 nextfile ?
 dup noext term2
 dup _beginr lt
 {
  pop
  filing
  second ^_devxt
  overwrite 
 }
 {
  _endr ge
  {
   filing
   second ^_devpt
   overwrite
  } if
 } ifelse
} loop
filing)

_devpt
empty
{
 nextfile ?
 dup noext term2
 dup _beginr ge
 {
  _endr lt
  {
   filing
   second ^_devx
   overwrite
  } if
 }
 {
  pop
  filing
  second ^_devxt
  overwrite  
 } ifelse
} loop
filing)