%
% collect financial sell issuance
%

@@
"??" anytext conn(
{
 nextfile ?
 dup term2 !Shooter.Subject
 dup term1
 <
 |XC
%
% place in Subject area
%
  
 |PR
  0.00 !ProdNew
  0.00 !ProdCart
  0.00 !ProdTot
%
% execute process as financial transaction
%
  execing
 |QR
%
% execute process as financial transaction
%
  execing
 |RR
%
% execute process as financial transaction
%
  execing
 > pop

 finaled
} loop
filing)