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 |  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: 605

Package Total Routines
Inpatient Medications 311 PSGAH    PSGAL5    PSGAMS    PSGAP0    PSGAPIV    PSGCAP0    PSGCAPIV    PSGDS0
PSGGAO    PSGL    PSGMAR0    PSGMIV    PSGMMAR0    PSGMMAR2    PSGMMIV    PSGMMIVC
PSGMUTL    PSGNE3    PSGOE    PSGOE1    PSGOE6    PSGOE9    PSGOECS    PSGOEE
PSGOEF    PSGOEF1    PSGOEH0    PSGOEH1    PSGOEHA    PSGOEL    PSGOEM    PSGOENG
PSGOEPO    PSGOER    PSGOER0    PSGOER1    PSGOERI    PSGOERS    PSGOES    PSGOESF
PSGOETO    PSGOEVS    PSGOT    PSGOTR    PSGOU    PSGP    PSGPER0    PSGPER2
PSGPLF    PSGPLR    PSGPLR0    PSGPLUP0    PSGPLXR    PSGPO    PSGS0    PSGSH
PSGSICH    PSGSICH1    PSGSICH2    PSGTAP0    PSGTAP1    PSGTCTD    PSGVBW    PSGVW
PSGVW0    PSGXR38    PSIV    PSIVACT    PSIVAL    PSIVAOR1    PSIVARH    PSIVBCID
PSIVCAL    PSIVEDT    PSIVEDT1    PSIVHYP    PSIVHYPL    PSIVHYPR    PSIVLABL    PSIVLABR
PSIVLBDL    PSIVLBL1    PSIVLBRP    PSIVLTR1    PSIVMAN    PSIVMAN1    PSIVOD    PSIVOE
PSIVOPT1    PSIVOPT2    PSIVORA    PSIVORA1    PSIVORAL    PSIVORC1    PSIVORE    PSIVORE1
PSIVORE2    PSIVOREN    PSIVORFB    PSIVORH    PSIVPGE    PSIVPRO    PSIVRD    PSIVRDC
PSIVRNL    PSIVRP1    PSIVST2    PSIVSTAT    PSIVSUS1    PSIVUDL    PSIVUWL    PSJ PC IV AC/EDIT ACTION
PSJ005    PSJ0066    PSJ0077    PSJ0078    PSJ0099    PSJ0103    PSJ074    PSJ078A
PSJ089B    PSJ200    PSJ257PO    PSJ299PO    PSJ304PO    PSJ311PO    PSJ320PO    PSJ323PO
PSJ5P193    PSJ5P315    PSJ5P340    PSJAC    PSJADT    PSJADT0    PSJADT2    PSJBCBU
PSJBCMA1    PSJBCMA3    PSJBCMA4    PSJBCMA5    PSJCLNOC    PSJCLOR2    PSJCLOR4    PSJCLOR5
PSJCOMR    PSJDCHK    PSJDDUT    PSJDSS    PSJEEU0    PSJEXP    PSJEXP0    PSJGMRA
PSJH1    PSJHEAD    PSJHIS    PSJHL2    PSJHL3    PSJHL4    PSJHL4A    PSJHL5
PSJHL6    PSJHLU    PSJHLV    PSJIMO1    PSJINHIS    PSJINVW    PSJIPST    PSJIPST2
PSJLIACT    PSJLIORD    PSJLIUTL    PSJLIVMD    PSJLMHED    PSJLMPRU    PSJLMUDE    PSJLMUT1
PSJLMUTL    PSJMEDS    PSJMISC    PSJMIV    PSJNEWOA    PSJNEWOC    PSJO1    PSJO2
PSJOCDC    PSJOCDI    PSJOE    PSJOE0    PSJOEA    PSJOEA2    PSJOEEW    PSJOERI
PSJORAPI    PSJOREN    PSJORMA2    PSJORPOE    PSJORRE    PSJORRE1    PSJORREN    PSJORRN
PSJORRN1    PSJORRO    PSJORUT2    PSJPADE    PSJPADSI    PSJPATMR    PSJPDCLU    PSJPL0
PSJPR0    PSJPXRM1    PSJSFRQ    PSJUTL1    PSJUTL2    PSJXR51    PSJXR510    PSJXR511
PSJXR516    PSJXR517    PSJXR518    PSJXR519    PSJXR520    PSJXR53    PSJXR54    PSJXR58
PSJXRFK    ^PS(53.1    PSGAMSA    PSGAPP    PSGBRJ    PSGDL    PSGEUD    PSGEUDD
PSGOD    PSGOE0    PSGOE5    PSGOEC    PSGOEV    PSGORS0    PSGPEN    PSGPL0
PSGPL1    PSGPLDP0    PSGRET    PSGSICHK    PSGVBW1    PSGVBWU    PSIVAOR    PSIVHIS
PSIVHLD    PSIVLB    PSIVLTR    PSIVOPT    PSIVORC2    PSIVORLB    PSIVRP    PSIVSPDC
PSIVSUS    PSIVUTL    PSIVUTL1    PSIVVW1    PSIVWL    PSIVWL1    PSJ0061    PSJ0063
PSJ0071    PSJ0091    PSJ0171    PSJ0186    PSJ0742    PSJ078B    PSJADT1    PSJBCMA
PSJBCMA2    PSJBLDOC    PSJCLOR    PSJCLOR3    PSJCOM    PSJCOM1    PSJDCU    PSJDGAL2
PSJFTR    PSJHL10    PSJHL7    PSJHL9    PSJIBAG    PSJIPST1    PSJLMGUD    PSJLMPRI
PSJLOI    PSJOCDS    PSJOEA1    PSJORMAR    PSJP    PSJPAD50    PSJPDCLA    PSJPDV0
PSJPDV1    PSJPR    PSJUTL3    PSJUTL6    PSJVOSR    PSJXR512    PSJXR513    PSJXR514
PSJXR515    PSJXR52    PSJXR55    PSJXR56    PSJXR57    PSJXR59    PSJXRFS    
Outpatient Pharmacy 161 PSO52AP1    PSO52API    PSO55FX3    PSOARCTG    PSOARX    PSOBBC    PSOBKDED    PSOBUILD
PSOCAN    PSOCAN1    PSOCAN3    PSOCLUTL    PSOCMOPT    PSOCSRL    PSOCSTM    PSODDPR3
PSOERXD1    PSOFUNC    PSOHLUP    PSOHLUP1    PSOLBLN2    PSONEW1    PSOORED1    PSOORFI3
PSOORNE3    PSOORNE5    PSOORRL1    PSOORRL3    PSOP2    PSOPOST7    PSORESK    PSORESUS
PSORN52A    PSORXRP2    PSOSD    PSOSUCHG    PSOSULOG    PSOTALK    PSOTPRP1    PSOUTLA1
PSOVERC    ^PSRX    PSO160P1    PSO55FX2    PSO7P517    PSOARCCV    PSOARCDE    PSOARCF5
PSOARCLT    PSOARCS2    PSOATRF    PSOATRFC    PSOAUTOC    PSOBAIR2    PSOBING1    PSOBINGO
PSOCLOU    PSOCMOP    PSOCMOPC    PSOCP    PSOCSTD    PSODDPR1    PSODDPR2    PSODDPR4
PSODDPR5    PSODDPR7    PSODDPRE    PSODEM    PSODEMSB    PSODGAL1    PSODIR1    PSODISP
PSODRDU1    PSODRDU2    PSOERXU4    PSOEXDT    PSOHCSUM    PSOHELP1    PSOHELP3    PSOHLDS1
PSOHLDS2    PSOHLDS3    PSOHLNE2    PSOHLSG1    PSOHLSG2    PSOHLSG3    PSOLBL    PSOLBL2
PSOLBL3    PSOLBLN    PSOLLL1    PSOLLL7    PSOLLLI    PSOLMPAT    PSOMHV1    PSON52
PSONVAR1    PSONVAVW    PSONVNEW    PSOORDER    PSOORDRG    PSOORED5    PSOORFI1    PSOORFI4
PSOORFIN    PSOORNE1    PSOORNE4    PSOORNEW    PSOORNW2    PSOORRL    PSOORRLN    PSOORRLO
PSOORUT2    PSOORUTL    PSOP    PSOP288F    PSOP288R    PSOPAT    PSOPI136    PSOPMP0
PSOPOLY    PSOPOS10    PSOPOST    PSOPRF    PSOPRFSS    PSOPTC0    PSOPTPST    PSOPXRM1
PSOQ0496    PSOREJP2    PSOREJP3    PSOREJU3    PSORELD1    PSORFL    PSORLLL1    PSORLLLI
PSORREF    PSORRPA1    PSORX1    PSORXDL    PSORXED    PSORXEDT    PSORXPR    PSORXVW
PSORXVW2    PSOSD3    PSOSIGDS    PSOSIGMX    PSOSULBL    PSOSUPAT    PSOSUPRX    PSOTALK2
PSOTPCAN    PSOTPCRX    PSOTPCUL    PSOTPRX1    PSOTRLBL    PSOUTL    PSOVER1    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    
CMOP 5 PSXBLD    PSXBLD1    PSXBLD2    PSXMISC1    PSXRXQU    
Mental Health 4 YSCLPOST    YSCLSRV2    YSCLSRV3    YSCLTST1    
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: 44

Package Total Routines
Outpatient Pharmacy 21 PSOBPSUT    PSOCLO1    PSOCLOU    PSOCLUTL    PSODEMSB    PSODIR1    PSOERXD1    PSOERXD2
PSOERXP1    PSOERXU4    PSOHLUP    PSOLMPAT    PSONVNEW    PSOORUT2    PSOP288F    PSOPAT
PSOPOS10    PSORELD1    PSORX1    PSOTALK2    PSOTPRX1    
Inpatient Medications 14 PSGFILED    PSGNE3    PSGOD    PSGOE41    PSGOE81    PSGOE91    PSGOEHA    PSIVORE
PSIVOREN    PSIVORFB    PSJCLOZ    PSJHL10    PSJLMUTL    PSJUTL1    
Mental Health 5 YSCLDIS    YSCLTST2    YSCLTST3    YSCLTST5    YSCLTST6    
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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All