Global: ^PS(55

FileMan FileNo	FileMan Filename	Package
55	PHARMACY PATIENT	Pharmacy Data Management

Package	Total	Routines
Inpatient Medications	315	PSGAH PSGAMS PSGAMSA PSGDL PSGGAO PSGMAR0 PSGMMAR0 PSGMMIV PSGMMIVC PSGMUTL PSGOE PSGOE0 PSGOE42 PSGOE5 PSGOE6 PSGOEF PSGOEH0 PSGOEHA PSGOER0 PSGOERS PSGOES PSGOESF PSGORS0 PSGOT PSGOTR PSGP PSGPLR0 PSGPLUP0 PSGS0 PSGSICH1 PSGTCTD PSGVBW PSGVW PSGVW0 PSIVAL PSIVCAL PSIVEDT PSIVEDT1 PSIVHYPR PSIVLB PSIVLBL1 PSIVLBRP PSIVMAN1 PSIVOD PSIVORA1 PSIVORAL PSIVORE1 PSIVORE2 PSIVORFB PSIVORH PSIVORLB PSIVPRO PSIVRD PSIVRNL PSIVRP1 PSIVSPDC PSIVSTAT PSIVSUS1 PSIVWL PSJ PC IV AC/EDIT ACTION PSJ005 PSJ0061 PSJ0063 PSJ0071 PSJ0099 PSJ0171 PSJ0186 PSJ0742 PSJ078A PSJ200 PSJ257PO PSJ299PO PSJ304PO PSJ320PO PSJ323PO PSJ5P315 PSJADT0 PSJBCBU PSJBCMA PSJBCMA1 PSJBCMA3 PSJBLDOC PSJCLOR PSJCLOR2 PSJCLOR3 PSJCOMR PSJDCU PSJDDUT PSJEEU0 PSJH1 PSJHIS PSJHL7 PSJIMO1 PSJIPST PSJLIACT PSJLIVMD PSJLMUT1 PSJLMUTL PSJMIV PSJOCDI PSJOCDS PSJOEA2 PSJORMA2 PSJORPOE PSJORRE PSJP PSJPADE PSJPADSI PSJPDCLA PSJPDV1 PSJPR PSJSFRQ PSJUTL6 ^PS(53.1 PSGAL5 PSGAP0 PSGBRJ PSGCAP0 PSGDS0 PSGEUD PSGEUDD PSGL PSGNE3 PSGOE1 PSGOEC PSGOEF1 PSGOEH1 PSGOEL PSGOEM PSGOENG PSGOEPO PSGOER PSGOER1 PSGOERI PSGOETO PSGOEV PSGOEVS PSGOU PSGPER0 PSGPLDP0 PSGPLF PSGPLR PSGPO PSGRET PSGSH PSGSICH PSGSICHK PSGTAP0 PSGTAP1 PSIVACT PSIVAOR1 PSIVBCID PSIVHIS PSIVHYP PSIVINDL PSIVLABL PSIVLTR PSIVLTR1 PSIVMAN PSIVOE PSIVOPT PSIVORC1 PSIVORC2 PSIVORE PSIVOREN PSIVRDC PSIVST2 PSIVSUS PSIVUDL PSIVUTL PSIVUTL1 PSIVVW1 PSJ0066 PSJ0077 PSJ089B PSJ431P PSJAC PSJADT PSJBCMA4 PSJCLNOC PSJCLOR5 PSJCOM PSJCOM1 PSJDCHK PSJDGAL2 PSJDSS PSJEXP0 PSJGMRA PSJHL10 PSJHL2 PSJHL3 PSJHL4A PSJHL5 PSJHL6 PSJHLU PSJHLV PSJINHIS PSJIPST2 PSJLMHED PSJLMPRU PSJLMUDE PSJMEDS PSJNEWOA PSJNEWOC PSJO1 PSJO2 PSJOE PSJOEA PSJOEEW PSJOERI PSJORRE1 PSJORRN PSJORRN1 PSJORRO PSJORUT2 PSJPAD50 PSJPL0 PSJPXRM1 PSJUTL1 PSJUTL2 PSJUTL3 PSJVOSR PSJXR51 PSJXR510 PSJXR512 PSJXR516 PSJXR518 PSJXR519 PSJXR52 PSJXR56 PSJXR57 PSJXR59 ^PS(59.6 PSGAPIV PSGAPP PSGCAPIV PSGMIV PSGMMAR2 PSGOD PSGOE9 PSGOECS PSGOEE PSGPEN PSGPER2 PSGPL0 PSGPL1 PSGPLXR PSGSICH2 PSGVBW1 PSGVBWU PSGXR38 PSIV PSIVAOR PSIVARH PSIVHLD PSIVHYPL PSIVLABR PSIVLBDL PSIVOPT1 PSIVOPT2 PSIVORA PSIVPGE PSIVRP PSIVUWL PSIVWL1 PSJ0078 PSJ0091 PSJ0103 PSJ074 PSJ078B PSJ311PO PSJ5P193 PSJ5P340 PSJADT1 PSJADT2 PSJBCMA2 PSJBCMA5 PSJCLOR4 PSJEXP PSJFTR PSJHEAD PSJHL4 PSJHL9 PSJIBAG PSJINVW PSJIPST1 PSJLIORD PSJLIUTL PSJLMGUD PSJLMPRI PSJLOI PSJMISC PSJOCDC PSJOE0 PSJOEA1 PSJORAPI PSJOREN PSJORMAR PSJORREN PSJPATMR PSJPDCLU PSJPDV0 PSJPR0 PSJXR511 PSJXR513 PSJXR514 PSJXR515 PSJXR517 PSJXR520 PSJXR53 PSJXR54 PSJXR55 PSJXR58 PSJXRFK PSJXRFS
Outpatient Pharmacy	175	PSO160P1 PSO5241 PSO52AP1 PSO52API PSO55FX2 PSO55FX3 PSO613P PSO7P517 PSOARCCV PSOARCDE PSOARCF5 PSOARCLT PSOARCS2 PSOARCTG PSOARX PSOATRF PSOATRFC PSOATRFV PSOAUTOC PSOBAIR2 PSOBBC PSOBING1 PSOBINGO PSOBKDED PSOBUILD PSOCAN PSOCAN1 PSOCAN3 PSOCLADD PSOCLOU PSOCLUTL PSOCMOP PSOCMOPC PSOCMOPT PSOCP PSOCPF1 PSOCSRL PSOCSTD PSOCSTM PSODDPR1 PSODDPR2 PSODDPR3 PSODDPR4 PSODDPR5 PSODDPR7 PSODDPRE PSODEM PSODEMSB PSODGAL1 PSODIR PSODIR1 PSODISP PSODRDU1 PSODRDU2 PSOERUT4 PSOERUT5 PSOERXD1 PSOERXU4 PSOEXDT PSOFUNC PSOHCSUM PSOHELP1 PSOHELP3 PSOHLDS1 PSOHLDS2 PSOHLDS3 PSOHLDS5 PSOHLNE2 PSOHLSG1 PSOHLSG2 PSOHLSG3 PSOHLUP PSOHLUP1 PSOLBL PSOLBL2 PSOLBL3 PSOLBLN PSOLBLN2 PSOLLL1 PSOLLL7 PSOLLLI PSOLMPAT PSOMHV1 PSON52 PSONEW1 PSONVAR1 PSONVAVW PSONVNEW PSOORCPY PSOORDER PSOORDRG PSOORED1 PSOORED5 PSOORFI1 PSOORFI3 PSOORFI4 PSOORFIN PSOORNE1 PSOORNE2 PSOORNE3 PSOORNE4 PSOORNE5 PSOORNEW PSOORNW2 PSOORRL PSOORRL1 PSOORRL3 PSOORRLN PSOORRLO PSOORUT2 PSOORUTL PSOP PSOP2 PSOP288F PSOP288R PSOPAT PSOPI136 PSOPMP0 PSOPOLY PSOPOS10 PSOPOST PSOPOST7 PSOPRF PSOPRFSS PSOPTC0 PSOPTPST PSOPXRM1 PSOQ0496 PSOREJP2 PSOREJP3 PSOREJU3 PSORELD1 PSORENW3 PSORESK PSORESUS PSORFL PSORLLL1 PSORLLLI PSORN52A PSORREF PSORRPA1 PSORX1 PSORXED PSORXEDT PSORXVW2 PSOSD3 PSOSIGDS PSOSUCHG PSOSULOG PSOSUPRX PSOTALK PSOTALK2 PSOTPCAN PSOTPCRX PSOTPCUL PSOTRLBL PSOUTLA1 PSOVER1 PSOVERC ^PSRX PSORXDL PSORXPR PSORXRP2 PSORXVW PSOSD PSOSIGMX PSOSULBL PSOSUPAT PSOTPRP1 PSOTPRX1 PSOUTL PSOUTOR PSOXZA1 PSOXZA10 SORT GROUP
Pharmacy Data Management	78	DISPENSE DRUG DISPENSE LOG IV NON-VA MEDS ORDER CHECKS PSS551 PSS781 PSSCOMMN PSSDDUT3 PSSGS0 PSSGSH PSSJXR10 PSSJXR13 PSSJXR15 PSSJXR16 PSSJXR18 PSSJXR19 PSSJXR21 PSSJXR22 PSSJXR24 PSSJXR26 PSSJXR3 PSSJXR30 PSSJXR31 PSSJXR32 PSSJXR35 PSSJXR36 PSSJXR4 PSSJXR40 PSSJXR41 PSSJXR7 PSSJXR8 PSSMRRDG PSSNOD2 PSSP191A PSSSXRD PSSUTLA1 SCRIPTALK ENROLLMENT ACTIVITY UNIT DOSE ^PS(55 BCMA ID CLINICAL ALERT INTERVENTION LAST RENEW PATIENT COMMENT PATIENT COMMENT HISTORY PRESCRIPTION PROFILE PSS0052 PSS55 PSSCLINR PSSDDUT PSSGSGUI PSSJXR1 PSSJXR11 PSSJXR12 PSSJXR14 PSSJXR17 PSSJXR2 PSSJXR20 PSSJXR23 PSSJXR25 PSSJXR27 PSSJXR28 PSSJXR34 ^APSPQA(32.5 PSSJXR29 PSSJXR33 PSSJXR37 PSSJXR38 PSSJXR39 PSSJXR42 PSSJXR5 PSSJXR6 PSSJXR9 PSSORUTE PSSRXACT PSSUTLA2 SIG
Mental Health	6	YSCLHLGT YSCLHLOP YSCLPOST YSCLSRV2 YSCLSRV3 YSCLTST1
Barcode Medication Administration	5	ALPBIND ALPBINP PSBML2 PSBO PSBODO
CMOP	5	PSXBLD PSXBLD1 PSXBLD2 PSXMISC1 PSXRXQU
Pharmacy Benefits Management	4	PSUDEM1 PSUUD1 PSUUD2 PSUV1
DSS Extracts	2	ECXBCM ECXUD
Kernel	2	ARRAY SUBSCRIPTS ^ORD(101
Lab Service	2	LRBLPE1 LRBLPH
Clinical Information Resource Network	1	RGVCCMR2
Clinical Monitoring System	1	QAMC24
Clinical Reminders	1	PXRMISE
Medicine	1	MCPSOP
My HealtheVet	1	MHV7B1R2
National Drug File	1	PSNJP54
Order Entry Results Reporting	1	ORCK101
Patient Data Exchange	1	VAQDBIP8

Package	Total	Routines
Outpatient Pharmacy	28	PSO613P PSOBPSUT PSOCLADD PSOCLO1 PSOCLOU PSOCLUTL PSODEMSB PSODIR1 PSOERUT0 PSOERUT2 PSOERUT5 PSOERXD2 PSOERXON PSOERXU4 PSOHLUP PSOLMPAT PSONVNEW PSOORUT2 PSOP288F PSOPAT PSOPOS10 PSORELD1 PSORWRAP PSORX1 PSOSIGDS PSOTALK2 PSOTPRX1 PSOUTLA2
Inpatient Medications	14	PSGFILED PSGNE3 PSGOD PSGOE41 PSGOE81 PSGOE91 PSGOEHA PSIVORE PSIVOREN PSIVORFB PSJCLOZ PSJHL10 PSJLMUTL PSJUTL1
Mental Health	9	YSCLDIS YSCLHLAB YSCLHLGT YSCLHLOP YSCLTST2 YSCLTST3 YSCLTST5 YSCLTST6 YSCLTST9
National Drug File	2	PSNPPIO PSNPPIP
Pharmacy Data Management	1	PSSSXRD
Registration	1	DGFFP03

Package	Total	FileMan Files
Pharmacy Data Management	1	PHARMACY SYSTEM(#59.7)[20.8, 30.2]

Package	Total	FileMan Files
Pharmacy Data Management	5	APSP INTERVENTION(#9009032.4)[#55.1153(.01), #55.6132(.01)] PHARMACY ORDERABLE ITEM(#50.7)[#55.01(130), #55.05(.01), #55.06(108)] IV ADDITIVES(#52.6)[#55.02(.01), #55.1057(.01)] IV SOLUTIONS(#52.7)[#55.1058(.01), #55.11(.01)] DRUG(#50)[#55.05(1), #55.06(24), #55.0611(.02), #55.07(.01)]
Inpatient Medications	3	PRIMARY DRUG(#50.3)[#55.01(117), #55.06(101)] ACTIVITY LOG REASON(#53.3)[#55.09(2)] IV ROOM(#59.5)[#55.01(.22)]
Outpatient Pharmacy	2	RX PATIENT STATUS(#53)[3] PRESCRIPTION(#52)[#55.03(.01)]
Registration	2	WARD LOCATION(#42)[#55.01(9), #55.06(9), #55.06(68), #55.0611(.07)] PATIENT(#2)[.01, #55.06(.5)]
Kernel	1	NEW PERSON(#200)[57, 62.02, #55.01(.06), #55.01(16), #55.01(135), #55.01(140), #55.0108(3), #55.04(.06), #55.05(12), #55.051(1), #55.06(1), #55.06(16), #55.06(18), #55.06(20), #55.06(22), #55.06(44), #55.06(47), #55.06(57), #55.06(61), #55.0611(.06), #55.0611(.08), #55.1138(1), #55.1138(2), #55.17(1), #55.174(1), #55.6114(1), #55.6114(2)]
National Drug File	1	MEDICATION ROUTES(#51.2)[#55.01(119), #55.01(132), #55.06(3)]
Order Entry Results Reporting	1	ORDER(#100)[#55.05(7)]
Scheduling	1	HOSPITAL LOCATION(#44)[#55.01(136), #55.05(13), #55.06(130)]

Fields, Total: 53

Field #	Name	Loc	Type	Details
.001	NUMBER		NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 30, 1984` HELP-PROMPT: `Type a whole number between 0 and 9999999.` DESCRIPTION: `This allows users to select entries by the internal number.` GROUP: `PS`
.01	NAME	0;1	POINTER TO PATIENT FILE (#2)	**********************REQUIRED FIELD********************** PATIENT(#2) INPUT TRANSFORM: `S DINUM=X` LAST EDITED: `MAR 08, 1989` DESCRIPTION: `This is the name of a patient that has some type of pharmacy order.` GROUP: `PS` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `55^B` `1)= S ^PS(55,"B",$E(X,1,30),DA)=""` `2)= K ^PS(55,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `55^ALCNVRT^MUMPS` `1)= I '$D(PSGINITF) S ^PS(55,"ALCNVRT")=$S($D(^PS(59.7,1,20)):$P(^(20),"^"),1:"")` `2)= Q` `Used by the Inpatient post-inits to determine if a conversion needs to be run on this file. In the form of: ^PS(55,"ALCNVRT")` CROSS-REFERENCE: `55^AUDDD^MUMPS` `1)= I '$D(PSGINITF) S ^PS(55,"AUDDD")=$S($D(^PS(59.7,1,20)):$P(^(20),"^"),1:"")` `2)= Q` `Used by the Inpatient post-inits to determine if a conversion needs to be run on this file. In the form of: ^PS(55,"AUDDD")` CROSS-REFERENCE: `55^AUDAPM^MUMPS` `1)= I '$D(PSGINITF) S ^PS(55,"AUDAPM")=$S($D(^PS(59.7,1,20)):$P(^(20),"^"),1:"")` `2)= Q` `Used by the Inpatient post-inits to determine if a conversion needs to be run on this file. In the form of: ^PS(55,"AUDAPM")`
.02	CAP	0;2	SET	'1' FOR NON-SAFETY; '0' FOR SAFETY; LAST EDITED: `SEP 06, 1982` HELP-PROMPT: `Enter 1 if the patient should be issued non-safety caps or 0 if safety caps should be issued.` DESCRIPTION: `This field is used to indicate if safety caps are to be issued to patient.`
.03	MAIL	0;3	SET	'0' FOR REGULAR MAIL; '1' FOR CERTIFIED MAIL; '2' FOR DO NOT MAIL; '3' FOR LOCAL - REGULAR MAIL; '4' FOR LOCAL - CERTIFIED MAIL; LAST EDITED: `FEB 10, 1997` HELP-PROMPT: `Enter: (0) Regular Mail (Can be CMOP) (1) Certified Mail (Can be CMOP) (2) DO NOT MAIL (3) Local-Regular Mail (4) Local-Certified Mail` DESCRIPTION: `This field is used to: A) Determine whether this patient's Rx's are to be sent to the CMOP, or retained for local distribution. If 2-4 are selected, none of this patient's Rx's will be transmitted to the CMOP. B) Select` `what the mail priority is. The CMOP choices are limited to (0) REGULAR and (1) CERTIFIED. Local mail may be designated (3) LOCAL - REGULAR or (4) LOCAL - CERTIFIED. The 'DO NOT MAIL' code (2) may be used to ensure that` `the patient's Rx's are not mailed.`
.04	DIALYSIS PATIENT	0;4	SET	'0' FOR NO; '1' FOR YES; HELP-PROMPT: `Enter 0 if the patient is not in dialysis or a 1 if the patient is in dialysis.` DESCRIPTION: `This field is used to indicate if the patient is in dialysis.` CROSS-REFERENCE: `55^ADIA` `1)= S ^PS(55,"ADIA",$E(X,1,30),DA)=""` `2)= K ^PS(55,"ADIA",$E(X,1,30),DA)`
.05	MAIL STATUS EXPIRATION DATE	0;5	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `FEB 10, 1997` HELP-PROMPT: `If a time limit is desired for the "Do Not Mail", "Local - Regular Mail" or "Local - Certified Mail" conditions found in the "MAIL" field, then enter the date here.` DESCRIPTION: `This field places a time limit on the 'Do Not Mail', 'Local - Regular Mail' and 'Local - Certified Mail' conditions in the 'MAIL' field. If a date is placed in this field and the software detects that the date the Rx is` `processed is greater than the date in the field (past the expired date) a default value of 'Regular Mail' will be assumed for the 'MAIL' field. NOTE: The actual value of the 'MAIL' field will not be changed by the` `software, but can only be modified by a user editing the 'MAIL' field.`
.07	FIRST SERVICE DATE	0;7	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `SEP 29, 2005` HELP-PROMPT: `Login date of first pharmacy service.` DESCRIPTION: `This is the login date of the first order for pharmacy services.` FIELD INDEX: `AFSD (#816) MUMPS IR SORTING ONLY` `Short Descr: BUILD QUEUE FOR PBM RETRANSMIT IF FIRST SERVICE DATE UPDATED.` `Description: If the patient's FIRST SERVICE DATE is updated, this cross-reference will queue the patient for demographic retransmit.` `Set Logic: D LOGDFN^PSUHL(DA)` `Kill Logic: Q` `X(1): FIRST SERVICE DATE (55,.07) (Subscr 1) (Len 30) (forwards)`
.08	ACTUAL/HISTORICAL FLAG	0;8	SET	'A' FOR ACTUAL; 'H' FOR HISTORICAL; LAST EDITED: `DEC 06, 2001` HELP-PROMPT: `ACTUAL OR HISTORICAL FIRST SERVICE DATE` DESCRIPTION: `The purpose of this field is to indicate whether the FIRST SERVICE DATE field was populated with actual or historical data. Actual indicates the field was populated when the first pharmacy service was filed. Historical` `indicates the field was populated by the conversion routine.`
1	NARRATIVE	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>250!($L(X)<1) X` HELP-PROMPT: `Answer must be 1-250 characters in length.` DESCRIPTION: `This is notable information about the patient that pertains to pharmacy.` GROUP: `PS`
3	PATIENT STATUS	PS;1	POINTER TO RX PATIENT STATUS FILE (#53)	RX PATIENT STATUS(#53) LAST EDITED: `DEC 18, 1984` HELP-PROMPT: `Enter the default patient status.` DESCRIPTION: `This field is used to indicate a default patient status.`
40	COMMUNITY NURSING HOME	40;1	SET	'1' FOR YES; LAST EDITED: `NOV 08, 1989` HELP-PROMPT: `Enter Y if this patient is in a community nursing home.` DESCRIPTION: `This field is used to indicate if the patient resides within a community nursing home.`
40.1	NURSING HOME CONTRACT	40;2	SET	'1' FOR YES; LAST EDITED: `NOV 08, 1989` HELP-PROMPT: `Enter Y if this nursing home stay is covered by a contract.` DESCRIPTION: `This field is used to indicate if the patient has a nursing home contract.`
40.2	LAST DATE OF CONTRACT	40;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `APR 02, 1990` HELP-PROMPT: `Enter the date on which the contract expires.` DESCRIPTION: `This field is used to indicate the last date of the nursing home contract.`
41	RESPITE PATIENT START DATE	40;4	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 08, 1989` HELP-PROMPT: `Enter the date on which this patient entered for respite treatment.` DESCRIPTION: `This field is used to indicate the start date of respite care.`
41.1	RESPITE PATIENT END DATE	40;5	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 08, 1989` HELP-PROMPT: `Enter the final date of respite treatment.` DESCRIPTION: `This field is used to indicate the end date of respite care.`
50	ACTIVE SCRIPTS		COMPUTED	MUMPS CODE: `X ^DD(55,50,9.2) S Y(55,50,102)="" X "F D1=0:0 S D1=$N(^PS(55,D0,""P"",D1)) Q:D1'>0 X $P(^DD(55.03,3,0),U,5,99) S:X Y(55,50,102)=Y(55,50,102)+1" S X=Y(55,50,102) S D1=Y(55,50,1) S X=$J(X,0,0)` `9.2 = S Y(55,50,1)=$S($D(D1):D1,1:"")` ALGORITHM: `COUNT(PRESCRIPTION PROFILE:ACTIVE) (ALWAYS 0 DECIMAL DIGITS)` LAST EDITED: `APR 28, 1984` DESCRIPTION: `This field is used to indicate active prescriptions.` TECHNICAL DESCR: `computed.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
52	PRESCRIPTION PROFILE	P;0	POINTER Multiple #55.03	55.03 DESCRIPTION: `This sub-file is used to indicate prescription history for this patient.` GROUP: `PSO`
52.1	RX UPDATE	0;6	SET	'0' FOR Nothing updated; '1' FOR Data movement complete; '2' FOR Backfill complete; LAST EDITED: `AUG 07, 1997` HELP-PROMPT: `Data not entered directly with fileman.` DESCRIPTION: `This field is used to indicate if the patient's medications have been updated in the CPRS orders file. If the field is 0, nothing has been updated, 1 indicates the initial data movement is complete, and 2 indicates the` `Backfill to CPRS is complete.`
52.2	NON-VA MEDS	NVA;0	POINTER Multiple #55.05	55.05 LAST EDITED: `MAR 26, 2003` DESCRIPTION: `This is the Non-VA Meds order multiple. It will be used to store the Non-VA Med orders entered through the CPRS application.` TECHNICAL DESCR: `This multiple field (#52.2) contains the Non-VA Med orders.`
53	CLOZAPINE REGISTRATION NUMBER	SAND;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>7!($L(X)<7)!'(X?2U5N) X` LAST EDITED: `AUG 14, 1991` HELP-PROMPT: `Registration number is 2 letters followed by 5 numbers.` DESCRIPTION: `This is the patient's authorization number assigned by national data base.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `55^ASAND^MUMPS` `1)= S ^PS(55,"ASAND",DA)=""` `2)= K ^PS(55,"ASAND",DA)` `3)= This cross reference is essential for the national Clozapine reporting system. DO NOT DELETE.` `This cross reference is used to select patients for whom data must be extracted and sent to the national Clozapine data base. In the form of: ^PS(55,"ASAND",DA)` CROSS-REFERENCE: `55^ASAND1` `1)= S ^PS(55,"ASAND1",$E(X,1,30),DA)=""` `2)= K ^PS(55,"ASAND1",$E(X,1,30),DA)`
54	CLOZAPINE STATUS	SAND;2	SET	'P' FOR PRE-TREATMENT; 'A' FOR ACTIVE TREATMENT; 'H' FOR TREATMENT ON HOLD; 'D' FOR DISCONTINUED; LAST EDITED: `AUG 14, 1991` HELP-PROMPT: `Enter the code for the patient's clozapine treatment status.` DESCRIPTION: `This is the patient's clozapine treatment status.`
55	DATE OF LAST CLOZAPINE RX	SAND;3	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 14, 1991` HELP-PROMPT: `Enter the date and time of the patient's last clozapine prescription.` DESCRIPTION: `This is the date of the patient's last clozapine prescription.`
56	DEMOGRAPHICS SENT	SAND;4	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `AUG 07, 1991` HELP-PROMPT: `Enter 1 if the patient demographic data has been sent to the national database. Enter 0 if not.` DESCRIPTION: `This indicates whether patient demographic data has been sent to the national database.`
57	RESPONSIBLE PROVIDER	SAND;5	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) INPUT TRANSFORM: `S DIC("S")="I +$G(^VA(200,+Y,""PS"")),'$P(^(0),""^"",4)!($P(^(0),""^"",4)'` `LAST EDITED: FEB 18, 1993` `HELP-PROMPT: Select a valid and active provider.` `DESCRIPTION:` `This is the physician responsible for the patient's clozaril treatment.` `TECHNICAL DESCR:` `pointer` `SCREEN: S DIC("S")="I +$G(^VA(200,+Y,""PS"")),'$P(^(0),""^"",4)!($P(^(0),""^"",4)'` `EXPLANATION: Only valid providers are to be selected.`
58	REGISTRATION DATE	SAND;6	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 31, 1991` HELP-PROMPT: `Enter the date and time of registration.` DESCRIPTION: `This field is used to enter the date of registration.`
62	UNIT DOSE	5;0	Multiple #55.06	55.06 LAST EDITED: `JUL 26, 1996` DESCRIPTION: `This represents the 'top' of the UNIT DOSE SUB-FILE, where all of a patient's active (and expired & dc'd) UNIT DOSE orders are kept. Although orders are initially entered into ^PS(53.1), the order is transferred into` `this sub-file (^PSGOT) upon verification.` GROUP: `PSJU` IDENTIFIED BY: `MED ROUTE(#3), SCHEDULE TYPE(#7)` INDEXED BY: `DURATION OF ADMINISTRATION & REMOVE PERIOD (in minutes) (AL56DOA), STOP DATE/TIME & CLINIC (AUN)`
62.01	UD DEFAULT STOP DATE/TIME	5.1;1	DATE	INPUT TRANSFORM: `S %DT="ETXRS" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 20, 2000` HELP-PROMPT: `Enter a default stop date and time for orders entered for this patient.` DESCRIPTION: `This is date used as a default value for the STOP DATE/TIME of Unit Dose orders during the order entry and renewal processes, if the corresponding site parameter is turned on. The order entry and renewal processes will` `sometimes change this date.` EXECUTABLE HELP: `D EN^DDIOL("NOT TO BE ENTERED INTO THROUGH FILEMAN!!","","$C(7),$C(7),!")` `DELETE AUTHORITY: ^` `WRITE AUTHORITY: ^` GROUP: `PSJU` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
62.02	UD PROVIDER	5.1;2	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `JUL 08, 1991` DESCRIPTION: `This is the latest provider for this patient, used as a default value in order entry.` GROUP: `PSJU`
62.03	UD LAST ADMISSION DATE	5.1;3	DATE	INPUT TRANSFORM: `S %DT="ETXS" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 20, 2000` DESCRIPTION: `This is the last admission date for this patient.` GROUP: `PSJ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
62.04	UD LAST TRANSFER DATE	5.1;4	DATE	INPUT TRANSFORM: `S %DT="ETXS" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 20, 2000` DESCRIPTION: `This is the last transfer date for this patient.` GROUP: `PSJ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
62.05	UD LAST DISCHARGE DATE	5.1;5	DATE	INPUT TRANSFORM: `S %DT="ETXS" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 20, 2000` DESCRIPTION: `This is the last discharge date for this patient.` GROUP: `PSJ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
62.06	UD EXP UP-DATE	5.1;6	DATE	INPUT TRANSFORM: `S %DT="ET" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `JUL 04, 1986` DESCRIPTION: `This is a date used to update expired orders. (Internal)` GROUP: `PSJU`
62.07	UD HOLD FLAG	5.1;7	SET	'0' FOR ORDERS NOT ON HOLD; '1' FOR ORDERS ON HOLD; '2' FOR ORDERS AUTOMATICALLY PLACED ON HOLD; LAST EDITED: `FEB 28, 1994` DESCRIPTION: `This is an internal flag set when all of the patient's orders have been placed on hold.` GROUP: `PSJU`
62.08	UD DISCHARGE FLAG	5.1;8	SET	'1' FOR PATIENT HAS BEEN DISCHARGED; LAST EDITED: `JUL 01, 1990` DESCRIPTION: `This is an internal flag set when a patient is first found to have been discharged. It is set so that Inpatient Meds does not try to cancel the patient's orders every time the patient is accessed while discharged.` GROUP: `PSJ`
62.1	COMMENTS	5.2;0	WORD-PROCESSING #55.061	DESCRIPTION: `This is used for temporary storage of data by the Unit Dose package. The data is deleted before and after each use!` GROUP: `PSJU` LAST EDITED: `MAR 20, 1987` DESCRIPTION: `This is used for temporary storage of data by the Unit Dose package. The data is deleted before and after each use!` GROUP: `PS`
62.11	HOLD REASON	5.1;10	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAY 07, 1989` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: `This is an explanation of why this patient's orders are being placed on hold. This explanation will show on the patient's Unit Dose profile.` EXECUTABLE HELP: `D EN^DDIOL("Enter the reason this patient's order(s) are being placed on hold.","","!")` GROUP: `PSJU`
62.16	*LAST UD ORDER CONVERTED TO V4	5.1;16	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<2) X` LAST EDITED: `AUG 05, 1997` HELP-PROMPT: `Answer must be 2-10 characters in length.` DESCRIPTION: `This is the last Unit Dose order converted for use with version 4 of the Inpatient Medications package. THIS SHOULD NOT BE EDITED. Editing could result in corrupted data and possibly medication administration errors.` TECHNICAL DESCR: `This is used and set by the post-init routine PSJIPST0. It is used to keep track of the patient's last Unit Dose order to be converted to the New Person file and Primary Drug. It is used to allow the Inpatient` `Medications version 4 inits to be rerun if necessary.` `DELETE AUTHORITY: ^` `WRITE AUTHORITY: ^` GROUP: `PSG`
62.2	INPATIENT NARRATIVE	5.3;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>250!($L(X)<1) X` LAST EDITED: `NOV 14, 1997` HELP-PROMPT: `Answer must be 1-250 characters in length.` DESCRIPTION: `This field stores the Inpatient pharmacy narrative for the patient.`
63	*UD STOP DATE	5.1;1	DATE	INPUT TRANSFORM: `S %DT="ETX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 02, 1996` HELP-PROMPT: `NOT TO BE USED THROUGH FILEMAN` DESCRIPTION: `This field is used by the UNIT DOSE PHARMACY package. It is NOT to be entered into anywhere else!` EXECUTABLE HELP: `D EN^DDIOL("NOT TO BE ENTERED INTO THROUGH FILEMAN!!","","$C(7),$C(7),!")` `DELETE AUTHORITY: ^` `WRITE AUTHORITY: ^`
70	PATIENT COMMENT	PC;0	DATE Multiple #55.17	55.17 LAST EDITED: `SEP 07, 2017` DESCRIPTION: `This sub-file allows patient billing comments to be stored for this patient.`
99	*NO. OF IV ORDERS		COMPUTED	MUMPS CODE: `X ^DD(55,99,9.2) S Y(55,99,102)="" X "F D1=0:0 S D1=$N(^PS(55,D0,""IV"",D1)) Q:D1'>0 S:$S($D(^(D1,0)):$P(^(0),U,1),1:"""")'?."" "" Y(55,99,102)=Y(55,99,102)+1" S X=Y(55,99,102) S D1=Y(55,99,1) S X=$J(X,0,0)` `9.2 = S Y(55,99,1)=$S($D(D1):D1,1:"")` ALGORITHM: `COUNT(IV) (ALWAYS 0 DECIMAL DIGITS)` LAST EDITED: `OCT 02, 1996`
100	IV	IV;0	Multiple #55.01	55.01 LAST EDITED: `JUN 23, 1993` DESCRIPTION: `This subfile contains IV order information for any given patient. A separate IV order file does not exist. This isn't the same design as outpatient pharmacy -- which does contain a separate file for prescriptions.` GROUP: `PSJI` INDEXED BY: `STOP DATE/TIME & CLINIC (AIN), CLINIC & STOP DATE/TIME (CIMOI)`
101	ARCHIVE DATE	ARC;0	DATE Multiple #55.13	55.13 DESCRIPTION: `This sub file is used to indicate archived prescriptions.` GROUP: `PSO`
102	*LAST ADMISSION NUMBER	IVD;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>30!($L(X)<1) X` LAST EDITED: `MAR 18, 1986` HELP-PROMPT: `Answer must be 1-30 characters in length.` DESCRIPTION: `This field is updated by the IV PACKAGE every time action is taken on this particular patient. This piece will have two pieces of information on it. The first piece ('-' is the delimiter) is the current admissions` `number, and the second piece is the discharge date for this admissions number. This field is used for determining whether or not to DC IV ORDERS due to ADMISSIONS or DISCHARGE.` GROUP: `PSJI`
102.1	*LAST SERVICE	IVD;2	SET	'M' FOR MEDICINE; 'S' FOR SURGERY; 'P' FOR PSYCHIATRY; 'NH' FOR NHCU; 'NE' FOR NEUROLOGY; 'I' FOR INTERMIDIATE MED; 'R' FOR REHAB MEDICINE; 'SCI' FOR SPINAL CORD INJURY; 'D' FOR DOMICILLARY; 'B' FOR BLIND REHAB; LAST EDITED: `MAR 18, 1986` DESCRIPTION: `This piece is updated by the IV PACKAGE every time this particular patient has any 'IV ACTION'. This piece represents the service of the last ward that this patient was in. It is a set of codes that was taken from the` `ADT package. This field is used to determine whether or not to DC IV ORDERS due to SERVICE transfer.` GROUP: `PSJI`
102.2	*LAST INTERWARD TRANSFER	IVD;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `MAR 19, 1986` HELP-PROMPT: `Type a whole number between 0 and 999.` DESCRIPTION: `This field is updated by the IV PACKAGE every time this particular patient has any 'IV ACTION'. This field represents the last INTERWARD TRANSFER NUMBER for the LAST ADMISSION NUMBER. This field is used to determine` `whether or not to DC IV ORDERS due to WARD TRANSFER.` GROUP: `PSJI`
103	*LAST IV ORDER CONVERTED (4.0)	5.1;9	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `AUG 05, 1997` HELP-PROMPT: `Type a Number between 1 and 999999999, 0 Decimal Digits` DESCRIPTION: `This is the last IV order for a patient that had it's data converted to the New Person file (200).` TECHNICAL DESCR: `This used and set by the routine PSJIPST1, which is run during the post-init process to convert the Inpatient data from the Provider file (6) to the New Person file (200). This is used to allow the conversion process to` `restart where it left of if the conversion was previously aborted.` GROUP: `PSJ`
104	CONVERSION COMPLETED?	5.1;11	SET	'1' FOR VERSION 5; '2' FOR POE; '3' FOR IV VERIFIED; LAST EDITED: `OCT 26, 2001` DESCRIPTION: `This field contains a 1 if the conversion to the patient's orders for version 5.0 has completed. It contains a 2 if the conversion to the patient's orders for Pharmacy Ordering Enhancement (POE) has completed. It` `contains a 3 if the patient's IV orders existed prior to BCMA V.2.0 has updated the Verifying Pharmacist field.`
105	BCMA ID	IVBCMA;0	Multiple #55.0105	55.0105 DESCRIPTION: `This is the unique barcode ID in the format DFN_"V"_ID# ex: 740V1.` INDEXED BY: `BCMA ID & ON (BCMA1)`
106	OTHER LANGUAGE PREFERENCE	LAN;1	SET	'1' FOR YES; LAST EDITED: `SEP 30, 2002` HELP-PROMPT: `Answer only if patient has another language preference for printing on bottle labels.` DESCRIPTION: `This field is used to identify patients who have another language preference for printing medication instructions on bottle labels.` TECHNICAL DESCR: `set of codes.` GROUP: `PSO`
106.1	PMI LANGUAGE PREFERENCE	LAN;2	SET	'1' FOR ENGLISH; '2' FOR SPANISH; LAST EDITED: `OCT 23, 2002` DESCRIPTION: `This field will be used to determine the default language preference for printing the PMI sheets at the CMOPs.`
108	SCRIPTALK ENROLLMENT ACTIVITY	SCTALK;0	DATE Multiple #55.0108	55.0108 DESCRIPTION: `This multiple contains the history log information for ScripTalk enrollment activities for a patient.`
109	CLINICAL ALERT	2;0	DATE Multiple #55.0109	55.0109 LAST EDITED: `NOV 28, 2017` DESCRIPTION: `The CLINICAL ALERTS (multiple) allows Pharmacy staff to document clinical information that is not covered anywhere else in the VistA packages, e.g. when a patient is part of a research study.`

ICR, Total: 31

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #117	ICR - IMMUNOLOGY CASE REGISTRY Spinal Cord Dysfunction Clinical Case Registries	ORDER NUMBER (.01). Access: Direct Global Read & w/Fileman MED ROUTE (3). Access: Direct Global Read & w/Fileman TYPE (4). Access: Direct Global Read & w/Fileman SCHEDULE TYPE (7). Access: Direct Global Read & w/Fileman ORIGINAL ORDER NUMBER (.25). Access: Direct Global Read & w/Fileman DOSE LIMIT (12). Access: Direct Global Read & w/Fileman TOTAL UNITS DISPENSED (39). Access:* Direct Global Read & w/Fileman SCHEDULE (26). Access: Direct Global Read & w/Fileman START DATE/TIME (10). Access: Direct Global Read & w/Fileman STOP DATE/TIME (34). Access: Direct Global Read & w/Fileman DISPENSE DRUG (.01). Access: Direct Global Read & w/Fileman UNITS PER DOSE (.02). Access: Direct Global Read & w/Fileman
ICR #522	Health Summary Integrated Billing	PRESCRIPTION PROFILE (.01). Access: Read w/Fileman	Used if active only is indicated.
ICR #533	Health Summary
ICR #535	Health Summary
ICR #552	ICR - IMMUNOLOGY CASE REGISTRY Spinal Cord Dysfunction Clinical Case Registries	PRESCRIPTION PROFILE (.01). Access: Read w/Fileman
ICR #567	QUALITY IMPROVEMENT CHECKLIST
ICR #677	Clinical Procedures
ICR #693	Outpatient Pharmacy
ICR #781	Mental Health	CLOZAPINE REGISTRATION NUMBER (53). Access: Direct Global Read & w/Fileman CLOZAPINE STATUS (54). Access: Direct Global Read & w/Fileman DATE OF LAST CLOZAPINE RX (55). Access: Direct Global Read & w/Fileman DEMOGRAPHICS SENT (56). Access: Direct Global Read & w/Fileman RESPONSIBLE PROVIDER (57). Access: Direct Global Read & w/Fileman REGISTRATION DATE (58). Access: Direct Global Read & w/Fileman	Read Access to x-ref.Read Access to x-ref.
ICR #787	Mental Health
ICR #825	Patient Data Exchange Mental Health
ICR #922	Lab Service	ADDITIVE (.01). Access: Direct Global Read & w/Fileman DRUG (.01). Access: Direct Global Read & w/Fileman
ICR #995	Lab Service	PRESCRIPTION PROFILE (.01). Access: Direct Global Read & w/Fileman
ICR #1883	DSS - DECISION SUPPORT SYSTEM EXTRACTS	IV ROOM (.22). Access: Direct Global Read & w/Fileman	From the IV multiple (55.01).
ICR #1982	CMOP	CAP (.02). Access: Direct Global Read & w/Fileman MAIL (.03). Access: Direct Global Read & w/Fileman MAIL STATUS EXPIRATION DATE (.05). Access: Direct Global Read & w/Fileman PRESCRIPTION PROFILE (.01). Access: Direct Global Read & w/Fileman
ICR #2191	Inpatient Medications National Drug File
ICR #2228	Outpatient Pharmacy CMOP Income Verification Match
ICR #2396	Order Entry Results Reporting	RX UPDATE (52.1). Access: Direct Global Read & w/Fileman CONVERSION COMPLETED (104). Access: Direct Global Read & w/Fileman	As part of the pre-CPRS functionality that is releasedwith OR2.549, an estimate of global growth is given. One of the componentsof that growth is the backfilling of outpatient pharmacy prescriptions.In order to calculate the number of prescriptions that might be backfilled, weloop through the PHARMACY PATIENT file and then through the "A" x-ref of thePRESCRIPTION PROFILE multiple (#55.03). We then get the pointer to thePRESCRIPTION file (from the cross-reference) and navigate to that file toperform additional checks.
ICR #2470	Clinical Information Resource Network	PRESCRIPTION PROFILE (.01). Access: Direct Global Read & w/Fileman
ICR #2475	Dietetics	DISPENSE DRUG (.01). Access: Direct Global Read & w/Fileman
ICR #2497	Pharmacy Benefits Management Clinical Case Registries	Order Number (.01). Access: Read w/Fileman Patient Name (.5). Access: Read w/Fileman Provider (1). Access: Read w/Fileman Last ward (68). Access: Read w/Fileman MED ROUTE (3). Access: Read w/Fileman Schedule (26). Access: Read w/Fileman Start date/time (10). Access: Read w/Fileman Stop date/time (34). Access: Read w/Fileman Original ward (9). Access: Read w/Fileman Dispense drug (.01). Access: Read w/Fileman Units Per Dose (.02). Access: Read w/Fileman Inactive Date (.03). Access: Read w/Fileman Dispense date/time (.01). Access: Read w/Fileman DISPENSE DRUG (.02). Access: Read w/Fileman How (.05). Access: Read w/Fileman AMOUNT (.03). Access: Read w/Fileman COST (.04). Access: Read w/Fileman USER (.06). Access: Read w/Fileman WARD (.07). Access: Read w/Fileman PROVIDER (.08). Access: Read w/Fileman Order Number (.01). Access: Read w/Fileman Start Date/time (.02). Access: Read w/Fileman Stop date/time (.03). Access: Read w/Fileman Type (.04). Access: Read w/Fileman Intermittent Syring (108). Access: Read w/Fileman Provider (.06). Access: Read w/Fileman Infusion rate (.08). Access: Read w/Fileman Schedule (.09). Access: Read w/Fileman Ward (104). Access: Read w/Fileman CHEMOTHERAPY TYPE (106). Access: Read w/Fileman MED ROUTE (132). Access: Read w/Fileman IV ROOM (.22). Access: Read w/Fileman Additive (.01). Access: Read w/Fileman Strength (.02). Access: Read w/Fileman Solution (.01). Access: Read w/Fileman Volume (1). Access: Read w/Fileman Date (1). Access: Read w/Fileman Action (2). Access: Read w/Fileman Labels (4). Access: Read w/Fileman Daily Usage (6). Access: Read w/Fileman	This cross reference is used to identify active unit dose orders for aspecified reporting period and the patients for which the orders are writtenfor.Program will $O through the dispense drug multiple to identify all dispensedrugs associated with a particular unit dose order.$O permitted through the dispense drug multiple.$D may be performed on ^PS(55,D0,5,D1,11,D2)Program will $O through the Additive multiple to identify all additivesassociated with an IV order.The program will $O through the solution multiple to identify all solutionsassociate with an IV order.The program will $O through the label tracking multiple to identify dispensingoccurrences within a specified time period.The program will utilize the "AIVS" cross reference toidentify active IV orders for a specific time period and the patients forwhich the orders are written for.The "AUD" x-ref is to identify active Unit Dose ordersfor a specific time period and patients for which the orders are written.
ICR #2908	Text Integration Utility	ORDERABLE ITEM (108). Access: Direct Global Read & w/Fileman DISPENSE DRUG (.01). Access: Direct Global Read & w/Fileman ORDERABLE ITEM (130). Access: Direct Global Read & w/Fileman ADDITIVE (.01). Access: Direct Global Read & w/Fileman
ICR #3502	Pharmacy Benefits Management	FIRST SERVICE DATE (.07). Access: Direct Global Read & w/Fileman ACTUAL/HISTORICAL FLAG (.08). Access: Direct Global Read & w/Fileman ORIGINAL WARD (9). Access: Direct Global Read & w/Fileman LAST WARD LOCATION (68). Access: Direct Global Read & w/Fileman WARD (104). Access: Direct Global Read & w/Fileman	Order Number Cross Reference
ICR #4025	Health Summary
ICR #4181	Clinical Reminders
ICR #4484	Clinical Reminders	STATUS (5). Access: Read w/Fileman
ICR #5183	Drug Accountability Controlled Substances	LAST WARD (68). Access: Direct Global Read & w/Fileman DOSAGE ORDERED (109). Access: Direct Global Read & w/Fileman	This cross reference is used to identify active unitdose orders for a patient during a specified reporting period.
ICR #5803	DSS - DECISION SUPPORT SYSTEM EXTRACTS	DOSE (120). Access: Read w/Fileman UNIT (121). Access: Read w/Fileman SCHEDULE (26). Access: Read w/Fileman DATE (.01). Access: Read w/Fileman ACTION (2). Access: Read w/Fileman
ICR #6395	Enterprise Health Management Platform	ORDERS FILE ENTRY (66). Access: Direct Global Read & w/Fileman ORDERS FILE ENTRY (110). Access: Direct Global Read & w/Fileman
ICR #6987	Outpatient Pharmacy CMOP
ICR #7330	COMPREHENSIVE CARE COORDINATION	PRIORITY (.24). Access: Read w/Fileman PROVIDER (1). Access: Read w/Fileman MED ROUTE (3). Access: Read w/Fileman SPECIAL INSTRUCTIONS (8). Access: Read w/Fileman SCHEDULE (26). Access: Read w/Fileman STATUS (28). Access: Read w/Fileman FREQUENCY (in minutes) (42). Access: Read w/Fileman ORDERABLE ITEM (108). Access: Read w/Fileman DOSAGE ORDERED (109). Access: Read w/Fileman DOSE (120). Access: Read w/Fileman UNIT (121). Access: Read w/Fileman REQUESTED DURATION (126). Access: Read w/Fileman CLINIC (130). Access: Read w/Fileman INDICATION FOR USE (141). Access: Read w/Fileman PROVIDER COMMENTS (.01). Access: Read w/Fileman DISPENSE DRUG (.01). Access: Read w/Fileman INACTIVE DATE (.03). Access: Read w/Fileman TYPE (.04). Access: Read w/Fileman PROVIDER (.06). Access: Read w/Fileman INFUSION RATE (.08). Access: Read w/Fileman SCHEDULE (.09). Access: Read w/Fileman REMARKS (.1). Access: Read w/Fileman OTHER PRINT INFO (31). Access: Read w/Fileman ORDERABLE ITEM (100). Access: Read w/Fileman CHEMOTHERAPY TYPE (106). Access: Read w/Fileman MED ROUTE (132). Access: Read w/Fileman INSTRUCTIONS (133). Access: Read w/Fileman PRIORITY (134). Access: Read w/Fileman CLINIC (136). Access: Read w/Fileman REQUESTED DURATION (151). Access: Read w/Fileman REQUESTED IV LIMITATION (152). Access: Read w/Fileman INDICATION FOR USE (156). Access: Read w/Fileman PROVIDER COMMENTS (.01). Access: Read w/Fileman ADDITIVE (.01). Access: Read w/Fileman STRENGTH (.02). Access: Read w/Fileman BOTTLE (.03). Access: Read w/Fileman SOLUTION (.01). Access: Read w/Fileman VOLUME (1). Access: Read w/Fileman ORDERABLE ITEM (.01). Access: Read w/Fileman DISPENSE DRUG (1). Access: Read w/Fileman DOSAGE (2). Access: Read w/Fileman MEDICATION ROUTE (3). Access: Read w/Fileman SCHEDULE (4). Access: Read w/Fileman STATUS (5). Access: Read w/Fileman ORDER NUMBER (7). Access: Read w/Fileman START DATE (8). Access: Read w/Fileman DOCUMENTED DATE (11). Access: Read w/Fileman DOCUMENTED BY (12). Access: Read w/Fileman CLINIC (13). Access: Read w/Fileman INDICATION FOR USE (15). Access: Read w/Fileman DISCLAIMER (.01). Access: Read w/Fileman COMMENTS (.01). Access: Read w/Fileman SPECIAL INSTRUCTIONS (LONG) (.01). Access: Read w/Fileman SPECIAL INSTRUCTIONS (LONG) (.01). Access: Read w/Fileman

Name	Field # of Occurrence
^%DT	.05+1, .07+1, 40.2+1, 41+1, 41.1+1, 55+1, 58+1, 62.01+1, 62.03+1, 62.04+1 , 62.05+1, 62.06+1, 63+1
EN^DDIOL	62.01(HELP ), 62.11(HELP ), 63(HELP )
^DIC	57+1
$$GET1^DIQ	IXCIMOCLUSCC+1
$$CHECK^PSJIMO1	IXCIMOUSCC+1
$$CHECK2^PSJIMO1	IXCIMOCLISCC+1
KPSPA^PSJXRFK	IXACRIVKL+1, IXACRUDKL+1
SPSPA^PSJXRFS	IXACRIVSL+1, IXACRUDSL+1
KNVA^PSOPXRMU	IXACRNVAKL+1
SNVA^PSOPXRMU	IXACRNVASL+1
LOGDFN^PSUHL	IXAFSDSL+1
$$PATCH^XPDUTL	IXACRIVSCC+1, IXACRIVKCC+1, IXACRUDSCC+1, IXACRUDKCC+1

Name	Line Occurrences (* Changed, ! Killed)
^DD(55	50+1, 99+1
^PS(55 - [#55]	IXACXSL+1, IXACXKL+1!, IXACXKEIC+1!, IXACX1SL+1, IXACX1KL+1!, IXACX1KEIC+1!, IXAIVCSL+1, IXAIVCKL+1!, IXAIVCKEIC+1!, IXAUDCSL+1 , IXAUDCKL+1!, IXAUDCKEIC+1!, IXCIMOCLISL+1, IXCIMOCLIKL+1!, IXCIMOCLIKEIC+1!, IXCIMOCLUSL+1, IXCIMOCLUKL+1!, IXCIMOCLUKEIC+1!, IXCIMOUSL+1*, IXCIMOUKL+1! , IXCIMOUKEIC+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 3S), .01(XREF 4S), .04(XREF 1S), .04(XREF 1K), 53(XREF 1S), 53(XREF 1K) , 53(XREF 2S), 53(XREF 2K)
^PS(59.7 - [#59.7]	.01(XREF 2S), .01(XREF 3S), .01(XREF 4S)
^PXRMINDX("55NVA"	IXACRNVAKEIC+1!
^PXRMINDX(55	IXACRIVKEIC+1!, IXACRUDKEIC+1!

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	.05+1, .07+1, 40.2+1, 41+1, 41.1+1, 55+1, 58+1, 62.01+1, 62.03+1, 62.04+1 , 62.05+1, 62.06+1, 63+1*
>> D1	50+1, 50OF9.2+1, 99+1, 99OF9.2+1
>> DA	IXACRIVSL+1, IXACRIVKL+1, IXACRNVASL+1, IXACRNVAKL+1, IXACRUDSL+1, IXACRUDKL+1, IXACXSL+1, IXACXKL+1, IXACX1SL+1, IXACX1KL+1 , IXAFSDSL+1, IXAIVCSL+1, IXAIVCKL+1, IXAUDCSL+1, IXAUDCKL+1, IXCIMOCLISL+1, IXCIMOCLIKL+1, IXCIMOCLUSL+1, IXCIMOCLUKL+1, IXCIMOUSL+1 , IXCIMOUKL+1, .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), 53(XREF 1S), 53(XREF 1K), 53(XREF 2S), 53(XREF 2K)
>> DA(1	IXAIVCSL+1, IXAIVCKL+1, IXAUDCSL+1, IXAUDCKL+1, IXCIMOCLISL+1, IXCIMOCLIKL+1, IXCIMOCLUSL+1, IXCIMOCLUKL+1, IXCIMOUSL+1, IXCIMOUKL+1
DIC	57+1!*
DIC("S"	57+1, 57SCR+1
>> DIE	57+1
>> DINUM	.01+1*
>> PSGINITF	.01(XREF 2S), .01(XREF 3S), .01(XREF 4S)
X	IXACRIVSL+1, IXACRIVSCC+1, IXACRIVKL+1, IXACRIVKCC+1, IXACRNVASL+1, IXACRNVAKL+1, IXACRUDSL+1, IXACRUDSCC+1, IXACRUDKL+1, IXACRUDKCC+1 , IXACXSCC+1, IXACXKCC+1, IXACX1SCC+1, IXACX1KCC+1, IXCIMOCLISL+1, IXCIMOCLISCC+1, IXCIMOCLIKL+1, IXCIMOCLUSL+1, IXCIMOCLUSCC+1, IXCIMOCLUKL+1 , IXCIMOUSCC+1, .001+1!, .01+1, .01(XREF 1S), .01(XREF 1K), .04(XREF 1S), .04(XREF 1K), .05+1!, .07+1!, 1+1! , 40.2+1!, 41+1!, 41.1+1!, 50+1, 53+1!, 53(XREF 2S), 53(XREF 2K), 55+1!, 57+1!, 58+1! , 62.01+1!, 62.03+1!, 62.04+1!, 62.05+1!, 62.06+1!, 62.11+1!, 62.16+1!, 62.2+1!, 63+1!, 99+1* , 102+1!, 102.2+1!, 103+1!
X(1	IXACXSL+1, IXACXKL+1, IXACX1SL+1, IXACX1KL+1, IXAIVCSL+1, IXAIVCKL+1, IXAUDCSL+1, IXAUDCKL+1, IXCIMOUSL+1, IXCIMOUKL+1
X(2	IXACXSL+1, IXACXKL+1, IXACX1SL+1, IXACX1KL+1, IXAIVCSL+1, IXAIVCKL+1, IXAUDCSL+1, IXAUDCKL+1, IXCIMOUSL+1, IXCIMOUKL+1
X(3	IXCIMOUSL+1, IXCIMOUKL+1
>> X2(1	IXCIMOCLUSCC+1
>> Y	.05+1, .07+1, 40.2+1, 41+1, 41.1+1, 55+1, 57+1, 58+1, 62.01+1, 62.03+1 , 62.04+1, 62.05+1, 62.06+1, 63+1
>> Y(55	50+1, 50OF9.2+1, 99+1, 99OF9.2+1

Customize PDF page

Package: Pharmacy Data Management

Global: ^PS(55

Information

Description

Directly Accessed By Routines, Total: 631

Accessed By FileMan Db Calls, Total: 55

Pointed To By FileMan Files, Total: 1

Pointer To FileMan Files, Total: 16

Fields, Total: 53

ICR, Total: 31

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Legend: