Print Page as PDF
Data updates ICR (4394)

Data updates    ICR (4394)

Name Value
NUMBER 4394
IA # 4394
DATE CREATED 2004/04/07
CUSTODIAL PACKAGE PHARMACY DATA MANAGEMENT
CUSTODIAL ISC Birmingham
USAGE Controlled Subscription
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PSSDGUPD
NAME Data updates
GENERAL DESCRIPTION 
In support of the Outpatient Pharmacy Automation
Dispense project, Pharmacy Data Management needs to know when changes are made
to entries in the DRUG file (#50).  National Drug File data updates make
changes to entries in this file.  To meet this need, NDF requests permission
to call routine PSSDGUPD at entry point PSN.  The array ^TMP($J,"^",IEN where
IEN is the internal entry number in the DRUG file (#50) wil be sent to this
entry point.  The matching and unmatching processes also make changes to the
drug file that need to be sent to PDM.  To this end, NDF requests permission
to call routine PSSHUIDG at entry point DRG with the variable PSNB (if an
entry is being matched) or DA (if an entry is being unmatched) representing
the internal entry number in the drug file.
STATUS Active
DURATION Till Otherwise Agreed
ID PSSDGUPD
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT VARIABLES
PSN
VARIABLES TYPE VARIABLES DESCRIPTION
global TMP($J, Input 

^TMP($J,"^",IEN) is the array of entries in file 50 that have been edited.
DRG
VARIABLES TYPE VARIABLES DESCRIPTION
PSNB Input 
The internal entry number of an entry in file 50.
DA Input 
The internal entry number of an entry in file 50.
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC SUBSCRIBING DETAILS
NATIONAL DRUG FILE Birmingham 
NDF data updates will make a call to %ZTLOAD to queue
PSN^PSSDGUPD and pass in ^TMP($J,"^" via ZTSAVE.  Matching and unmatching will
make a call to DRG^PSSDGUPD(DA).