Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^PS(55

Package: Pharmacy Data Management

Global: ^PS(55


Information

FileMan FileNo FileMan Filename Package
55 PHARMACY PATIENT Pharmacy Data Management

Description

Directly Accessed By Routines, Total: 612

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

Accessed By FileMan Db Calls, Total: 30

Package Total Routines
Outpatient Pharmacy 17 PSOBPSUT    PSODEMSB    PSOERXD1    PSOERXD2    PSOERXP1    PSOERXU4    PSOHLUP    PSOLMPAT
PSONVNEW    PSOORUT2    PSOP288F    PSOPAT    PSOPOS10    PSORELD1    PSORX1    PSOTALK2
PSOTPRX1    
Inpatient Medications 9 PSGFILED    PSGNE3    PSGOEHA    PSIVORE    PSIVOREN    PSIVORFB    PSJHL10    PSJLMUTL
PSJUTL1    
National Drug File 2 PSNPPIO    PSNPPIP    
Pharmacy Data Management 1 PSSSXRD    
Registration 1 DGFFP03    

Pointed To By FileMan Files, Total: 1

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

Pointer To FileMan Files, Total: 16

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)[5762.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
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: 30

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 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 OR*2.5*49, 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 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
  • External References

    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

    Global Variables Directly Accessed

    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!

    Naked Globals

    Name Field # of Occurrence
    ^(20 .01(XREF 2S), .01(XREF 3S), .01(XREF 4S)

    Local Variables

    Legend:

    >> 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*
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All