Global: ^APSPQA(32.5

FileMan FileNo	FileMan Filename	Package
9009032.5	APSP INTERVENTION RECOMMENDATION	IHS Changes To Pharmacy

FileMan FileNo

FileMan Filename

Package

9009032.5

APSP INTERVENTION RECOMMENDATION

IHS Changes To Pharmacy

Package	Total	Routines
IHS Changes To Pharmacy	2	APSPT16 ^APSPQA(32.5
Pharmacy Data Management	1	PSS32P5

Package	Total	Routines
Pharmacy Data Management	1	PSS32P5

Package	Total	FileMan Files
IHS Changes To Pharmacy	1	APSP INTERVENTION(#9009032.4)[.08]

Fields, Total: 2

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.001	NUMBER		NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `FEB 27, 1990` HELP-PROMPT: `Type a Number between 1 and 999, 0 Decimal Digits` DESCRIPTION: This field is used to select entries by the enternal number. UNEDITABLE
.01	RECOMMENDATION	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>50!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `FEB 27, 1990` HELP-PROMPT: `Answer must be 3-50 characters in length.` DESCRIPTION: This field holds a free text narrative describing a recommended action to be taken to resolve a Intervention. Examples would be things like Change Drug, Change Dosage, Order Lab Tests, etc. DELETE TEST: `.01,0)= I 1` UNEDITABLE CROSS-REFERENCE: `9009032.5^B` 1)= S ^APSPQA(32.5,"B",$E(X,1,30),DA)="" 2)= K ^APSPQA(32.5,"B",$E(X,1,30),DA)

.001

NUMBER

INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: FEB 27, 1990
HELP-PROMPT: Type a Number between 1 and 999, 0 Decimal Digits

DESCRIPTION:

This field is used to select entries by the enternal number.

UNEDITABLE

.01

RECOMMENDATION

0;1

FREE TEXT

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

INPUT TRANSFORM: K:$L(X)>50!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: FEB 27, 1990
HELP-PROMPT: Answer must be 3-50 characters in length.

DESCRIPTION:

This field holds a free text narrative describing a recommended action to be taken to resolve a Intervention. Examples would be things like Change Drug, Change Dosage, Order Lab Tests, etc.

DELETE TEST: .01,0)= I 1
```
UNEDITABLE
```

CROSS-REFERENCE: 9009032.5^B

1)= S ^APSPQA(32.5,"B",$E(X,1,30),DA)=""

2)= K ^APSPQA(32.5,"B",$E(X,1,30),DA)

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

Local Variables

RECOMMENDATION: CHANGE DOSE	RECOMMENDATION: CHANGE DOSING INTERVAL	RECOMMENDATION: CHANGE DRUG	RECOMMENDATION: CHANGE FORM OR ROUTE OF ADMINISTRATION	RECOMMENDATION: NO CHANGE	RECOMMENDATION: ORDER LAB TEST	RECOMMENDATION: ORDER SERUM DRUG LEVEL	RECOMMENDATION: OTHER
RECOMMENDATION: START OR DISCONTINUE A DRUG

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K)
X	.001+1!, .01+1!, .01(XREF 1S), .01(XREF 1K)

Customize PDF page

Package: IHS Changes To Pharmacy

Global: ^APSPQA(32.5

Information

Description

Directly Accessed By Routines, Total: 3

Accessed By FileMan Db Calls, Total: 1

Pointed To By FileMan Files, Total: 1

Fields, Total: 2

Found Entries, Total: 9

Global Variables Directly Accessed

Local Variables

Legend: