if not Used('hpdferr')
	use hpdferr in 0
endif
set textmerge on
set textmerge to memvar _cliptext
select hpdferr 
\		with this.errors
scan
\			.Add([<<Strtran(Trim(hpdferr.message),Chr(13),"] + CR + [")>>], "<<Transform(hpdferr.errno)>>")
endscan 
\		endwith
use 

set textmerge to