Print Page as PDF
DBIA4480 ICR (4480)

DBIA4480    ICR (4480)

Name Value
NUMBER 4480
IA # 4480
DATE CREATED 2006/02/06
CUSTODIAL PACKAGE PHARMACY DATA MANAGEMENT
USAGE Supported
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PSS781
NAME DBIA4480
GENERAL DESCRIPTION 
This DBIA is provided by PDM (Pharmacy Data Management)
as an API to the PHARMACY PATIENT file (#55). This API is to used in the
future by all packages accessing this file as all the Pharmacy packages are
being re-engineered.
STATUS Active
ID PSS781
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
PSS(PSSDFN,PSSNUM,LIST) 
Returns Clozapine data from the Pharmacy Patient
(#55) file.
VARIABLES TYPE VARIABLES DESCRIPTION
PSSDFN Input 
IEN of Patient [optional]
PSSNUM Input 
Clozapine Registration Number [optional]
LIST Input 
Subscript name used in ^TMP global [REQUIRED]
TMP Output 
^TMP($J,LIST,0)=1 for successful return of data or
-1^NO DATA FOUND

^TMP($J,LIST,DFN,53)=CLOZAPINE REGISTRATION NUMBER(#53)

^TMP($J,LIST,DFN,54)=CLOZAPINE STATUS(54 - S)^External Format for the Set of
Codes

^TMP($J,LIST,DFN,55)=DATE OF LAST CLOZAPINE RX(55 - D/T)^External Format (ex:
Sep. 12, 1999)

^TMP($J,LIST,DFN,56)=DEMOGRAPHICS SENT(56)^External Format for the Set of
Codes

^TMP($J,LIST,DFN,57)=RESPONSIBLE PROVIDER (pointer value) (57)^NAME (200,.01)

^TMP($J,LIST,DFN,58)=REGISTRATION DATE(58 -D/T)^External Format (ex: Sep. 12,
1999)
WRT(PSSDFN,PSSSTAT,LIST) 
Set Clozapine Status field for Mental Health
VARIABLES TYPE VARIABLES DESCRIPTION
PSSDFN Input 
IEN of patient [REQUIRED]
PSSSTAT Input 
Clozapine Status [REQUIRED]
LIST Input 
Subscript name used in ^TMP global [REQUIRED]
TMP Output 
^TMP($J,LIST,0)=-1 for failure or 1 for success