%
% create products and product displayer
%
_Xact !Xact.Process
*vendings
"makeprdn" log)(
<
|Quick
"C" dup !Arching.Src "B" !Shooter.Twi
> not
{
"C" dup !Arching.Src dup !Shooter.Twi
} if
^"ProdMMS" ^"c:\___Final\" folder
dup !Arching.Dest
&"src" folder !Arching.Dsrc

8 countup
{
%
% stack: prod
%
 dup "Prod" *allseter
 _Prod.Tem ^"c:\___Work\Templates\"
 jpeg
"src" log)(
 "ProdMMS" &_Arching.Src &"_Tem" &3) ^_Arching.Dsrc jpeg
"dest" log)(
 copyfile
} for
%
% uses twi channel product thumbnail
%
*xactsrck

"//+Templar
//*
Templating('donexack');
"
*phocperf