Sub-Field: 58.638

Parent File	Name	Number	Package
PADE DISPENSING DEVICE(#58.63)	CLINIC LOCATION	58.638	Auto Replenishment Ward Stock

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CLINIC LOCATION	0;1	POINTER TO HOSPITAL LOCATION FILE (#44)	HOSPITAL LOCATION(#44) INPUT TRANSFORM: `S DIC("S")="I $$CLCHK2^PSJPADSI(Y,DA)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `DEC 08, 2015` HELP-PROMPT: `Enter a Clinic location supplied by this PADE device.` DESCRIPTION: `Clinic locations associated with this PADE device.` SCREEN: `S DIC("S")="I $$CLCHK2^PSJPADSI(Y,DA)"` EXPLANATION: `Allow only Clinic associated with Division` CROSS-REFERENCE: `58.638^B` `1)= S ^PS(58.63,DA(1),6,"B",$E(X,1,30),DA)=""` `2)= K ^PS(58.63,DA(1),6,"B",$E(X,1,30),DA)` FIELD INDEX: `CL (#1380) MUMPS IR LOOKUP & SORTING WHOLE FILE (#58.63)` `Short Descr: CLINIC LOCATIONS` `Description: This cross reference contains Clinics associated with PADE Dispensing cabinets. This cross reference will be used to enable and disable the display of PADE information in Inpatient Order Entry by enabling the display` `when an order's clinic location is linked to a PADE device, and disabling the display when a patient's clinic location is not linked to a PADE device.` `Set Logic: S ^PS(58.63,"CL",X(1),$G(DA(1)))=""` `Kill Logic: K ^PS(58.63,"CL",X(1),$G(DA(1)))` `Whole Kill: K ^PS(58.63,"CL")` `X(1): CLINIC LOCATION (58.638,.01) (Subscr 1) (forwards)`

CLINIC LOCATION

0;1

POINTER TO HOSPITAL LOCATION FILE (#44)

INPUT TRANSFORM: S DIC("S")="I $$CLCHK2^PSJPADSI(Y,DA)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: DEC 08, 2015
HELP-PROMPT: Enter a Clinic location supplied by this PADE device.
DESCRIPTION:
Clinic locations associated with this PADE device.
SCREEN: S DIC("S")="I $$CLCHK2^PSJPADSI(Y,DA)"
EXPLANATION: Allow only Clinic associated with Division
CROSS-REFERENCE: 58.638^B
1)= S ^PS(58.63,DA(1),6,"B",$E(X,1,30),DA)=""
2)= K ^PS(58.63,DA(1),6,"B",$E(X,1,30),DA)
FIELD INDEX: CL (#1380) MUMPS IR LOOKUP & SORTING WHOLE FILE (#58.63)
Short Descr: CLINIC LOCATIONS
Description: This cross reference contains Clinics associated with PADE Dispensing cabinets. This cross reference will be used to enable and disable the display of PADE information in Inpatient Order Entry by enabling the display
when an order's clinic location is linked to a PADE device, and disabling the display when a patient's clinic location is not linked to a PADE device.
Set Logic: S ^PS(58.63,"CL",X(1),$G(DA(1)))=""
Kill Logic: K ^PS(58.63,"CL",X(1),$G(DA(1)))
Whole Kill: K ^PS(58.63,"CL")
X(1): CLINIC LOCATION (58.638,.01) (Subscr 1) (forwards)