; Timestamp the protocol entry with current date/time (in $H format)
RPT
; RA RPT protocol
RECEIVE
; RA RECEIVE protocol
PKG()
; Return the name of the package
REG
; RA REG protocol
ERR(X)
; Display an error message if the protocol does not get filed into 101.
EXAMINE
; RA EXAMINED protocol
VERSION
;;5.0;Radiology/Nuclear Medicine;;Mar 16, 1998
PROID()
; Return the Processing ID data
MSG(X)
; Display to the user the protocol being added to file 101
PRO101
; Add the following protocols to file 101 iff they are new
; to the Protocol (101) file: RA EXAMINED, RA RECEIVE, RA REG & RA RPT.
; RA SEND ORM, RA SEND ORU, RA CANCEL & RA EVSEND OR handled in RAIPST6
; Updates in accordance with DBIA: 872
; Note: The third subscript of RAFDA is the field number in file 101.
; Consult a data dictionary for further information.