RAIPST5 ;HIRMFO/GJC - Post-init number five ;11/23/97 13:23
Source file <RAIPST5.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| VERSION | ;;5.0;Radiology/Nuclear Medicine;;Mar 16, 1998
 | 
|
| 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.  | 
|
| EXAMINE | ; RA EXAMINED protocol
 | 
|
| RECEIVE | ; RA RECEIVE protocol
 | 
|
| REG | ; RA REG protocol
 | 
|
| RPT | ; RA RPT protocol
 | 
|
| ERR(X) | ; Display an error message if the protocol does not get filed into 101.
 | 
|
| MSG(X) | ; Display to the user the protocol being added to file 101
 | 
|
| PKG() | ; Return the name of the package
 | 
|
| PROID() | ; Return the Processing ID data
 | 
|
| TSTMP() | ; Timestamp the protocol entry with current date/time (in $H format)
 |