This commit is contained in:
parent
74e9cd1c95
commit
93430d4d38
|
|
@ -16,4 +16,7 @@ https://trac.opensourcevista.net/svn/lang-file4mu1and2
|
|||
https://trac.opensourcevista.net/svn/qrda
|
||||
|
||||
## pharmacy_utils
|
||||
https://trac.opensourcevista.net/svn/pharmacy-utils
|
||||
https://trac.opensourcevista.net/svn/pharmacy-utils
|
||||
|
||||
## mu_tests
|
||||
https://trac.opensourcevista.net/svn/mu-tests
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
|
|
@ -0,0 +1,378 @@
|
|||
|
||||
--- KIDS TEXT ----
|
||||
Created by Sam Habiel on Thursday 12 April 2011 for WorldVistA.
|
||||
|
||||
--- WARNING ---
|
||||
If you install the KIDS build produced by this tool on a production system
|
||||
containing pharmacy patient data, you will cause database corruption and
|
||||
jeopardize patient safety.
|
||||
--- WARNING ---
|
||||
|
||||
This KIDS Build transports the following files from a source system to a
|
||||
destination system and then syncs CPRS OE/RR files with the new files.
|
||||
; ^PSDRUG DRUG
|
||||
; ^PS(50.7) PHARMACY ORDERABLE ITEM
|
||||
; ^PS(51.7) DRUG TEXT
|
||||
; ^PS(52.6) IV ADDITIVES
|
||||
; ^PS(52.7) IV SOLUTIONS
|
||||
; ^PS(50.4) DRUG ELECTROLYTES
|
||||
|
||||
Workflow (using KIDS):
|
||||
; On the Origin System:
|
||||
; - Create a KIDS build that calls the following:
|
||||
; 1. VWPSSXPD to call from top is the Environment Check for the
|
||||
; Build
|
||||
; 2. PRE^VWPSSXPD is the Pre-Init for the Destination System
|
||||
; 3. POST^VWPSSXPD is the Post-Init for the Destination System
|
||||
; 4. TRAN^VWPSSXPD is the Pre-Transport Routine for your originating system drug data
|
||||
; - Generate the KIDS Build. The file will have all the Drug Data from the
|
||||
; Origin System.
|
||||
;
|
||||
; On the Destination System:
|
||||
; - Install the KIDS Build
|
||||
|
||||
The entry points in the attached routine (VWPSSXPD) can be used by
|
||||
themselves to remove an old drug file and add a new one.
|
||||
|
||||
Documentation for using the Drug File updating utility WITH and WITHOUT KIDS
|
||||
can be found in VWPSSXPD.m.
|
||||
|
||||
KIDS file contains this routine plus a sample drug file to be installed
|
||||
into a destination system.
|
||||
|
||||
--- END KIDS TEXT ----
|
||||
License is AGPL.
|
||||
|
||||
Author is Sam Habiel for WorldVistA.
|
||||
|
||||
Limitations/Ideas for Future Development:
|
||||
- Not sure if the MEDICATION ROUTES should be transmitted or not. While
|
||||
additions are allowed, they are by my experience uncommon.
|
||||
- Many reference files (e.g. PACKAGE SIZE or DRUG UNITS) are not part of the
|
||||
NDF, yet they are not user modifiable. Yet, they are referenced almost
|
||||
exclusively from the National Drug Files; which means that they cannot be
|
||||
changed without corrupting the NDF data. I am trying to find documentation
|
||||
to say that they are standard.
|
||||
- If the Administration Schedules from the originating system and destination
|
||||
system don't match, you need to either change the schedules on the orderable
|
||||
items, or make the schedules on the destination system the same as the
|
||||
ones from incoming drug file, otherwise, the problems you run into is this:
|
||||
- Orders do not calculate frequency correctly if the schedule is not present
|
||||
in the destination system. This means that the proper number of pills
|
||||
cannot be calculated.
|
||||
- In Outpatient Pharmacy, Schedules do not expand into patient readable
|
||||
instructions
|
||||
- If the National Drug Files are not up to date in the destination system,
|
||||
there will be some broken pointers. All you have to do is update the NDF with
|
||||
the latest patches.
|
||||
- If some drugs are linked with lab tests, these need to be re-linked.
|
||||
Preferably, these should be removed prior to transporting the drug file.
|
||||
|
||||
|
||||
Remarks on Broken Pointers in Destination Systems as a result of using this
|
||||
package:
|
||||
Because many files point to the Pharmacy Orderable Item and Drug files, you
|
||||
practically cannot use this package on a database that contains patient-
|
||||
specific pharmacy data since all data will be corrupted.
|
||||
|
||||
When installing a new drug and pharmacy orderable item file, the following may
|
||||
be broken:
|
||||
For Drug File:
|
||||
- LAB TEST MONITOR field.
|
||||
- SPECIMEN TYPE field.
|
||||
- CLOZAPINE LAB TEST:LAB TEST MONITOR field
|
||||
- CLOZAPINE LAB TEST:SPECIMEN TYPE field
|
||||
- ATC CANISTER:WARD GROUP FOR CANISTER
|
||||
- ACTIVITY LOG:INITIATOR OF ACTIVITY (field not used currently)
|
||||
- NDC BY OUTPATIENT SITE:OUTPATIENT SITE
|
||||
- IFCAP ITEM NUMBER:ITEM NUMBER (field not used currently)
|
||||
- Custom UNIT DOSE MED ROUTE (field not used currently)
|
||||
- NATIONAL DRUG FILE ENTRY (if you don't have a recently patched NDF)
|
||||
- PSNDF VA PRODUCT NAME ENTRY (if you don't have a recently patched NDF).
|
||||
|
||||
For Pharmacy Orderable Item File:
|
||||
- MEDICATION ROUTES (additions are allowed, not deletions)
|
||||
|
||||
The National Drug Files are Standardized. However, a system may be out of date.
|
||||
If you do not have the latest National Drug Files, you have will broken
|
||||
pointers if the source of your drug files has a more recent National Drug File.
|
||||
For best results, the source system and the destination system should have a
|
||||
commensurate NDF patch level.
|
||||
|
||||
To check for broken pointers, use the VERIFY FIELDs option in Fileman.
|
||||
Here is an example of a drug file from a patched system installed on a system
|
||||
that is not patched:
|
||||
|
||||
==============================================================================
|
||||
GTM>D P^DI
|
||||
|
||||
|
||||
VA FileMan 22.0
|
||||
|
||||
|
||||
Select OPTION: UTILITY FUNCTIONS
|
||||
Select UTILITY OPTION: VERIFY FIELDS
|
||||
|
||||
MODIFY WHAT FILE: DRUG//
|
||||
VERIFY WHICH FIELD: PSNDF VA PRODUCT NAME ENTRY
|
||||
|
||||
DEVICE: HOME//
|
||||
|
||||
VERIFY FIELDS REPORT
|
||||
DRUG FILE (#50) APR 16, 2012 12:40 PAGE 1
|
||||
-------------------------------------------------------------------------------
|
||||
POINTER
|
||||
(CANNOT CHECK CROSS-REFERENCE)
|
||||
|
||||
ENTRY# GENERIC NAME ERROR
|
||||
148 GUANFACINE 1MG TAB ER No '21739' in pointed-to File
|
||||
149 GUANFACINE 2MG TAB ER No '21740' in pointed-to File
|
||||
168 LURASIDONE 40MG TAB No '22028' in pointed-to File
|
||||
169 LURASIDONE 80MG TAB No '22030' in pointed-to File
|
||||
221 LEVONORGESTREL 1.5MG TAB No '21157' in pointed-to File
|
||||
450 LIDOCAINE 5% PATCH No '22004' in pointed-to File
|
||||
456 NEOMYCIN/POLYMYXIN/BACITRACIN OINT No '21497' in pointed-to File
|
||||
485 MICONAZOLE 4% VAGINAL CREAM No '22325' in pointed-to File
|
||||
585 PALIPERIDONE 234MG INJ SUSP PFSNo '21021' in pointed-to File
|
||||
586 PALIPERIDONE 156MG INJ SUSP PFSNo '21022' in pointed-to File
|
||||
==============================================================================
|
||||
|
||||
Below you will find the pointer relations of all the files that are transmitted in this KIDS build.
|
||||
|
||||
File/Package: DRUG Date: APR 12,2012
|
||||
|
||||
FILE (#) POINTER (#) FILE
|
||||
POINTER FIELD TYPE POINTER FIELD FILE POINTED TO
|
||||
------------------------------------------------------------------------------------------------------------------------------------
|
||||
L=Laygo S=File not in set N=Normal Ref. C=Xref.
|
||||
*=Truncated m=Multiple v=Variable Pointer
|
||||
|
||||
-------------------------------
|
||||
DRUG (#50) | |
|
||||
CORRESPONDING OUTPATIENT DRUG .................. (N )-> | 50 DRUG |
|
||||
CORRESPONDING INPATIENT DRUG ................... (N )-> | PHARMACY ORDERABLE ITEM |-> PHARMACY ORDERABLE ITEM (inc)
|
||||
FORMULARY ALTERNATIVE .......................... (N C )-> | ORDER UNIT |-> ORDER UNIT (only modifiable
|
||||
from FM, possibly standard)
|
||||
DUE QUESTIONNAIRE (#50.07301) | |
|
||||
DRUG ........................................... (N S C )-> | LAB TEST MONITOR |-> LABORATORY TEST (possible brok pt)
|
||||
DUE ANSWER SHEET (#50.0731) | |
|
||||
DRUG ........................................... (N S C )-> | SPECIMEN TYPE |-> TOPOGRAPHY FIELD (possible break)
|
||||
IV CATEGORY (#50.21) | |
|
||||
IV DRUG:GENERIC DRUG ........................... (N S )-> | NATIONAL DRUG FILE ENTRY |-> VA GENERIC (standard)
|
||||
DRUG COST (#50.9002) | |
|
||||
PHYSICIAN DATA:DRUG ............................ (N S )-> | PSNDF VA PRODUCT NAME EN* |-> VA PRODUCT (standard)
|
||||
DRUG DATA:DRUG ................................. (N S )-> | PACKAGE SIZE |-> PACKAGE SIZE (only mod from FM)
|
||||
(possibly standard)
|
||||
DIVISION DATA:DRUG DATA:DRUG ................... (N S )-> | PACKAGE TYPE |-> PACKAGE TYPE (only mod from FM)
|
||||
(possibly standard)
|
||||
PRESCRIPTION (#52) | |
|
||||
DRUG ........................................... (N S C )-> | NATIONAL DRUG CLASS |-> VA DRUG CLASS (standard)
|
||||
PENDING OUTPATIENT O (#52.41) | |
|
||||
DRUG ........................................... (N S )-> | UNIT DOSE MED ROUTE |-> MEDICATION ROUTES (addable)
|
||||
IV ADDITIVES (#52.6) | |
|
||||
GENERIC DRUG ................................... (N S C )-> | CORRESPONDING OUTPATIENT* |-> DRUG (this file)
|
||||
IV SOLUTIONS (#52.7) | |
|
||||
GENERIC DRUG ................................... (N S C )-> | *PRIMARY DRUG |-> PRIMARY DRUG (not used)
|
||||
NON-VERIFIED ORDERS (#53.1) | |
|
||||
SOLUTION ....................................... (N S )-> | UNIT |-> DRUG UNITS (only mod from FM)
|
||||
(possibly standard)
|
||||
DISPENSE DRUG .................................. (N S )-> | CORRESPONDING INPATIENT * |-> DRUG (this file)
|
||||
UNIT DOSE ORDER SET (#53.2102) | |
|
||||
*DRUG:*DISPENSE DRUG ........................... (N S C )-> | *LAB TEST MONITOR |-> LABORATORY TEST (not used)
|
||||
ORDERABLE ITEM:DISPENSE DRUG ................... (N S )-> | *SPECIMEN TYPE |-> TOPOGRAPHY FIELD (not used)
|
||||
INPATIENT USER PARAM (#53.4502) | |
|
||||
DISPENSE DRUG .................................. (N S C )-> | m CLOZAPINE L:LAB TEST MO* |-> LABORATORY TEST (broken)
|
||||
BCMA MISSING DOSE RE (#53.68) | |
|
||||
DRUG REQUESTED ................................. (N S )-> | CLOZAPINE L:SPECIMEN TY* |-> TOPOGRAPHY FIELD (broken)
|
||||
BCMA UNABLE TO SCAN (#53.771) | |
|
||||
DISPENSE DRUG .................................. (N S C )-> | m ATC CANISTE:WARD GROUP * |-> WARD GROUP (site specific)
|
||||
BCMA MEDICATION VARI (#53.78) | |
|
||||
DRUG SCANNED ................................... (N S )-> | ACTIVITY LO:INITIATOR O* |-> NEW PERSON (not used)
|
||||
BCMA MEDICATION LOG (#53.795) | |
|
||||
DISPENSE DRUG .................................. (N S C )-> | NDC BY OUTP:OUTPATIENT * |-> OUTPATIENT SITE (site specific)
|
||||
PHARMACY PATIENT (#55.05) | |
|
||||
NON-VA MEDS:DISPENSE DRUG ...................... (N S )-> | m DRUG TEXT E:DRUG TEXT E* |-> DRUG TEXT (included)
|
||||
UNIT DOSE:*SOLUTION ............................ (N S )-> | m IFCAP ITEM :ITEM NUMBER* |-> ITEM MASTER (WV empty file)
|
||||
UNIT DOSE:DISPENSE LOG:DISPENSE DRUG ........... (N S )-> | m FORMULARY A:FORMULARY A* |-> DRUG (this file)
|
||||
UNIT DOSE:DISPENSE DRUG ........................ (N S )-> | |
|
||||
UNIT DOSE PICK LIST (#57.63) | |
|
||||
WARD:PROVIDER:DRUG ............................. (N S )-> | |
|
||||
PHARMACY AOU STOCK (#58.11) | |
|
||||
ITEM ........................................... (N S )-> | |
|
||||
PHARMACY BACKORDER (#58.3) | |
|
||||
ITEM ........................................... (N S C )-> | |
|
||||
AR/WS STATS FILE (#58.52) | |
|
||||
INPATIENT SITE:RECALCULATE AMIS:DRUG ........... (N S )-> | |
|
||||
DRUG ACCOUNTABILITY (#58.8001) | |
|
||||
DRUG ........................................... (N S C )-> | |
|
||||
DRUG ACCOUNTABILITY (#58.81) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
DRUG ACCOUNTABILITY (#58.81125) | |
|
||||
INVOICE DATA:LINE ITEM DATA:DRUG ............... (N S )-> | |
|
||||
CS WORKSHEET (#58.85) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
CS DESTRUCTION (#58.86) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
PRICE PER DISPENSE UNIT ........................ (N S )-> | |
|
||||
CS CORRECTION LOG (#58.87) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
OUTPATIENT SITE (#59) | |
|
||||
METHADONE DRUG ................................. (N S )-> | |
|
||||
PHARMACY SYSTEM (#59.7) | |
|
||||
LAST DRUG CONVERTED ............................ (N S )-> | |
|
||||
LAST DRUG LINKED ............................... (N S )-> | |
|
||||
RAD/NUC MED PATIENT (#70.15) | |
|
||||
REGISTERE:EXAMINATION:MEDICATIONS:MED ADMINIS* . (N S )-> | |
|
||||
NUC MED EXAM DATA (#70.21) | |
|
||||
RADIOPHARMACEUTICALS:RADIOPHARMACEUTICAL ....... (N S )-> | |
|
||||
RAD/NUC MED PROCEDUR (#71.055) | |
|
||||
DEFAULT MEDICATIONS:DEFAULT MEDICATION ......... (N S C )-> | |
|
||||
DEFAULT RADIOPHARMACEU:DEFAULT RADIOPHARMACEUTI* (N S )-> | |
|
||||
RADIOPHARMACEUTICAL (#71.9) | |
|
||||
RADIOPHARM ..................................... (N S )-> | |
|
||||
ORDER STATISTICS (#100.1) | |
|
||||
NAME v ...........................................(N S C L)-> | |
|
||||
PATIENT ALLERGIES (#120.8) | |
|
||||
GMR ALLERGY v ....................................(N S L)-> | |
|
||||
SURGERY (#130.33) | |
|
||||
MEDICATIONS .................................... (N S )-> | |
|
||||
ANESTHESIA TECHNIQUE:ANESTHESIA AGENTS ......... (N S )-> | |
|
||||
ANESTHESIA TECHNIQUE:TEST DOSE ................. (N S )-> | |
|
||||
FEE BASIS PHARMACY I (#162.11) | |
|
||||
PRESCRIPTION NUMBER:GENERIC DRUG ............... (N S )-> | |
|
||||
TRANSFER PRICING TRA (#351.61) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
IB BILL/CLAIMS PRESC (#362.4) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
SECLUSION/RESTRAINT (#615.23) | |
|
||||
MEDICATIONS .................................... (N S )-> | |
|
||||
MEDICATION (#695) | |
|
||||
GENERIC NAME ................................... (N S C )-> | |
|
||||
GENERALIZED PROCEDUR (#699.53) | |
|
||||
MEDICATIONS .................................... (N S )-> | |
|
||||
ENDOSCOPY/CONSULT (#699.74) | |
|
||||
PRESCRIPTION GIVEN ............................. (N S )-> | |
|
||||
UNIT DOSE LOCAL EXTR (#727.809) | |
|
||||
BCMA DRUG DISPENSED ............................ (N S )-> | |
|
||||
IV DETAIL EXTRACT (#727.819) | |
|
||||
BCMA DRUG DISPENSED ............................ (N S )-> | |
|
||||
IV EXTRACT DATA (#728.113) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
UNIT DOSE EXTRACT DA (#728.904) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
ROR REGISTRY PARAMET (#798.129) | |
|
||||
LOCAL DRUG NAME ................................ (N S C )-> | |
|
||||
REMINDER FINDING ITE (#801.43) | |
|
||||
FINDING ITEM v ...................................(N S L)-> | |
|
||||
REMINDER EXTRACT SUM (#810.31) | |
|
||||
EXTRACT FINDINGS:FINDING ITEM v ..................(N S L)-> | |
|
||||
LREPI FINDING TOTALS:FINDING ITEM v ..............(N S L)-> | |
|
||||
REMINDER TERM (#811.52) | |
|
||||
FINDINGS:FINDING ITEM v ..........................(N S L)-> | |
|
||||
REMINDER DEFINITION (#811.902) | |
|
||||
FINDINGS:FINDING ITEM v ..........................(N S C L)-> | |
|
||||
APSP INTERVENTION (#9009032.4) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
-------------------------------
|
||||
|
||||
File/Package: PHARM ORD ITEM Date: APR 12,2012
|
||||
|
||||
FILE (#) POINTER (#) FILE
|
||||
POINTER FIELD TYPE POINTER FIELD FILE POINTED TO
|
||||
------------------------------------------------------------------------------------------------------------------------------------
|
||||
L=Laygo S=File not in set N=Normal Ref. C=Xref.
|
||||
*=Truncated m=Multiple v=Variable Pointer
|
||||
|
||||
-------------------------------
|
||||
DRUG (#50) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S C L)-> | 50.7 PHARMACY ORDERABLE I* |
|
||||
PRESCRIPTION (#52) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S )-> | DOSAGE FORM |-> DOSAGE FORM (file locked down)
|
||||
PENDING OUTPATIENT O (#52.41) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S )-> | MED ROUTE |-> MEDICATION ROUTES (addable)
|
||||
IV ADDITIVES (#52.6) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S C )-> | m DIVISION/SI:DIVISION/SI* |-> OUTPATIENT SITE (not used)
|
||||
IV SOLUTIONS (#52.7) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S C L)-> | m OI-DRUG TEX:OI-DRUG TEX* |-> DRUG TEXT (used -- included)
|
||||
NON-VERIFIED ORDERS (#53.1) | |
|
||||
ORDERABLE ITEM ................................. (N S )-> | |
|
||||
UNIT DOSE ORDER SET (#53.22) | |
|
||||
ORDERABLE ITEM ................................. (N S )-> | |
|
||||
PICK LIST (#53.52) | |
|
||||
PATIENT:ORDER:ORDERABLE ITEM ................... (N S )-> | |
|
||||
BCMA MEDICATION LOG (#53.79) | |
|
||||
ADMINISTRATION MEDICATION ...................... (N S )-> | |
|
||||
PHARMACY PATIENT (#55.01) | |
|
||||
IV:ORDERABLE ITEM .............................. (N S )-> | |
|
||||
NON-VA MEDS:ORDERABLE ITEM ..................... (N S )-> | |
|
||||
UNIT DOSE:ORDERABLE ITEM ....................... (N S )-> | |
|
||||
-------------------------------
|
||||
|
||||
File/Package: DRUG TEXT Date: APR 16,2012
|
||||
|
||||
FILE (#) POINTER (#) FILE
|
||||
POINTER FIELD TYPE POINTER FIELD FILE POINTED TO
|
||||
------------------------------------------------------------------------------------------------------------------------------------
|
||||
L=Laygo S=File not in set N=Normal Ref. C=Xref.
|
||||
*=Truncated m=Multiple v=Variable Pointer
|
||||
|
||||
-------------------------------
|
||||
DRUG (#50.037) | |
|
||||
DRUG TEXT ENTRY ................................ (N S C )-> | 51.7 DRUG TEXT |
|
||||
PHARMACY ORDERABLE I (#50.76) | |
|
||||
OI-DRUG TEXT ENTRY ............................. (N S )-> | |
|
||||
-------------------------------
|
||||
|
||||
File/Package: IV FILES Date: APR 16,2012
|
||||
|
||||
FILE (#) POINTER (#) FILE
|
||||
POINTER FIELD TYPE POINTER FIELD FILE POINTED TO
|
||||
------------------------------------------------------------------------------------------------------------------------------------
|
||||
L=Laygo S=File not in set N=Normal Ref. C=Xref.
|
||||
*=Truncated m=Multiple v=Variable Pointer
|
||||
|
||||
-------------------------------
|
||||
IV ADDITIVES (#52.62) | |
|
||||
ELECTROYLTES:ELECTROLYTE ....................... (N )-> | 50.4 DRUG ELECTROLYTES |
|
||||
IV SOLUTIONS (#52.702) | |
|
||||
ELECTROLYTES ................................... (N )-> | |
|
||||
-------------------------------
|
||||
-------------------------------
|
||||
IV CATEGORY (#50.2) | |
|
||||
IV DRUG v ........................................(N S L)-> | 52.6 IV ADDITIVES |
|
||||
IV DRUG v ........................................(N S L)-> | GENERIC DRUG |-> DRUG
|
||||
NON-VERIFIED ORDERS (#53.157) | |
|
||||
ADDITIVE ....................................... (N S C )-> | PHARMACY ORDERABLE ITEM |-> PHARMACY ORDERABLE ITEM
|
||||
BCMA MISSING DOSE RE (#53.686) | |
|
||||
ADDITIVES ...................................... (N S C )-> | *PRIMARY DRUG |-> PRIMARY DRUG
|
||||
BCMA UNABLE TO SCAN (#53.7711) | |
|
||||
ADDITIVE ....................................... (N S C )-> | QUICK CODE:USUAL IV SO* |-> IV SOLUTIONS
|
||||
BCMA MEDICATION LOG (#53.796) | |
|
||||
ADDITIVES ...................................... (N S C )-> | QUICK CODE:MED ROUTE |-> MEDICATION ROUTES
|
||||
PHARMACY PATIENT (#55.02) | |
|
||||
IV:ADDITIVE .................................... (N S )-> | m ELECTROYLTES:ELECTROLYTE |-> DRUG ELECTROLYTES
|
||||
BCMA ID:ADDITIVE ............................... (N S )-> | |
|
||||
PHARMACY QUICK ORDER (#57.17) | |
|
||||
ADDITIVE ....................................... (N S )-> | |
|
||||
-------------------------------
|
||||
-------------------------------
|
||||
IV CATEGORY (#50.2) | |
|
||||
IV DRUG v ........................................(N S L)-> | 52.7 IV SOLUTIONS |
|
||||
IV DRUG v ........................................(N S L)-> | GENERIC DRUG |-> DRUG
|
||||
IV ADDITIVES (#52.61) | |
|
||||
QUICK CODE:USUAL IV SOLUTION ................... (N )-> | PHARMACY ORDERABLE ITEM |-> PHARMACY ORDERABLE ITEM
|
||||
NON-VERIFIED ORDERS (#53.158) | |
|
||||
SOLUTION ....................................... (N S C )-> | *PRIMARY DRUG |-> PRIMARY DRUG
|
||||
BCMA MISSING DOSE RE (#53.687) | |
|
||||
SOLUTIONS ...................................... (N S C )-> | m ELECTROLYTES:ELECTROLYTES |-> DRUG ELECTROLYTES
|
||||
BCMA UNABLE TO SCAN (#53.7712) | |
|
||||
SOLUTIONS ...................................... (N S C )-> | |
|
||||
BCMA MEDICATION LOG (#53.797) | |
|
||||
SOLUTIONS ...................................... (N S C )-> | |
|
||||
PHARMACY PATIENT (#55.1058) | |
|
||||
BCMA ID:SOLUTION ............................... (N S )-> | |
|
||||
IV:SOLUTION .................................... (N S )-> | |
|
||||
PHARMACY QUICK ORDER (#57.18) | |
|
||||
SOLUTION ....................................... (N S )-> | |
|
||||
-------------------------------
|
||||
|
||||
|
|
@ -0,0 +1,205 @@
|
|||
VWPSSXPD ; VW/SMH - Update the Drug File and friends... ; 4/17/12 8:39am
|
||||
;;1.0;WorldVista Modifications;;;Build 5
|
||||
; (C) Sam Habiel
|
||||
; Licensed under AGPL
|
||||
;
|
||||
; This routine contains utilities to remove a drug file and install a new drug
|
||||
; file in VISTA originating in another system. As of Build 3, you can use KIDS
|
||||
; to transport the file.
|
||||
;
|
||||
; Workflow (Manual, without using KIDS)
|
||||
; On the Origin System:
|
||||
; - Create a Global Output containing:
|
||||
; ^PSDRUG DRUG
|
||||
; ^PS(50.7) PHARMACY ORDERABLE ITEM
|
||||
; ^PS(51.7) DRUG TEXT
|
||||
; ^PS(52.6) IV ADDITIVES
|
||||
; ^PS(52.7) IV SOLUTIONS
|
||||
; ^PS(50.4) DRUG ELECTROLYTES
|
||||
;
|
||||
; On the Destination System:
|
||||
; 1. Call KILLDRUG to remove all Drug Data
|
||||
; 2. Restore the global created above.
|
||||
; 3. Call RESTOCK to sync CPRS files back with drug files.
|
||||
;
|
||||
; Workflow (using KIDS):
|
||||
; On the Origin System:
|
||||
; - Create a KIDS build that calls the following:
|
||||
; 1. This Routine Name to call from top is the Environment Check for the Build
|
||||
; 2. TRAN is the Pre-Transport Routine for your originating system drug data
|
||||
; 3. PRE is the Pre-Init for the Destination System
|
||||
; 4. POST is the Post-Init for the Destination System
|
||||
; - Generate the KIDS Build. The file will have all the Drug Data from the Origin
|
||||
; System.
|
||||
; On the Destination System:
|
||||
; - Install the KIDS Build
|
||||
;
|
||||
; Limitations:
|
||||
; - If the Administration Schedules from the originating system and destination
|
||||
; system don't match, you need to either change the schedules on the orderable
|
||||
; items, or make the schedules on the destination system the same as the
|
||||
; ones from incoming drug file, otherwise, the problems you run into is this:
|
||||
; - Orders do not calculate frequency correctly if the schedule is not present
|
||||
; in the destination system. This means that the proper number of pills cannot
|
||||
; be calculated.
|
||||
; - In Outpatient Pharmacy, Schedules do not expand into patient readable
|
||||
; instructions
|
||||
; - If the National Drug Files are not up to date in the destination system, there
|
||||
; will be some broken pointers. All you have to do is update them.
|
||||
; - If some drugs are linked with lab tests, these need to be re-linked. Preferably,
|
||||
; these should be removed prior to transporting the drug file.
|
||||
;
|
||||
; --- ()()() ---
|
||||
;
|
||||
; PEPs: KILLDRUG to remove all Drugs
|
||||
; RESTOCK to add the drugs back to CPRS
|
||||
;
|
||||
; KIDS EPs:
|
||||
; Top EP Fall through -> Environment Check (call the routine from the top)
|
||||
; PRE -> Pre-Init for the Destination System
|
||||
; POST -> Post-Init for the Destination System
|
||||
; TRAN -> Pre-Transport Routine (to get data from original system)
|
||||
;
|
||||
; KIDS EPs call PEPs to do their work.
|
||||
;
|
||||
; Environment Check falls through from the top
|
||||
;
|
||||
; -- START KIDS HOOKS --
|
||||
;
|
||||
ENV ; Environment Check Routine; KIDS EP; top fallthough
|
||||
W $$CJ^XLFSTR("------ WARNING WARNING WARNING -----",80),!! ; Center Justify
|
||||
W "This package will delete your drug file and add a new drug file contained",!
|
||||
W "in the distribution.",!!
|
||||
W "If you have patient pharmacy data, this will CORRUPT your database.",!!
|
||||
N VWPROD S VWPROD=$$PROD^XUPROD() ; Check if a production acc; +ve val is yes
|
||||
W "You are running in a "_$S(VWPROD:"Production",1:"Test")_" Environment.",!!
|
||||
W "Are you sure you want to continue? Type a full YES/yes if you want to proceed)",!
|
||||
N X R "ANSWER: ",X:60
|
||||
S X=$$UP^XLFSTR(X) ; uppercase
|
||||
I X'="YES" S XPDQUIT=1 ; Quit if the user doesn't say yes
|
||||
QUIT
|
||||
;
|
||||
TRAN ; Pre-Transport routine for KIDS to ship off the 50, 50.7, 51.7 globals
|
||||
M @XPDGREF@("VWPSSXPD",50)=^PSDRUG ; DRUG
|
||||
M @XPDGREF@("VWPSSXPD",50.7)=^PS(50.7) ; PHARMACY ORDERABLE ITEM
|
||||
M @XPDGREF@("VWPSSXPD",51.7)=^PS(51.7) ; DRUG TEXT
|
||||
M @XPDGREF@("VWPSSXPD",52.6)=^PS(52.6) ; IV ADDITIVES
|
||||
M @XPDGREF@("VWPSSXPD",52.7)=^PS(52.7) ; IV SOLUTIONS
|
||||
M @XPDGREF@("VWPSSXPD",50.4)=^PS(50.4) ; DRUG ELECTROLYTES
|
||||
QUIT
|
||||
;
|
||||
PRE ; Pre-Init routine for KIDS
|
||||
DO KILLDRUG ; Remove old drugs from system.
|
||||
QUIT
|
||||
;
|
||||
POST ; Post-Init routine for KIDS
|
||||
; Load new drugs into system
|
||||
M ^PSDRUG=@XPDGREF@("VWPSSXPD",50) ; DRUG
|
||||
M ^PS(50.7)=@XPDGREF@("VWPSSXPD",50.7) ; PHARMACY ORDERABLE ITEM
|
||||
M ^PS(51.7)=@XPDGREF@("VWPSSXPD",51.7) ; DRUG TEXT
|
||||
M ^PS(52.6)=@XPDGREF@("VWPSSXPD",52.6) ; IV ADDITIVES
|
||||
M ^PS(52.7)=@XPDGREF@("VWPSSXPD",52.7) ; IV SOLUTIONS
|
||||
M ^PS(50.4)=@XPDGREF@("VWPSSXPD",50.4) ; DRUG ELECTROLYTES
|
||||
; Restock the CPRS files from the new drug files
|
||||
DO RESTOCK
|
||||
QUIT
|
||||
;
|
||||
; -- END KIDS HOOKS --
|
||||
;
|
||||
; -- BEGIN Public Entry Points --
|
||||
KILLDRUG ; Remove all Drug Data. PEP. Use this to call the routine.
|
||||
D DT^DICRW ; Min FM Vars
|
||||
D MES^XPDUTL("Killing Drug (50)") D DRUG
|
||||
D MES^XPDUTL("Killing Pharmacy Orderable Item (OI) (50.7)") D PO
|
||||
D MES^XPDUTL("Killing Drug Text (51.7)") D DRUGTEXT
|
||||
D MES^XPDUTL("Killing IV Additives (52.6)") D IVADD
|
||||
D MES^XPDUTL("Killing IV Solutions (52.7)") D IVSOL
|
||||
D MES^XPDUTL("Killing Drug Electrolytes (50.4)") D DRUGELEC
|
||||
D MES^XPDUTL("Removing Pharmacy OIs from the Orderable Item (101.43)") D O
|
||||
D MES^XPDUTL("Syncing the Order Quick View (101.44)") D CPRS
|
||||
QUIT
|
||||
;
|
||||
RESTOCK ; Restock CPRS Orderable Items from new Drug & Pharmacy Orderable Item
|
||||
; File. Public Entry Point.
|
||||
; Call this after repopulating the drug file (50) and the pharmacy orderable
|
||||
; item file (50.7)
|
||||
N PSOIEN ; Looper variable
|
||||
D DT^DICRW ; Establish FM Basic Variables
|
||||
;
|
||||
; Loop through Orderable Item file and call
|
||||
; 1. The Active/Inactive Updater for the Orderable Item
|
||||
; 2. the protocol file updater to CPRS Files
|
||||
S PSOIEN=0 F S PSOIEN=$O(^PS(50.7,PSOIEN)) Q:'PSOIEN D
|
||||
. D MES^XPDUTL("Syncing Pharamcy Orderable Item "_PSOIEN)
|
||||
. D EN^PSSPOIDT(PSOIEN),EN2^PSSHL1(PSOIEN,"MUP")
|
||||
D CPRS ; Update Orderable Item View files
|
||||
QUIT
|
||||
;
|
||||
; -- END Public Entry Points --
|
||||
;
|
||||
; -- The rest is private --
|
||||
DRUG ; Kill Drug File; Private
|
||||
N %1 S %1=^PSDRUG(0)
|
||||
K ^PSDRUG
|
||||
S ^PSDRUG(0)=%1
|
||||
S $P(^PSDRUG(0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
PO ; Kill Pharmacy Orderable Items; Private
|
||||
N %1 S %1=^PS(50.7,0)
|
||||
K ^PS(50.7)
|
||||
S ^PS(50.7,0)=%1
|
||||
S $P(^PS(50.7,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
DRUGTEXT ; Kill Drug Text Entries ; Private
|
||||
N %1 S %1=^PS(51.7,0)
|
||||
K ^PS(51.7)
|
||||
S ^PS(51.7,0)=%1
|
||||
S $P(^PS(51.7,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
IVADD ; Kill IV Additives ; Private
|
||||
N %1 S %1=^PS(52.6,0)
|
||||
K ^PS(52.6)
|
||||
S ^PS(52.6,0)=%1
|
||||
S $P(^PS(52.6,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
IVSOL ; Kill IV Solutions ; Private
|
||||
N %1 S %1=^PS(52.7,0)
|
||||
K ^PS(52.7)
|
||||
S ^PS(52.7,0)=%1
|
||||
S $P(^PS(52.7,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
DRUGELEC ; Kill Drug Electrolytes ; Private
|
||||
N %1 S %1=^PS(50.4,0)
|
||||
K ^PS(50.4)
|
||||
S ^PS(50.4,0)=%1
|
||||
S $P(^PS(50.4,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
O ; Kill off Pharamcy Order Items (Only!) in the Orderable Item file; Private
|
||||
N DA ; Used in For loop below
|
||||
N DIK S DIK="^ORD(101.43,"
|
||||
N I S I=0
|
||||
FOR S I=$O(^ORD(101.43,"ID",I)) QUIT:I="" DO
|
||||
. I I["PSP" S DA=$O(^ORD(101.43,"ID",I,"")) D ^DIK
|
||||
QUIT
|
||||
;
|
||||
CPRS ; Now, update the CPRS lists (sync with Orderable Item file) -
|
||||
; Uses a CPRS API to do this; Private
|
||||
; Next 3 variables are required as inputs
|
||||
N ATTEMPT S ATTEMPT=0 ; Attempt to Update
|
||||
N UPDTIME S UPDTIME=$HOROLOG ; Update Time
|
||||
N DGNM ; Dialog Name
|
||||
; IVA RX -> Additives; IVB RX -> Solutions
|
||||
; IVM RX -> Inpatient Meds for Outpatients
|
||||
; NV RX -> Non-VA Meds ; O RX -> Outpatient
|
||||
; UD RX -> Unit Dose
|
||||
FOR DGNM="IVA RX","IVB RX","IVM RX","NV RX","O RX","UD RX" DO
|
||||
. D MES^XPDUTL(" --> Rebuilding "_DGNM)
|
||||
. D FVBLD^ORWUL
|
||||
QUIT
|
||||
;
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
|
|
@ -0,0 +1,20 @@
|
|||
KBANCLN ; WV/SMH - Jordan Drug File Clean-up; 5/16/12 1:18pm
|
||||
N KBANFDA
|
||||
N KBANIEN S KBANIEN=0
|
||||
; Loop through Drug File (no indexes)
|
||||
F S KBANIEN=$O(^PSDRUG(KBANIEN)) Q:'+KBANIEN DO
|
||||
. W KBANIEN
|
||||
. W " "
|
||||
. ; Remove Arabic Local Possible Dossages
|
||||
. N KBANLD S KBANLD=0
|
||||
. F S KBANLD=$O(^PSDRUG(KBANIEN,"DOS2",KBANLD)) Q:'+KBANLD S KBANFDA(50.0904,KBANLD_","_KBANIEN_",",3)="@"
|
||||
. ; Remove ATC Ward Groups
|
||||
. N KBANATC S KBANATC=0
|
||||
. F S KBANATC=$O(^PSDRUG(KBANIEN,212,KBANATC)) Q:'+KBANATC S KBANFDA(50.0212,KBANATC_","_KBANIEN_",",.01)="@"
|
||||
. ; Remove IFCAP item pointers
|
||||
. N IFCAP S IFCAP=0
|
||||
. F S IFCAP=$O(^PSDRUG(KBANIEN,441,IFCAP)) Q:'+IFCAP S KBANFDA(50.0441,IFCAP_","_KBANIEN_",",.01)="@"
|
||||
N ERR
|
||||
; Delete!
|
||||
D FILE^DIE("","KBANFDA","ERR")
|
||||
ZWRITE:$D(ERR) ERR
|
||||
|
|
@ -0,0 +1,378 @@
|
|||
|
||||
--- KIDS TEXT ----
|
||||
Created by Sam Habiel on Thursday 12 April 2011 for WorldVistA.
|
||||
|
||||
--- WARNING ---
|
||||
If you install the KIDS build produced by this tool on a production system
|
||||
containing pharmacy patient data, you will cause database corruption and
|
||||
jeopardize patient safety.
|
||||
--- WARNING ---
|
||||
|
||||
This KIDS Build transports the following files from a source system to a
|
||||
destination system and then syncs CPRS OE/RR files with the new files.
|
||||
; ^PSDRUG DRUG
|
||||
; ^PS(50.7) PHARMACY ORDERABLE ITEM
|
||||
; ^PS(51.7) DRUG TEXT
|
||||
; ^PS(52.6) IV ADDITIVES
|
||||
; ^PS(52.7) IV SOLUTIONS
|
||||
; ^PS(50.4) DRUG ELECTROLYTES
|
||||
|
||||
Workflow (using KIDS):
|
||||
; On the Origin System:
|
||||
; - Create a KIDS build that calls the following:
|
||||
; 1. VWPSSXPD to call from top is the Environment Check for the
|
||||
; Build
|
||||
; 2. PRE^VWPSSXPD is the Pre-Init for the Destination System
|
||||
; 3. POST^VWPSSXPD is the Post-Init for the Destination System
|
||||
; 4. TRAN^VWPSSXPD is the Pre-Transport Routine for your originating system drug data
|
||||
; - Generate the KIDS Build. The file will have all the Drug Data from the
|
||||
; Origin System.
|
||||
;
|
||||
; On the Destination System:
|
||||
; - Install the KIDS Build
|
||||
|
||||
The entry points in the attached routine (VWPSSXPD) can be used by
|
||||
themselves to remove an old drug file and add a new one.
|
||||
|
||||
Documentation for using the Drug File updating utility WITH and WITHOUT KIDS
|
||||
can be found in VWPSSXPD.m.
|
||||
|
||||
KIDS file contains this routine plus a sample drug file to be installed
|
||||
into a destination system.
|
||||
|
||||
--- END KIDS TEXT ----
|
||||
License is AGPL.
|
||||
|
||||
Author is Sam Habiel for WorldVistA.
|
||||
|
||||
Limitations/Ideas for Future Development:
|
||||
- Not sure if the MEDICATION ROUTES should be transmitted or not. While
|
||||
additions are allowed, they are by my experience uncommon.
|
||||
- Many reference files (e.g. PACKAGE SIZE or DRUG UNITS) are not part of the
|
||||
NDF, yet they are not user modifiable. Yet, they are referenced almost
|
||||
exclusively from the National Drug Files; which means that they cannot be
|
||||
changed without corrupting the NDF data. I am trying to find documentation
|
||||
to say that they are standard.
|
||||
- If the Administration Schedules from the originating system and destination
|
||||
system don't match, you need to either change the schedules on the orderable
|
||||
items, or make the schedules on the destination system the same as the
|
||||
ones from incoming drug file, otherwise, the problems you run into is this:
|
||||
- Orders do not calculate frequency correctly if the schedule is not present
|
||||
in the destination system. This means that the proper number of pills
|
||||
cannot be calculated.
|
||||
- In Outpatient Pharmacy, Schedules do not expand into patient readable
|
||||
instructions
|
||||
- If the National Drug Files are not up to date in the destination system,
|
||||
there will be some broken pointers. All you have to do is update the NDF with
|
||||
the latest patches.
|
||||
- If some drugs are linked with lab tests, these need to be re-linked.
|
||||
Preferably, these should be removed prior to transporting the drug file.
|
||||
|
||||
|
||||
Remarks on Broken Pointers in Destination Systems as a result of using this
|
||||
package:
|
||||
Because many files point to the Pharmacy Orderable Item and Drug files, you
|
||||
practically cannot use this package on a database that contains patient-
|
||||
specific pharmacy data since all data will be corrupted.
|
||||
|
||||
When installing a new drug and pharmacy orderable item file, the following may
|
||||
be broken:
|
||||
For Drug File:
|
||||
- LAB TEST MONITOR field.
|
||||
- SPECIMEN TYPE field.
|
||||
- CLOZAPINE LAB TEST:LAB TEST MONITOR field
|
||||
- CLOZAPINE LAB TEST:SPECIMEN TYPE field
|
||||
- ATC CANISTER:WARD GROUP FOR CANISTER
|
||||
- ACTIVITY LOG:INITIATOR OF ACTIVITY (field not used currently)
|
||||
- NDC BY OUTPATIENT SITE:OUTPATIENT SITE
|
||||
- IFCAP ITEM NUMBER:ITEM NUMBER (field not used currently)
|
||||
- Custom UNIT DOSE MED ROUTE (field not used currently)
|
||||
- NATIONAL DRUG FILE ENTRY (if you don't have a recently patched NDF)
|
||||
- PSNDF VA PRODUCT NAME ENTRY (if you don't have a recently patched NDF).
|
||||
|
||||
For Pharmacy Orderable Item File:
|
||||
- MEDICATION ROUTES (additions are allowed, not deletions)
|
||||
|
||||
The National Drug Files are Standardized. However, a system may be out of date.
|
||||
If you do not have the latest National Drug Files, you have will broken
|
||||
pointers if the source of your drug files has a more recent National Drug File.
|
||||
For best results, the source system and the destination system should have a
|
||||
commensurate NDF patch level.
|
||||
|
||||
To check for broken pointers, use the VERIFY FIELDs option in Fileman.
|
||||
Here is an example of a drug file from a patched system installed on a system
|
||||
that is not patched:
|
||||
|
||||
==============================================================================
|
||||
GTM>D P^DI
|
||||
|
||||
|
||||
VA FileMan 22.0
|
||||
|
||||
|
||||
Select OPTION: UTILITY FUNCTIONS
|
||||
Select UTILITY OPTION: VERIFY FIELDS
|
||||
|
||||
MODIFY WHAT FILE: DRUG//
|
||||
VERIFY WHICH FIELD: PSNDF VA PRODUCT NAME ENTRY
|
||||
|
||||
DEVICE: HOME//
|
||||
|
||||
VERIFY FIELDS REPORT
|
||||
DRUG FILE (#50) APR 16, 2012 12:40 PAGE 1
|
||||
-------------------------------------------------------------------------------
|
||||
POINTER
|
||||
(CANNOT CHECK CROSS-REFERENCE)
|
||||
|
||||
ENTRY# GENERIC NAME ERROR
|
||||
148 GUANFACINE 1MG TAB ER No '21739' in pointed-to File
|
||||
149 GUANFACINE 2MG TAB ER No '21740' in pointed-to File
|
||||
168 LURASIDONE 40MG TAB No '22028' in pointed-to File
|
||||
169 LURASIDONE 80MG TAB No '22030' in pointed-to File
|
||||
221 LEVONORGESTREL 1.5MG TAB No '21157' in pointed-to File
|
||||
450 LIDOCAINE 5% PATCH No '22004' in pointed-to File
|
||||
456 NEOMYCIN/POLYMYXIN/BACITRACIN OINT No '21497' in pointed-to File
|
||||
485 MICONAZOLE 4% VAGINAL CREAM No '22325' in pointed-to File
|
||||
585 PALIPERIDONE 234MG INJ SUSP PFSNo '21021' in pointed-to File
|
||||
586 PALIPERIDONE 156MG INJ SUSP PFSNo '21022' in pointed-to File
|
||||
==============================================================================
|
||||
|
||||
Below you will find the pointer relations of all the files that are transmitted in this KIDS build.
|
||||
|
||||
File/Package: DRUG Date: APR 12,2012
|
||||
|
||||
FILE (#) POINTER (#) FILE
|
||||
POINTER FIELD TYPE POINTER FIELD FILE POINTED TO
|
||||
------------------------------------------------------------------------------------------------------------------------------------
|
||||
L=Laygo S=File not in set N=Normal Ref. C=Xref.
|
||||
*=Truncated m=Multiple v=Variable Pointer
|
||||
|
||||
-------------------------------
|
||||
DRUG (#50) | |
|
||||
CORRESPONDING OUTPATIENT DRUG .................. (N )-> | 50 DRUG |
|
||||
CORRESPONDING INPATIENT DRUG ................... (N )-> | PHARMACY ORDERABLE ITEM |-> PHARMACY ORDERABLE ITEM (inc)
|
||||
FORMULARY ALTERNATIVE .......................... (N C )-> | ORDER UNIT |-> ORDER UNIT (only modifiable
|
||||
from FM, possibly standard)
|
||||
DUE QUESTIONNAIRE (#50.07301) | |
|
||||
DRUG ........................................... (N S C )-> | LAB TEST MONITOR |-> LABORATORY TEST (possible brok pt)
|
||||
DUE ANSWER SHEET (#50.0731) | |
|
||||
DRUG ........................................... (N S C )-> | SPECIMEN TYPE |-> TOPOGRAPHY FIELD (possible break)
|
||||
IV CATEGORY (#50.21) | |
|
||||
IV DRUG:GENERIC DRUG ........................... (N S )-> | NATIONAL DRUG FILE ENTRY |-> VA GENERIC (standard)
|
||||
DRUG COST (#50.9002) | |
|
||||
PHYSICIAN DATA:DRUG ............................ (N S )-> | PSNDF VA PRODUCT NAME EN* |-> VA PRODUCT (standard)
|
||||
DRUG DATA:DRUG ................................. (N S )-> | PACKAGE SIZE |-> PACKAGE SIZE (only mod from FM)
|
||||
(possibly standard)
|
||||
DIVISION DATA:DRUG DATA:DRUG ................... (N S )-> | PACKAGE TYPE |-> PACKAGE TYPE (only mod from FM)
|
||||
(possibly standard)
|
||||
PRESCRIPTION (#52) | |
|
||||
DRUG ........................................... (N S C )-> | NATIONAL DRUG CLASS |-> VA DRUG CLASS (standard)
|
||||
PENDING OUTPATIENT O (#52.41) | |
|
||||
DRUG ........................................... (N S )-> | UNIT DOSE MED ROUTE |-> MEDICATION ROUTES (addable)
|
||||
IV ADDITIVES (#52.6) | |
|
||||
GENERIC DRUG ................................... (N S C )-> | CORRESPONDING OUTPATIENT* |-> DRUG (this file)
|
||||
IV SOLUTIONS (#52.7) | |
|
||||
GENERIC DRUG ................................... (N S C )-> | *PRIMARY DRUG |-> PRIMARY DRUG (not used)
|
||||
NON-VERIFIED ORDERS (#53.1) | |
|
||||
SOLUTION ....................................... (N S )-> | UNIT |-> DRUG UNITS (only mod from FM)
|
||||
(possibly standard)
|
||||
DISPENSE DRUG .................................. (N S )-> | CORRESPONDING INPATIENT * |-> DRUG (this file)
|
||||
UNIT DOSE ORDER SET (#53.2102) | |
|
||||
*DRUG:*DISPENSE DRUG ........................... (N S C )-> | *LAB TEST MONITOR |-> LABORATORY TEST (not used)
|
||||
ORDERABLE ITEM:DISPENSE DRUG ................... (N S )-> | *SPECIMEN TYPE |-> TOPOGRAPHY FIELD (not used)
|
||||
INPATIENT USER PARAM (#53.4502) | |
|
||||
DISPENSE DRUG .................................. (N S C )-> | m CLOZAPINE L:LAB TEST MO* |-> LABORATORY TEST (broken)
|
||||
BCMA MISSING DOSE RE (#53.68) | |
|
||||
DRUG REQUESTED ................................. (N S )-> | CLOZAPINE L:SPECIMEN TY* |-> TOPOGRAPHY FIELD (broken)
|
||||
BCMA UNABLE TO SCAN (#53.771) | |
|
||||
DISPENSE DRUG .................................. (N S C )-> | m ATC CANISTE:WARD GROUP * |-> WARD GROUP (site specific)
|
||||
BCMA MEDICATION VARI (#53.78) | |
|
||||
DRUG SCANNED ................................... (N S )-> | ACTIVITY LO:INITIATOR O* |-> NEW PERSON (not used)
|
||||
BCMA MEDICATION LOG (#53.795) | |
|
||||
DISPENSE DRUG .................................. (N S C )-> | NDC BY OUTP:OUTPATIENT * |-> OUTPATIENT SITE (site specific)
|
||||
PHARMACY PATIENT (#55.05) | |
|
||||
NON-VA MEDS:DISPENSE DRUG ...................... (N S )-> | m DRUG TEXT E:DRUG TEXT E* |-> DRUG TEXT (included)
|
||||
UNIT DOSE:*SOLUTION ............................ (N S )-> | m IFCAP ITEM :ITEM NUMBER* |-> ITEM MASTER (WV empty file)
|
||||
UNIT DOSE:DISPENSE LOG:DISPENSE DRUG ........... (N S )-> | m FORMULARY A:FORMULARY A* |-> DRUG (this file)
|
||||
UNIT DOSE:DISPENSE DRUG ........................ (N S )-> | |
|
||||
UNIT DOSE PICK LIST (#57.63) | |
|
||||
WARD:PROVIDER:DRUG ............................. (N S )-> | |
|
||||
PHARMACY AOU STOCK (#58.11) | |
|
||||
ITEM ........................................... (N S )-> | |
|
||||
PHARMACY BACKORDER (#58.3) | |
|
||||
ITEM ........................................... (N S C )-> | |
|
||||
AR/WS STATS FILE (#58.52) | |
|
||||
INPATIENT SITE:RECALCULATE AMIS:DRUG ........... (N S )-> | |
|
||||
DRUG ACCOUNTABILITY (#58.8001) | |
|
||||
DRUG ........................................... (N S C )-> | |
|
||||
DRUG ACCOUNTABILITY (#58.81) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
DRUG ACCOUNTABILITY (#58.81125) | |
|
||||
INVOICE DATA:LINE ITEM DATA:DRUG ............... (N S )-> | |
|
||||
CS WORKSHEET (#58.85) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
CS DESTRUCTION (#58.86) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
PRICE PER DISPENSE UNIT ........................ (N S )-> | |
|
||||
CS CORRECTION LOG (#58.87) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
OUTPATIENT SITE (#59) | |
|
||||
METHADONE DRUG ................................. (N S )-> | |
|
||||
PHARMACY SYSTEM (#59.7) | |
|
||||
LAST DRUG CONVERTED ............................ (N S )-> | |
|
||||
LAST DRUG LINKED ............................... (N S )-> | |
|
||||
RAD/NUC MED PATIENT (#70.15) | |
|
||||
REGISTERE:EXAMINATION:MEDICATIONS:MED ADMINIS* . (N S )-> | |
|
||||
NUC MED EXAM DATA (#70.21) | |
|
||||
RADIOPHARMACEUTICALS:RADIOPHARMACEUTICAL ....... (N S )-> | |
|
||||
RAD/NUC MED PROCEDUR (#71.055) | |
|
||||
DEFAULT MEDICATIONS:DEFAULT MEDICATION ......... (N S C )-> | |
|
||||
DEFAULT RADIOPHARMACEU:DEFAULT RADIOPHARMACEUTI* (N S )-> | |
|
||||
RADIOPHARMACEUTICAL (#71.9) | |
|
||||
RADIOPHARM ..................................... (N S )-> | |
|
||||
ORDER STATISTICS (#100.1) | |
|
||||
NAME v ...........................................(N S C L)-> | |
|
||||
PATIENT ALLERGIES (#120.8) | |
|
||||
GMR ALLERGY v ....................................(N S L)-> | |
|
||||
SURGERY (#130.33) | |
|
||||
MEDICATIONS .................................... (N S )-> | |
|
||||
ANESTHESIA TECHNIQUE:ANESTHESIA AGENTS ......... (N S )-> | |
|
||||
ANESTHESIA TECHNIQUE:TEST DOSE ................. (N S )-> | |
|
||||
FEE BASIS PHARMACY I (#162.11) | |
|
||||
PRESCRIPTION NUMBER:GENERIC DRUG ............... (N S )-> | |
|
||||
TRANSFER PRICING TRA (#351.61) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
IB BILL/CLAIMS PRESC (#362.4) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
SECLUSION/RESTRAINT (#615.23) | |
|
||||
MEDICATIONS .................................... (N S )-> | |
|
||||
MEDICATION (#695) | |
|
||||
GENERIC NAME ................................... (N S C )-> | |
|
||||
GENERALIZED PROCEDUR (#699.53) | |
|
||||
MEDICATIONS .................................... (N S )-> | |
|
||||
ENDOSCOPY/CONSULT (#699.74) | |
|
||||
PRESCRIPTION GIVEN ............................. (N S )-> | |
|
||||
UNIT DOSE LOCAL EXTR (#727.809) | |
|
||||
BCMA DRUG DISPENSED ............................ (N S )-> | |
|
||||
IV DETAIL EXTRACT (#727.819) | |
|
||||
BCMA DRUG DISPENSED ............................ (N S )-> | |
|
||||
IV EXTRACT DATA (#728.113) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
UNIT DOSE EXTRACT DA (#728.904) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
ROR REGISTRY PARAMET (#798.129) | |
|
||||
LOCAL DRUG NAME ................................ (N S C )-> | |
|
||||
REMINDER FINDING ITE (#801.43) | |
|
||||
FINDING ITEM v ...................................(N S L)-> | |
|
||||
REMINDER EXTRACT SUM (#810.31) | |
|
||||
EXTRACT FINDINGS:FINDING ITEM v ..................(N S L)-> | |
|
||||
LREPI FINDING TOTALS:FINDING ITEM v ..............(N S L)-> | |
|
||||
REMINDER TERM (#811.52) | |
|
||||
FINDINGS:FINDING ITEM v ..........................(N S L)-> | |
|
||||
REMINDER DEFINITION (#811.902) | |
|
||||
FINDINGS:FINDING ITEM v ..........................(N S C L)-> | |
|
||||
APSP INTERVENTION (#9009032.4) | |
|
||||
DRUG ........................................... (N S )-> | |
|
||||
-------------------------------
|
||||
|
||||
File/Package: PHARM ORD ITEM Date: APR 12,2012
|
||||
|
||||
FILE (#) POINTER (#) FILE
|
||||
POINTER FIELD TYPE POINTER FIELD FILE POINTED TO
|
||||
------------------------------------------------------------------------------------------------------------------------------------
|
||||
L=Laygo S=File not in set N=Normal Ref. C=Xref.
|
||||
*=Truncated m=Multiple v=Variable Pointer
|
||||
|
||||
-------------------------------
|
||||
DRUG (#50) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S C L)-> | 50.7 PHARMACY ORDERABLE I* |
|
||||
PRESCRIPTION (#52) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S )-> | DOSAGE FORM |-> DOSAGE FORM (file locked down)
|
||||
PENDING OUTPATIENT O (#52.41) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S )-> | MED ROUTE |-> MEDICATION ROUTES (addable)
|
||||
IV ADDITIVES (#52.6) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S C )-> | m DIVISION/SI:DIVISION/SI* |-> OUTPATIENT SITE (not used)
|
||||
IV SOLUTIONS (#52.7) | |
|
||||
PHARMACY ORDERABLE ITEM ........................ (N S C L)-> | m OI-DRUG TEX:OI-DRUG TEX* |-> DRUG TEXT (used -- included)
|
||||
NON-VERIFIED ORDERS (#53.1) | |
|
||||
ORDERABLE ITEM ................................. (N S )-> | |
|
||||
UNIT DOSE ORDER SET (#53.22) | |
|
||||
ORDERABLE ITEM ................................. (N S )-> | |
|
||||
PICK LIST (#53.52) | |
|
||||
PATIENT:ORDER:ORDERABLE ITEM ................... (N S )-> | |
|
||||
BCMA MEDICATION LOG (#53.79) | |
|
||||
ADMINISTRATION MEDICATION ...................... (N S )-> | |
|
||||
PHARMACY PATIENT (#55.01) | |
|
||||
IV:ORDERABLE ITEM .............................. (N S )-> | |
|
||||
NON-VA MEDS:ORDERABLE ITEM ..................... (N S )-> | |
|
||||
UNIT DOSE:ORDERABLE ITEM ....................... (N S )-> | |
|
||||
-------------------------------
|
||||
|
||||
File/Package: DRUG TEXT Date: APR 16,2012
|
||||
|
||||
FILE (#) POINTER (#) FILE
|
||||
POINTER FIELD TYPE POINTER FIELD FILE POINTED TO
|
||||
------------------------------------------------------------------------------------------------------------------------------------
|
||||
L=Laygo S=File not in set N=Normal Ref. C=Xref.
|
||||
*=Truncated m=Multiple v=Variable Pointer
|
||||
|
||||
-------------------------------
|
||||
DRUG (#50.037) | |
|
||||
DRUG TEXT ENTRY ................................ (N S C )-> | 51.7 DRUG TEXT |
|
||||
PHARMACY ORDERABLE I (#50.76) | |
|
||||
OI-DRUG TEXT ENTRY ............................. (N S )-> | |
|
||||
-------------------------------
|
||||
|
||||
File/Package: IV FILES Date: APR 16,2012
|
||||
|
||||
FILE (#) POINTER (#) FILE
|
||||
POINTER FIELD TYPE POINTER FIELD FILE POINTED TO
|
||||
------------------------------------------------------------------------------------------------------------------------------------
|
||||
L=Laygo S=File not in set N=Normal Ref. C=Xref.
|
||||
*=Truncated m=Multiple v=Variable Pointer
|
||||
|
||||
-------------------------------
|
||||
IV ADDITIVES (#52.62) | |
|
||||
ELECTROYLTES:ELECTROLYTE ....................... (N )-> | 50.4 DRUG ELECTROLYTES |
|
||||
IV SOLUTIONS (#52.702) | |
|
||||
ELECTROLYTES ................................... (N )-> | |
|
||||
-------------------------------
|
||||
-------------------------------
|
||||
IV CATEGORY (#50.2) | |
|
||||
IV DRUG v ........................................(N S L)-> | 52.6 IV ADDITIVES |
|
||||
IV DRUG v ........................................(N S L)-> | GENERIC DRUG |-> DRUG
|
||||
NON-VERIFIED ORDERS (#53.157) | |
|
||||
ADDITIVE ....................................... (N S C )-> | PHARMACY ORDERABLE ITEM |-> PHARMACY ORDERABLE ITEM
|
||||
BCMA MISSING DOSE RE (#53.686) | |
|
||||
ADDITIVES ...................................... (N S C )-> | *PRIMARY DRUG |-> PRIMARY DRUG
|
||||
BCMA UNABLE TO SCAN (#53.7711) | |
|
||||
ADDITIVE ....................................... (N S C )-> | QUICK CODE:USUAL IV SO* |-> IV SOLUTIONS
|
||||
BCMA MEDICATION LOG (#53.796) | |
|
||||
ADDITIVES ...................................... (N S C )-> | QUICK CODE:MED ROUTE |-> MEDICATION ROUTES
|
||||
PHARMACY PATIENT (#55.02) | |
|
||||
IV:ADDITIVE .................................... (N S )-> | m ELECTROYLTES:ELECTROLYTE |-> DRUG ELECTROLYTES
|
||||
BCMA ID:ADDITIVE ............................... (N S )-> | |
|
||||
PHARMACY QUICK ORDER (#57.17) | |
|
||||
ADDITIVE ....................................... (N S )-> | |
|
||||
-------------------------------
|
||||
-------------------------------
|
||||
IV CATEGORY (#50.2) | |
|
||||
IV DRUG v ........................................(N S L)-> | 52.7 IV SOLUTIONS |
|
||||
IV DRUG v ........................................(N S L)-> | GENERIC DRUG |-> DRUG
|
||||
IV ADDITIVES (#52.61) | |
|
||||
QUICK CODE:USUAL IV SOLUTION ................... (N )-> | PHARMACY ORDERABLE ITEM |-> PHARMACY ORDERABLE ITEM
|
||||
NON-VERIFIED ORDERS (#53.158) | |
|
||||
SOLUTION ....................................... (N S C )-> | *PRIMARY DRUG |-> PRIMARY DRUG
|
||||
BCMA MISSING DOSE RE (#53.687) | |
|
||||
SOLUTIONS ...................................... (N S C )-> | m ELECTROLYTES:ELECTROLYTES |-> DRUG ELECTROLYTES
|
||||
BCMA UNABLE TO SCAN (#53.7712) | |
|
||||
SOLUTIONS ...................................... (N S C )-> | |
|
||||
BCMA MEDICATION LOG (#53.797) | |
|
||||
SOLUTIONS ...................................... (N S C )-> | |
|
||||
PHARMACY PATIENT (#55.1058) | |
|
||||
BCMA ID:SOLUTION ............................... (N S )-> | |
|
||||
IV:SOLUTION .................................... (N S )-> | |
|
||||
PHARMACY QUICK ORDER (#57.18) | |
|
||||
SOLUTION ....................................... (N S )-> | |
|
||||
-------------------------------
|
||||
|
||||
|
|
@ -0,0 +1,205 @@
|
|||
VWPSSXPD ; VW/SMH - Update the Drug File and friends... ; 4/17/12 8:39am
|
||||
;;1.0;WorldVista Modifications;;;Build 5
|
||||
; (C) Sam Habiel
|
||||
; Licensed under AGPL
|
||||
;
|
||||
; This routine contains utilities to remove a drug file and install a new drug
|
||||
; file in VISTA originating in another system. As of Build 3, you can use KIDS
|
||||
; to transport the file.
|
||||
;
|
||||
; Workflow (Manual, without using KIDS)
|
||||
; On the Origin System:
|
||||
; - Create a Global Output containing:
|
||||
; ^PSDRUG DRUG
|
||||
; ^PS(50.7) PHARMACY ORDERABLE ITEM
|
||||
; ^PS(51.7) DRUG TEXT
|
||||
; ^PS(52.6) IV ADDITIVES
|
||||
; ^PS(52.7) IV SOLUTIONS
|
||||
; ^PS(50.4) DRUG ELECTROLYTES
|
||||
;
|
||||
; On the Destination System:
|
||||
; 1. Call KILLDRUG to remove all Drug Data
|
||||
; 2. Restore the global created above.
|
||||
; 3. Call RESTOCK to sync CPRS files back with drug files.
|
||||
;
|
||||
; Workflow (using KIDS):
|
||||
; On the Origin System:
|
||||
; - Create a KIDS build that calls the following:
|
||||
; 1. This Routine Name to call from top is the Environment Check for the Build
|
||||
; 2. TRAN is the Pre-Transport Routine for your originating system drug data
|
||||
; 3. PRE is the Pre-Init for the Destination System
|
||||
; 4. POST is the Post-Init for the Destination System
|
||||
; - Generate the KIDS Build. The file will have all the Drug Data from the Origin
|
||||
; System.
|
||||
; On the Destination System:
|
||||
; - Install the KIDS Build
|
||||
;
|
||||
; Limitations:
|
||||
; - If the Administration Schedules from the originating system and destination
|
||||
; system don't match, you need to either change the schedules on the orderable
|
||||
; items, or make the schedules on the destination system the same as the
|
||||
; ones from incoming drug file, otherwise, the problems you run into is this:
|
||||
; - Orders do not calculate frequency correctly if the schedule is not present
|
||||
; in the destination system. This means that the proper number of pills cannot
|
||||
; be calculated.
|
||||
; - In Outpatient Pharmacy, Schedules do not expand into patient readable
|
||||
; instructions
|
||||
; - If the National Drug Files are not up to date in the destination system, there
|
||||
; will be some broken pointers. All you have to do is update them.
|
||||
; - If some drugs are linked with lab tests, these need to be re-linked. Preferably,
|
||||
; these should be removed prior to transporting the drug file.
|
||||
;
|
||||
; --- ()()() ---
|
||||
;
|
||||
; PEPs: KILLDRUG to remove all Drugs
|
||||
; RESTOCK to add the drugs back to CPRS
|
||||
;
|
||||
; KIDS EPs:
|
||||
; Top EP Fall through -> Environment Check (call the routine from the top)
|
||||
; PRE -> Pre-Init for the Destination System
|
||||
; POST -> Post-Init for the Destination System
|
||||
; TRAN -> Pre-Transport Routine (to get data from original system)
|
||||
;
|
||||
; KIDS EPs call PEPs to do their work.
|
||||
;
|
||||
; Environment Check falls through from the top
|
||||
;
|
||||
; -- START KIDS HOOKS --
|
||||
;
|
||||
ENV ; Environment Check Routine; KIDS EP; top fallthough
|
||||
W $$CJ^XLFSTR("------ WARNING WARNING WARNING -----",80),!! ; Center Justify
|
||||
W "This package will delete your drug file and add a new drug file contained",!
|
||||
W "in the distribution.",!!
|
||||
W "If you have patient pharmacy data, this will CORRUPT your database.",!!
|
||||
N VWPROD S VWPROD=$$PROD^XUPROD() ; Check if a production acc; +ve val is yes
|
||||
W "You are running in a "_$S(VWPROD:"Production",1:"Test")_" Environment.",!!
|
||||
W "Are you sure you want to continue? Type a full YES/yes if you want to proceed)",!
|
||||
N X R "ANSWER: ",X:60
|
||||
S X=$$UP^XLFSTR(X) ; uppercase
|
||||
I X'="YES" S XPDQUIT=1 ; Quit if the user doesn't say yes
|
||||
QUIT
|
||||
;
|
||||
TRAN ; Pre-Transport routine for KIDS to ship off the 50, 50.7, 51.7 globals
|
||||
M @XPDGREF@("VWPSSXPD",50)=^PSDRUG ; DRUG
|
||||
M @XPDGREF@("VWPSSXPD",50.7)=^PS(50.7) ; PHARMACY ORDERABLE ITEM
|
||||
M @XPDGREF@("VWPSSXPD",51.7)=^PS(51.7) ; DRUG TEXT
|
||||
M @XPDGREF@("VWPSSXPD",52.6)=^PS(52.6) ; IV ADDITIVES
|
||||
M @XPDGREF@("VWPSSXPD",52.7)=^PS(52.7) ; IV SOLUTIONS
|
||||
M @XPDGREF@("VWPSSXPD",50.4)=^PS(50.4) ; DRUG ELECTROLYTES
|
||||
QUIT
|
||||
;
|
||||
PRE ; Pre-Init routine for KIDS
|
||||
DO KILLDRUG ; Remove old drugs from system.
|
||||
QUIT
|
||||
;
|
||||
POST ; Post-Init routine for KIDS
|
||||
; Load new drugs into system
|
||||
M ^PSDRUG=@XPDGREF@("VWPSSXPD",50) ; DRUG
|
||||
M ^PS(50.7)=@XPDGREF@("VWPSSXPD",50.7) ; PHARMACY ORDERABLE ITEM
|
||||
M ^PS(51.7)=@XPDGREF@("VWPSSXPD",51.7) ; DRUG TEXT
|
||||
M ^PS(52.6)=@XPDGREF@("VWPSSXPD",52.6) ; IV ADDITIVES
|
||||
M ^PS(52.7)=@XPDGREF@("VWPSSXPD",52.7) ; IV SOLUTIONS
|
||||
M ^PS(50.4)=@XPDGREF@("VWPSSXPD",50.4) ; DRUG ELECTROLYTES
|
||||
; Restock the CPRS files from the new drug files
|
||||
DO RESTOCK
|
||||
QUIT
|
||||
;
|
||||
; -- END KIDS HOOKS --
|
||||
;
|
||||
; -- BEGIN Public Entry Points --
|
||||
KILLDRUG ; Remove all Drug Data. PEP. Use this to call the routine.
|
||||
D DT^DICRW ; Min FM Vars
|
||||
D MES^XPDUTL("Killing Drug (50)") D DRUG
|
||||
D MES^XPDUTL("Killing Pharmacy Orderable Item (OI) (50.7)") D PO
|
||||
D MES^XPDUTL("Killing Drug Text (51.7)") D DRUGTEXT
|
||||
D MES^XPDUTL("Killing IV Additives (52.6)") D IVADD
|
||||
D MES^XPDUTL("Killing IV Solutions (52.7)") D IVSOL
|
||||
D MES^XPDUTL("Killing Drug Electrolytes (50.4)") D DRUGELEC
|
||||
D MES^XPDUTL("Removing Pharmacy OIs from the Orderable Item (101.43)") D O
|
||||
D MES^XPDUTL("Syncing the Order Quick View (101.44)") D CPRS
|
||||
QUIT
|
||||
;
|
||||
RESTOCK ; Restock CPRS Orderable Items from new Drug & Pharmacy Orderable Item
|
||||
; File. Public Entry Point.
|
||||
; Call this after repopulating the drug file (50) and the pharmacy orderable
|
||||
; item file (50.7)
|
||||
N PSOIEN ; Looper variable
|
||||
D DT^DICRW ; Establish FM Basic Variables
|
||||
;
|
||||
; Loop through Orderable Item file and call
|
||||
; 1. The Active/Inactive Updater for the Orderable Item
|
||||
; 2. the protocol file updater to CPRS Files
|
||||
S PSOIEN=0 F S PSOIEN=$O(^PS(50.7,PSOIEN)) Q:'PSOIEN D
|
||||
. D MES^XPDUTL("Syncing Pharamcy Orderable Item "_PSOIEN)
|
||||
. D EN^PSSPOIDT(PSOIEN),EN2^PSSHL1(PSOIEN,"MUP")
|
||||
D CPRS ; Update Orderable Item View files
|
||||
QUIT
|
||||
;
|
||||
; -- END Public Entry Points --
|
||||
;
|
||||
; -- The rest is private --
|
||||
DRUG ; Kill Drug File; Private
|
||||
N %1 S %1=^PSDRUG(0)
|
||||
K ^PSDRUG
|
||||
S ^PSDRUG(0)=%1
|
||||
S $P(^PSDRUG(0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
PO ; Kill Pharmacy Orderable Items; Private
|
||||
N %1 S %1=^PS(50.7,0)
|
||||
K ^PS(50.7)
|
||||
S ^PS(50.7,0)=%1
|
||||
S $P(^PS(50.7,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
DRUGTEXT ; Kill Drug Text Entries ; Private
|
||||
N %1 S %1=^PS(51.7,0)
|
||||
K ^PS(51.7)
|
||||
S ^PS(51.7,0)=%1
|
||||
S $P(^PS(51.7,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
IVADD ; Kill IV Additives ; Private
|
||||
N %1 S %1=^PS(52.6,0)
|
||||
K ^PS(52.6)
|
||||
S ^PS(52.6,0)=%1
|
||||
S $P(^PS(52.6,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
IVSOL ; Kill IV Solutions ; Private
|
||||
N %1 S %1=^PS(52.7,0)
|
||||
K ^PS(52.7)
|
||||
S ^PS(52.7,0)=%1
|
||||
S $P(^PS(52.7,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
DRUGELEC ; Kill Drug Electrolytes ; Private
|
||||
N %1 S %1=^PS(50.4,0)
|
||||
K ^PS(50.4)
|
||||
S ^PS(50.4,0)=%1
|
||||
S $P(^PS(50.4,0),"^",3,4)=""
|
||||
QUIT
|
||||
;
|
||||
O ; Kill off Pharamcy Order Items (Only!) in the Orderable Item file; Private
|
||||
N DA ; Used in For loop below
|
||||
N DIK S DIK="^ORD(101.43,"
|
||||
N I S I=0
|
||||
FOR S I=$O(^ORD(101.43,"ID",I)) QUIT:I="" DO
|
||||
. I I["PSP" S DA=$O(^ORD(101.43,"ID",I,"")) D ^DIK
|
||||
QUIT
|
||||
;
|
||||
CPRS ; Now, update the CPRS lists (sync with Orderable Item file) -
|
||||
; Uses a CPRS API to do this; Private
|
||||
; Next 3 variables are required as inputs
|
||||
N ATTEMPT S ATTEMPT=0 ; Attempt to Update
|
||||
N UPDTIME S UPDTIME=$HOROLOG ; Update Time
|
||||
N DGNM ; Dialog Name
|
||||
; IVA RX -> Additives; IVB RX -> Solutions
|
||||
; IVM RX -> Inpatient Meds for Outpatients
|
||||
; NV RX -> Non-VA Meds ; O RX -> Outpatient
|
||||
; UD RX -> Unit Dose
|
||||
FOR DGNM="IVA RX","IVB RX","IVM RX","NV RX","O RX","UD RX" DO
|
||||
. D MES^XPDUTL(" --> Rebuilding "_DGNM)
|
||||
. D FVBLD^ORWUL
|
||||
QUIT
|
||||
;
|
||||
File diff suppressed because it is too large
Load Diff
Binary file not shown.
Binary file not shown.
|
|
@ -0,0 +1,542 @@
|
|||
Remarks on the Jordan Drug File:
|
||||
- Contains some data encoded as Windows-1256. It will not work on GT.M running
|
||||
in UTF-8 mode.
|
||||
- List of Broken Pointers:
|
||||
--> Med Route in Pharmacy Orderable Item File:
|
||||
VERIFY FIELDS REPORT
|
||||
PHARMACY ORDERABLE ITEM FILE (#50.7) MAY 16, 2012 12:06 PAGE 1
|
||||
-------------------------------------------------------------------------------
|
||||
|
||||
ENTRY# NAME ERROR
|
||||
192 METHYLPREDNISOLONE "177" fails Input Transform
|
||||
298 DIAZEPAM No '271' in pointed-to File
|
||||
455 CALCITONIN No '273' in pointed-to File
|
||||
888 INSULIN REGULAR "95" fails Input Transform
|
||||
1058 RANIBIZUMAB No '274' in pointed-to File
|
||||
|
||||
--> WARD GROUP in ATC CANISTER multiple in the drug file.
|
||||
VERIFY FIELDS REPORT
|
||||
ATC CANISTER SUB-FILE (#50.0212) MAY 16, 2012 12:13 PAGE 1
|
||||
-----------------------------------------------------------------------------------------------------------------------------------
|
||||
POINTER
|
||||
(CHECKING CROSS-REFERENCE)
|
||||
|
||||
ENTRY#'S WARD GROUP FOR ATC CANISTER ERROR
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
1 1 "1" fails Input Transform
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
5 11 No '11' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
6 13 No '13' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
7 14 No '14' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
8 15 No '15' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
9 16 No '16' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
10 17 No '17' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
11 18 No '18' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
12 21 No '21' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
13 22 No '22' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
14 23 No '23' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
15 24 No '24' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
16 25 No '25' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
17 26 No '26' in pointed-to File
|
||||
|
||||
1254 ASPIRIN 100MG TAB,ORAL
|
||||
18 27 No '27' in pointed-to File
|
||||
|
||||
ITEM NUMBER in IFCAP ITEM NUMBER in the Drug File.
|
||||
------------
|
||||
VERIFY FIELDS REPORT
|
||||
IFCAP ITEM NUMBER SUB-FILE (#50.0441) MAY 16, 2012 12:16 PAGE 1
|
||||
-------------------------------------------------------------------------------
|
||||
POINTER
|
||||
(CHECKING CROSS-REFERENCE)
|
||||
|
||||
ENTRY#'S ITEM NUMBER ERROR
|
||||
1002 HYDROXYUREA 500MG CAP,ORAL
|
||||
1 4107 No '4107' in pointed-to File
|
||||
|
||||
1003 METHOTREXATE 2.5MG TAB,ORAL
|
||||
1 953 No '953' in pointed-to File
|
||||
|
||||
1006 NOREPINEPHRINE BITARTRATE 1MG/ML INJ
|
||||
1 2739 No '2739' in pointed-to File
|
||||
|
||||
1010 DIGOXIN 0.125MG TAB,ORAL
|
||||
1 1580 No '1580' in pointed-to File
|
||||
|
||||
1011 DIGOXIN INJ 0.25MG/ML 2ML AMP
|
||||
1 713 No '713' in pointed-to File
|
||||
|
||||
1012 DIGOXIN 0.25MG TAB,ORAL
|
||||
1 1557 No '1557' in pointed-to File
|
||||
|
||||
1013 PROPRANOLOL HCL 10MG TAB,ORAL
|
||||
1 367 No '367' in pointed-to File
|
||||
|
||||
1014 PROPRANOLOL HCL 40MG TAB,ORAL
|
||||
1 369 No '369' in pointed-to File
|
||||
|
||||
1015 HYDRALAZINE HCL INJ 20MG/ML INJ
|
||||
1 214 No '214' in pointed-to File
|
||||
|
||||
1016 HYDRALAZINE HCL 25MG TAB,ORAL
|
||||
1 97 No '97' in pointed-to File
|
||||
|
||||
1017 METHYLDOPA 250MG TAB,ORAL
|
||||
1 113 No '113' in pointed-to File
|
||||
|
||||
1018 ISOSORBIDE DINITRATE 5MG SL TAB
|
||||
1 1076 No '1076' in pointed-to File
|
||||
|
||||
1019 IBUPROFEN 400MG TAB,ORAL
|
||||
1 1311 No '1311' in pointed-to File
|
||||
|
||||
1020 INDOMETHACIN 25MG CAP,ORAL
|
||||
1 101 No '101' in pointed-to File
|
||||
|
||||
1021 NALOXONE HCL 0.4MG/ML INJ
|
||||
1 77 No '77' in pointed-to File
|
||||
|
||||
1022 CARBAMAZEPINE 200MG TAB,ORAL
|
||||
1 2697 No '2697' in pointed-to File
|
||||
|
||||
1023 PHENYTOIN NA 100MG CAP,ORAL,SA
|
||||
1 3005 No '3005' in pointed-to File
|
||||
|
||||
1025 IMIPRAMINE HCL 25MG TAB,ORAL
|
||||
1 342 No '342' in pointed-to File
|
||||
|
||||
1028 HALOPERIDOL 5MG TAB,ORAL
|
||||
1 5450 No '5450' in pointed-to File
|
||||
|
||||
1029 HALOPERIDOL 2MG/ML DROPS,ORAL
|
||||
1 3591 No '3591' in pointed-to File
|
||||
|
||||
1031 TRIFLUOPERAZINE HCL 5MG TAB,ORAL
|
||||
1 169 No '169' in pointed-to File
|
||||
|
||||
1032 METHYLPHENIDATE 10MG TAB,ORAL
|
||||
1 787 No '787' in pointed-to File
|
||||
|
||||
1033 PHENOBARBITAL 15MG TAB,ORAL
|
||||
1 902 No '902' in pointed-to File
|
||||
|
||||
1034 SIMETHICONE 40MG TAB,CHEWABLE
|
||||
1 2652 No '2652' in pointed-to File
|
||||
|
||||
1036 SODIUM CHLORIDE 0.45% INJ 1000ML
|
||||
1 3673 No '3673' in pointed-to File
|
||||
|
||||
1040 DEXTROSE 5% INJ 1000ML
|
||||
1 3974 No '3974' in pointed-to File
|
||||
|
||||
1041 FUROSEMIDE 10MG/ML INJ 2ML VIAL
|
||||
1 212 No '212' in pointed-to File
|
||||
|
||||
1042 MANNITOL 20% INJ 500ML BAG
|
||||
1 505 No '505' in pointed-to File
|
||||
|
||||
1043 SPIRONOLACTONE 25MG TAB,ORAL
|
||||
1 1514 No '1514' in pointed-to File
|
||||
|
||||
1044 ERYTHROMYCIN ES 200MG/5ML SUSP,ORAL
|
||||
1 3624 No '3624' in pointed-to File
|
||||
|
||||
1045 GENTAMICIN 0.3% SOLN,OPHT
|
||||
1 202 No '202' in pointed-to File
|
||||
|
||||
1050 FLUOROMETHOLONE 0.1% SUSP,OPHT
|
||||
1 1181 No '1181' in pointed-to File
|
||||
|
||||
1051 PREDNISOLONE 1% SUSP,OPHT
|
||||
1 2614 No '2614' in pointed-to File
|
||||
|
||||
1053 BISACODYL 5MG TAB,ORAL,EC
|
||||
1 815 No '815' in pointed-to File
|
||||
|
||||
1054 BISACODYL 10MG SUPP,RECTAL
|
||||
1 1303 No '1303' in pointed-to File
|
||||
|
||||
1057 HYDROCORTISONE BUTYRATE 0.1% (DON'T USE)
|
||||
1 223 No '223' in pointed-to File
|
||||
|
||||
1058 DEFEROXAMINE MESYLATE 500MG/VIAL INJ
|
||||
1 779 No '779' in pointed-to File
|
||||
|
||||
1059 PENICILLAMINE 250MG CAP,ORAL
|
||||
1 358 No '358' in pointed-to File
|
||||
|
||||
1060 DEXAMETHASONE NA PO4 4MG/ML INJ 1ML
|
||||
1 58 No '58' in pointed-to File
|
||||
|
||||
1061 METHYLPREDNISOLONE ACET. 40MG/ML INJ
|
||||
1 3825 No '3825' in pointed-to File
|
||||
|
||||
1063 GLUCAGON 1MG/VIAL INJ
|
||||
1 882 No '882' in pointed-to File
|
||||
|
||||
1064 CALCIUM GLUCONATE 10% INJ 10ML
|
||||
1 817 No '817' in pointed-to File
|
||||
|
||||
1065 BUPIVACAINE HCL 0.5% INJ
|
||||
1 1247 No '1247' in pointed-to File
|
||||
|
||||
1066 LIDOCAINE HCL 1% INJ
|
||||
1 69 No '69' in pointed-to File
|
||||
|
||||
1067 BETAMETHASONE VALERATE 0.1% CREAM,TOP
|
||||
1 2687 No '2687' in pointed-to File
|
||||
|
||||
1070 CYANOCOBALAMIN 1000MCG/ML INJ
|
||||
1 4912 No '4912' in pointed-to File
|
||||
|
||||
1071 ALLOPURINOL 100MG TAB,ORAL
|
||||
1 3970 No '3970' in pointed-to File
|
||||
|
||||
1072 ALLOPURINOL 300MG TAB,ORAL
|
||||
1 1528 No '1528' in pointed-to File
|
||||
|
||||
1074 CHLORPHENIRAMINE MALEATE 4MG TAB,ORAL
|
||||
1 934 No '934' in pointed-to File
|
||||
|
||||
1076 CEFAZOLIN SOD 1GM/VIAL INJ
|
||||
1 206 No '206' in pointed-to File
|
||||
|
||||
1078 AMOXICILLIN 500MG CAP,ORAL
|
||||
1 1201 No '1201' in pointed-to File
|
||||
|
||||
1079 PYRAZINAMIDE 500MG TAB,ORAL
|
||||
1 964 No '964' in pointed-to File
|
||||
|
||||
1080 STREPTOMYCIN SULFATE 1GM INJ
|
||||
1 922 No '922' in pointed-to File
|
||||
|
||||
1081 DOXYCYCLINE HYCLATE 100MG TAB
|
||||
1 81 No '81' in pointed-to File
|
||||
|
||||
1082 CLINDAMYCIN HCL 150MG CAP,ORAL
|
||||
1 326 No '326' in pointed-to File
|
||||
|
||||
1083 GENTAMICIN SULF 40MG/ML INJ 2ML/VL
|
||||
1 211 No '211' in pointed-to File
|
||||
|
||||
1084 ETHAMBUTOL 400MG TAB,ORAL
|
||||
1 337 No '337' in pointed-to File
|
||||
|
||||
1085 ISONIAZID 100MG TAB,ORAL
|
||||
1 6232 No '6232' in pointed-to File
|
||||
|
||||
1086 ROXITHROMYCIN 150MG TAB,ORAL
|
||||
1 373 No '373' in pointed-to File
|
||||
|
||||
1087 SULFASALAZINE 500MG TAB,ORAL
|
||||
1 159 No '159' in pointed-to File
|
||||
|
||||
1089 METRONIDAZOLE 250MG TAB,ORAL
|
||||
1 440 No '440' in pointed-to File
|
||||
|
||||
1090 NITROFURANTOIN 100MG TAB,ORAL
|
||||
1 123 No '123' in pointed-to File
|
||||
|
||||
1091 AMANTADINE HCL 100MG CAP,100
|
||||
1 31 No '31' in pointed-to File
|
||||
|
||||
1092 CHLORHEXIDINE GLUCONATE 0.2% RINSE,ORAL
|
||||
1 5025 No '5025' in pointed-to File
|
||||
|
||||
1094 AMITRIPTYLINE HCL 25MG TAB,ORAL
|
||||
1 929 No '929' in pointed-to File
|
||||
|
||||
1095 ASCORBIC ACID 500MG TAB,ORAL
|
||||
1 39 No '39' in pointed-to File
|
||||
|
||||
1100 TIMOLOL MALEATE 0.5% SOLN,OPHT
|
||||
1 1608 No '1608' in pointed-to File
|
||||
|
||||
1102 METOPROLOL SUCCINATE 100MG TAB,ORAL
|
||||
1 349 No '349' in pointed-to File
|
||||
|
||||
1103 MICONAZOLE NITRATE CREAM,TOP 30GM
|
||||
1 16 No '16' in pointed-to File
|
||||
|
||||
1105 VANCOMYCIN HCL 500MG/VIAL INJ.
|
||||
1 907 No '907' in pointed-to File
|
||||
|
||||
1106 WARFARIN 5MG TAB,ORAL
|
||||
1 4324 No '4324' in pointed-to File
|
||||
|
||||
1107 DIPYRIDAMOLE 75MG TAB,ORAL
|
||||
1 4592 No '4592' in pointed-to File
|
||||
|
||||
1108 IMIPRAMINE HCL 10MG TAB,ORAL
|
||||
1 3482 No '3482' in pointed-to File
|
||||
|
||||
1110 THEOPHYLLINE 300MG CAP,ORAL,SA
|
||||
1 7210 No '7210' in pointed-to File
|
||||
|
||||
1112 AMPICILLIN 500MG/VIAL INJ
|
||||
1 40 No '40' in pointed-to File
|
||||
|
||||
1113 BETAXOLOL 20MG TAB,ORAL
|
||||
1 6009 No '6009' in pointed-to File
|
||||
|
||||
1117 ISOSORBIDE DINITRATE 20MG TAB,ORAL,SA
|
||||
1 529 No '529' in pointed-to File
|
||||
|
||||
1120 AMILORIDE 5MG/HCTZ 50MG TAB,ORAL
|
||||
1 645 No '645' in pointed-to File
|
||||
|
||||
1121 NITROGLYCERIN 0.4MG(10MG/24H) PATCH,TOP
|
||||
1 792 No '792' in pointed-to File
|
||||
|
||||
1122 FINASTERIDE 5MG TAB,ORAL
|
||||
1 7306 No '7306' in pointed-to File
|
||||
|
||||
1125 PROMETHAZINE 25MG/ML INJ
|
||||
1 445 No '445' in pointed-to File
|
||||
|
||||
1126 CEFACLOR 250MG CAP,ORAL
|
||||
1 873 No '873' in pointed-to File
|
||||
|
||||
1129 DIGOXIN 0.05MG/ML SOLN,ORAL
|
||||
1 715 No '715' in pointed-to File
|
||||
|
||||
1130 PROPRANOLOL HCL 1MG/ML INJ
|
||||
1 5598 No '5598' in pointed-to File
|
||||
|
||||
1132 HYDROCHLOROTHIAZIDE 25MG TAB,ORAL
|
||||
1 1394 No '1394' in pointed-to File
|
||||
|
||||
1136 TOBRAMYCIN 0.3% SOLN,OPHT
|
||||
1 3440 No '3440' in pointed-to File
|
||||
|
||||
1137 TOBRAMYCIN 0.3% OINT,OPHT
|
||||
1 1417 No '1417' in pointed-to File
|
||||
|
||||
1138 CAPTOPRIL 25MG TAB,ORAL
|
||||
1 1629 No '1629' in pointed-to File
|
||||
|
||||
1144 CLONAZEPAM 0.5MG TAB,ORAL
|
||||
1 1024 No '1024' in pointed-to File
|
||||
|
||||
1145 CLONAZEPAM 2MG TAB,ORAL
|
||||
1 1025 No '1025' in pointed-to File
|
||||
|
||||
1146 PHENOBARBITAL 60MG TAB,ORAL
|
||||
1 5991 No '5991' in pointed-to File
|
||||
|
||||
1147 CEFOTAXIME SODIUM 1GM/VIAL INJ
|
||||
1 3008 No '3008' in pointed-to File
|
||||
|
||||
1150 BECLOMETHASONE DIPROP 50MCG INH,NASAL
|
||||
1 6311 No '6311' in pointed-to File
|
||||
|
||||
1151 BROMOCRIPTINE MESYLATE 2.5MG TAB,ORAL
|
||||
1 5880 No '5880' in pointed-to File
|
||||
|
||||
1152 ALPRAZOLAM 0.5MG TAB,ORAL
|
||||
1 267 No '267' in pointed-to File
|
||||
|
||||
1154 HYDROGEN PEROXIDE 6% SOLN,TOP 1000ML
|
||||
1 1322 No '1322' in pointed-to File
|
||||
|
||||
1156 TRETINOIN 0.05% CREAM,TOP
|
||||
1 3397 No '3397' in pointed-to File
|
||||
|
||||
1161 CROTAMITON 10% CREAM,TOP
|
||||
1 5038 No '5038' in pointed-to File
|
||||
|
||||
1162 CROTAMITON 10% LOTION,TOP
|
||||
1 4882 No '4882' in pointed-to File
|
||||
|
||||
1163 SODIUM BICARBONATE 8.4% INJ
|
||||
1 89 No '89' in pointed-to File
|
||||
|
||||
1167 HYDROCORTISONE ACETATE 1% CREAM,TOP
|
||||
1 1511 No '1511' in pointed-to File
|
||||
|
||||
1168 HYDROCORTISONE ACETATE 1% OINT,TOP
|
||||
1 2751 No '2751' in pointed-to File
|
||||
|
||||
1169 HYDROCORTISONE NA SUCC. 100MG/2ML INJ
|
||||
1 215 No '215' in pointed-to File
|
||||
|
||||
1170 FAMOTIDINE 40MG TAB,ORAL
|
||||
1 3210 No '3210' in pointed-to File
|
||||
|
||||
1171 VERAPAMIL HCL 240MG TAB,ORAL,SA
|
||||
1 1080 No '1080' in pointed-to File
|
||||
|
||||
1171 VERAPAMIL HCL 240MG TAB,ORAL,SA
|
||||
2 7195 No '7195' in pointed-to File
|
||||
|
||||
1172 ISOSORBIDE DINITRATE 40MG TAB,ORAL,SA
|
||||
1 3241 No '3241' in pointed-to File
|
||||
|
||||
1173 IPRATROPIUM 20MCG/PUFF INHALER,ORAL
|
||||
1 672 No '672' in pointed-to File
|
||||
|
||||
1174 AZATHIOPRINE 50MG TAB,ORAL
|
||||
1 312 No '312' in pointed-to File
|
||||
|
||||
1175 AZTREONAM 1GM/VIAL INJ
|
||||
1 1202 No '1202' in pointed-to File
|
||||
|
||||
1176 MICONAZOLE NITRATE 2% CREAM,VAG 20GM
|
||||
1 4183 No '4183' in pointed-to File
|
||||
|
||||
1179 CIPROFLOXACIN HCL 500MG TAB,ORAL
|
||||
1 1084 No '1084' in pointed-to File
|
||||
|
||||
1180 PHENYTOIN NA 50MG/ML INJ
|
||||
1 84 No '84' in pointed-to File
|
||||
|
||||
1181 FLUOXETINE HCL 20MG CAP,ORAL
|
||||
1 903 No '903' in pointed-to File
|
||||
|
||||
1182 ENALAPRIL MALEATE 20MG TAB,ORAL
|
||||
1 661 No '661' in pointed-to File
|
||||
|
||||
1185 RANITIDINE HCL 25MG/ML INJ
|
||||
1 3736 No '3736' in pointed-to File
|
||||
|
||||
1186 CARBAMAZEPINE 100MG/5ML SUSP (2% 250ML)
|
||||
1 741 No '741' in pointed-to File
|
||||
|
||||
1188 FUROSEMIDE 10MG/ML SOLN,ORAL 60ML
|
||||
1 1161 No '1161' in pointed-to File
|
||||
|
||||
1190 UREA 10% LOTION,TOP
|
||||
1 1012 No '1012' in pointed-to File
|
||||
|
||||
1192 CILASTIN 500MG/IMIPENEM 500MG/VIAL INJ
|
||||
1 651 No '651' in pointed-to File
|
||||
|
||||
1194 HEPARIN NA 1000UNIT/ML INJ 1ML
|
||||
1 1155 No '1155' in pointed-to File
|
||||
|
||||
1195 RANITIDINE HCL 150MG TAB,ORAL
|
||||
1 1647 No '1647' in pointed-to File
|
||||
|
||||
1196 DICLOFENAC SODIUM 50MG TAB,ORAL,EC
|
||||
1 3539 No '3539' in pointed-to File
|
||||
|
||||
1198 CYCLOSPORINE 100MG/ML SOLN,ORAL
|
||||
1 1143 No '1143' in pointed-to File
|
||||
|
||||
1199 HALOPERIDOL DECANOATE 100MG/ML INJ
|
||||
1 4722 No '4722' in pointed-to File
|
||||
|
||||
1201 AMOXICILLIN 500/CLAVULANATE 125 TAB,ORAL
|
||||
1 36 No '36' in pointed-to File
|
||||
|
||||
1202 CYCLOPENTOLATE HCL 1% SOLN,OPHT
|
||||
1 1406 No '1406' in pointed-to File
|
||||
|
||||
1203 CALCIUM CARBONATE 500MG TAB,ORAL
|
||||
1 5577 No '5577' in pointed-to File
|
||||
|
||||
1208 PENTOXIFYLLINE 400MG TAB,ORAL,SA
|
||||
1 1651 No '1651' in pointed-to File
|
||||
|
||||
1211 PENICILLIN G BENZATHINE 1.2 MIL UNIT INJ
|
||||
1 520 No '520' in pointed-to File
|
||||
|
||||
1212 AMOXICILLIN 250/CLAVULANATE 125 TAB,ORAL
|
||||
1 34 No '34' in pointed-to File
|
||||
|
||||
1214 AMOXICILLIN/CLAVULANATE 250MG/5ML SUSP
|
||||
1 1370 No '1370' in pointed-to File
|
||||
|
||||
1215 DIAZEPAM 10MG/2ML INJ
|
||||
1 939 No '939' in pointed-to File
|
||||
|
||||
1216 GRISEOFULVIN 125MG/5ML SUSP,ORAL
|
||||
1 1184 No '1184' in pointed-to File
|
||||
|
||||
1218 CEFTRIAXONE SODIUM 1GM/VIAL INJ
|
||||
1 1034 No '1034' in pointed-to File
|
||||
|
||||
1219 ACYCLOVIR 250MG/VIAL INJ
|
||||
1 733 No '733' in pointed-to File
|
||||
|
||||
1220 EPHEDRINE 30MG/ML INJ
|
||||
1 881 No '881' in pointed-to File
|
||||
|
||||
1221 MEPERIDINE HCL 50MG/ML INJ
|
||||
1 3154 No '3154' in pointed-to File
|
||||
|
||||
1222 MEPERIDINE HCL 100MG/ML INJ
|
||||
1 1162 No '1162' in pointed-to File
|
||||
|
||||
1227 BETAXOLOL HCL 0.5% SOLN,OPHT
|
||||
1 1405 No '1405' in pointed-to File
|
||||
|
||||
1228 GEMFIBROZIL 600MG TAB,ORAL
|
||||
1 4564 No '4564' in pointed-to File
|
||||
|
||||
1229 ENALAPRIL MALEATE 5MG TAB,ORAL
|
||||
1 1673 No '1673' in pointed-to File
|
||||
|
||||
1232 HALOPERIDOL DECANOATE 50MG/ML INJ
|
||||
1 213 No '213' in pointed-to File
|
||||
|
||||
1233 ACETAZOLAMIDE 250MG TAB,ORAL
|
||||
1 938 No '938' in pointed-to File
|
||||
|
||||
1234 AMIODARONE HCL 200MG TAB,ORAL
|
||||
1 4764 No '4764' in pointed-to File
|
||||
|
||||
1235 OMEPRAZOLE 20MG CAP,ORAL,EC
|
||||
1 4924 No '4924' in pointed-to File
|
||||
|
||||
1238 CALCIUM CHLORIDE 100MG/10ML (10%) INJ
|
||||
1 5056 No '5056' in pointed-to File
|
||||
|
||||
1242 EPOETIN ALFA RECOMBINANT 2000U/ML INJ
|
||||
1 6231 No '6231' in pointed-to File
|
||||
|
||||
1244 TERAZOSIN 5MG TAB,ORAL
|
||||
1 6492 No '6492' in pointed-to File
|
||||
|
||||
1245 FOSINOPRIL SODIUM 10MG TAB,ORAL
|
||||
1 7124 No '7124' in pointed-to File
|
||||
|
||||
1246 FENTANYL TRANSDERM 25MCG/HR PATCH,TOP
|
||||
1 7109 No '7109' in pointed-to File
|
||||
|
||||
1247 CLOZAPINE 25MG TAB,ORAL
|
||||
1 7111 No '7111' in pointed-to File
|
||||
|
||||
1248 CLOZAPINE 100MG TAB,ORAL
|
||||
1 7110 No '7110' in pointed-to File
|
||||
|
||||
1250 FENTANYL TRANSDERM 50MCG/HR PATCH,TOP
|
||||
1 7171 No '7171' in pointed-to File
|
||||
|
||||
STORE THESE ENTRY ID'S IN TEMPLATE:
|
||||
|
||||
Binary file not shown.
Binary file not shown.
Loading…
Reference in New Issue