Global: ^RAMIS(71.4

Information

FileMan FileNo	FileMan Filename	Package
71.4	RAD/NUC MED PROCEDURE MESSAGE	Radiology Nuclear Medicine

This file contains messages concerning special requirements when ordering a procedure. One or more of these messages can be tied to a procedure in the Rad/Nuc Med Procedures file (#71) so that they are displayed to a requestor at the time an order is placed. Data Storage ------------ The data for the 'RAD/NUC MED PROCEDURE MESSAGE' file is stored in the ^RAMIS(71.4, global. Templates --------- The package does not use any input, print or sort templates associated with this file.

Package	Total	Routines
Radiology Nuclear Medicine	6	^RAMIS(71.4 RAMAIN RAO7MFN RAORD6 RAPRI RAUTL5

Package	Total	Routines
Radiology Nuclear Medicine	2	RAMAIN RAMAINP

Package	Total	FileMan Files
Radiology Nuclear Medicine	1	RAD/NUC MED PROCEDURES(#71)[#71.04(.01)]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	TEXT	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>240!($L(X)<3)!'(X'?1P.E) X` HELP-PROMPT: `Message can be 3-240 characters in length. It cannot be preceded with punctuation.` DESCRIPTION: `This field contains messages concerning special requirements when ordering a procedure. One or more of these messages can be tied to a procedure in the RAD/NUC MED PROCEDURES file (#71). Messages cannot begin with` punctuation marks. DELETE TEST: `1,0)= I $G(DUZ(0))'="@"` CROSS-REFERENCE: `71.4^B` 1)= S ^RAMIS(71.4,"B",$E(X,1,30),DA)="" 2)= K ^RAMIS(71.4,"B",$E(X,1,30),DA) Regular 'B' cross reference assigned by FileMan.

TEXT

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>240!($L(X)<3)!'(X'?1P.E) X
HELP-PROMPT: Message can be 3-240 characters in length. It cannot be preceded with punctuation.
DESCRIPTION: This field contains messages concerning special requirements when ordering a procedure. One or more of these messages can be tied to a procedure in the RAD/NUC MED PROCEDURES file (#71). Messages cannot begin with
```
punctuation marks.
```
DELETE TEST: 1,0)= I $G(DUZ(0))'="@"

CROSS-REFERENCE: 71.4^B

1)= S ^RAMIS(71.4,"B",$E(X,1,30),DA)=""

2)= K ^RAMIS(71.4,"B",$E(X,1,30),DA)

Regular 'B' cross reference assigned by FileMan.

Name	Field # of Occurrence
EN^DDIOL	IDWRITE+1

Name	Line Occurrences (* Changed, ! Killed)
^RAMIS(71.4 - [#71.4]	.01(XREF 1S), .01(XREF 1K)

Name	Field # of Occurrence
^(0	IDWRITE+1