; this tag will load the complete file into ^TMP("ACPT-IMP",$J) using the concept ID
; and the property ID as the identifiers
LOADCODE
; load CPTs from ^TMP("ACPT-IMP",$J)
CLEAN(ACPTDESC,ACPTUP)
; clean up description field
TEXT(ACPTDESC)
; convert Description text to Word-Processing data type
; input: .ACPTDESC = passed by reference, starts out as long string,
; ends as Fileman WP-format array complete with header