%
% create the html row record for this entry
% write into dest
%
% results/ dialr / numbr /  flxR
%
% Mimage copied into it and split
%
*fuplprer

"___Type___"

_Fup.HasPsd
")))))mafb)psd" log)(
{
%
% some form of psd, base or other file type
%
 Fup._Ext Fup.!Fsplit
}
{
%
% not psd or other file type
%
 _Fup.HasJpg
")))))mafb)jpg" log)(
 {
%
% base jpg file type
%
  ".jpg" Fup.!Fsplit
 }
 {
  _Fup.HasPng
")))))mafb)png" log)(
  {
%
% base png file type
%
   ".png" Fup.!Fsplit
  }
  {
%
% no base file type, not an image message
%
   empty
  } ifelse
 } ifelse
} ifelse

dup !Msgr.Type &" <<<" "To" !Msgr.Dir replall

"___Message___" Fup.UnPhone dup !Msgr.Body replall

Xact.DTrepl

"___File___"
_Msg.dialr dup !Msgr.Phone &" " 
_Fup.Outgo dup !Msgr.OrigFile &
replall

"R" Fup.!Ftext

*fupljrow

&'MsgrFinal();
'

&'MsgRow++;
'

"J" Fup.!Ftext