%
% monitor outgoing product messages
%
count !Stack.Track

_Xact

"Unsent_Prods_" textwild
"Message" ofconn folder
empty
{
 nextfile ?
%
% found a product message, send it
%
 *mesgdecd  

 "Unsent_Prods_*.txt" ofxact delfiles
 filing del
 true ?
} loop
filing)
"axumond" log)(

!Xact

count _Stack.Track ne { stop } if