Sub-Field: 130.0684

Parent File	Name	Number	Package
SURGERY(#130)	PHARMACY ITEMS	130.0684	Surgery

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PHARMACY ITEMS	0;1	POINTER TO PHARMACY ITEMS FILE (#131.06)	PHARMACY ITEMS(#131.06) INPUT TRANSFORM: `S DIC("S")="I '$P(^(0),U,3)&($$SCR^SRTOVRF(131.06))" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X` LAST EDITED: `JUN 26, 2015` HELP-PROMPT: `Enter the pharmacy item(s) requested for the planned surgical procedure. Answer must be 4-20 characters in length.` DESCRIPTION: `This is the name of the medication(s) (generic or proprietary) requested for this surgical procedure. More than one medication may be entered for each case.` SCREEN: `S DIC("S")="I '$P(^(0),U,3)&($$SCR^SRTOVRF(131.06))"` EXPLANATION: `Screen prevents selection of inactive entries.` CROSS-REFERENCE: `130.0684^B` `1)= S ^SRF(DA(1),62,"B",$E(X,1,30),DA)=""` `2)= K ^SRF(DA(1),62,"B",$E(X,1,30),DA)`

PHARMACY ITEMS

0;1

POINTER TO PHARMACY ITEMS FILE (#131.06)

INPUT TRANSFORM: S DIC("S")="I '$P(^(0),U,3)&($$SCR^SRTOVRF(131.06))" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
LAST EDITED: JUN 26, 2015
HELP-PROMPT: Enter the pharmacy item(s) requested for the planned surgical procedure. Answer must be 4-20 characters in length.
DESCRIPTION:
This is the name of the medication(s) (generic or proprietary) requested for this surgical procedure. More than one medication may be entered for each case.
SCREEN: S DIC("S")="I '$P(^(0),U,3)&($$SCR^SRTOVRF(131.06))"
EXPLANATION: Screen prevents selection of inactive entries.
CROSS-REFERENCE: 130.0684^B
1)= S ^SRF(DA(1),62,"B",$E(X,1,30),DA)=""
2)= K ^SRF(DA(1),62,"B",$E(X,1,30),DA)