;Check the # of reports to either pre-verify of verify.
CHK
GETLCN()
;Build & return a long case number (accession) for a live case.
UPDT(RANODE)
; Delete blank lines for Rad/Nuc Med Word Processing fields.
; These 'blank' consist of nothing more than spaces.
; 'RANODE' is the data node to be examined: i.e, for Clinical History
; in Rad/Nuc Med Orders (75.1) RANODE="^RAO(75.1,"_DA_",H,"
; -or in Rad/Nuc Med Reports (74) RANODE="^RARPT(DA_",R,"
;