Files
roacont/COMUN/utile/hpdf/build_err_msgs.PRG
Marius Mutu 0acdff9647 Initial import of ROACONT (Visual FoxPro accounting app) into git
Migrated from the ROACONT SVN trunk working copy for hosting on gitea.romfast.ro.
2026-07-07 13:16:59 +03:00

19 lines
287 B
Plaintext

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