Global: ^PS(55

FileMan FileNo	FileMan Filename	Package
55	PHARMACY PATIENT	Pharmacy Data Management

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

Accessed By FileMan Db Calls, Total: 56

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: