Print Page as PDF
Data updates ICR (3621)

Data updates    ICR (3621)

Name Value
NUMBER 3621
IA # 3621
DATE CREATED 2002/07/17
CUSTODIAL PACKAGE PHARMACY DATA MANAGEMENT
CUSTODIAL ISC Birmingham
USAGE Controlled Subscription
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PSSHUIDG
NAME Data updates
GENERAL DESCRIPTION
In support of the Hawaii DoD 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 PSSHUIDG 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 PSSHUIDG
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^PSSHUIDG and pass in ^TMP($J,"^" via ZTSAVE.  Matching and unmatching will
make a call to DRG^PSSHUIDG(DA).
OUTPATIENT PHARMACY
CMOP