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(52.7

Package: Pharmacy Data Management

Global: ^PS(52.7


Information

FileMan FileNo FileMan Filename Package
52.7 IV SOLUTIONS Pharmacy Data Management

Description

Directly Accessed By Routines, Total: 115

Package Total Routines
Inpatient Medications 57 PSGCAPIV    PSGMIV    PSGMMIV    PSGMMIVC    PSGSICH    PSIVAL    PSIVAOR1    PSIVEDT
PSIVHYPL    PSIVHYPR    PSIVLABL    PSIVLABR    PSIVMAN    PSIVMAN1    PSIVOE    PSIVORAL
PSIVORLB    PSIVORV1    PSIVQUI    PSIVRNL    PSIVUDL    PSJ200    PSJBCMA    PSJBCMA1
PSJBLDOC    PSJCLOR5    PSJDCHK    PSJDIN    PSJEEU0    PSJHL3    PSJHL4A    PSJHLU
PSJIBAG    PSJIEDT    PSJLIFN    PSJLIUTL    PSJMISC    PSJMUTL    PSJORMA2    PSJORPOE
PSJORRE    PSJORRE1    PSJORRN    PSJORRN1    PSJORRO    PSJORUT2    PSJPATMR    PSJPDCLA
PSJPDCLU    PSJPDV    PSJPDV0    PSJPXRM1    PSJR0103    PSJU DRUG EDIT    PSJUTL1    PSJXRFK
PSJXRFS    
Pharmacy Data Management 45 ELECTROLYTES    PSS189PI    PSS50E    PSS52P7    PSS52P7A    PSS55    PSSCLINR    PSSCREAT
PSSDDUT2    PSSDEE    PSSDEE1    PSSDELOI    PSSDSAPA    PSSDSAPK    PSSHLU    PSSMATCH
PSSOICT1    PSSOUTSC    PSSPOI    PSSPOID1    PSSPOID2    PSSPOIDT    PSSPOIKA    PSSPOIM1
PSSPOIM3    PSSPOIMN    PSSPOIMO    PSSPOST2    PSSPRE    PSSPRMIX    PSSPRUTL    PSSQOC
PSSREMCH    PSSSOLI1    PSSSOLIT    PSSSPD    PSSSUTIL    PSSSXRD    PSSUTIL1    PSSVIDRG
PSSVX61    QUICK CODE    SYNONYM    ^PS(52.6    ^PS(52.7    
Drug Accountability 8 PSADRUG    PSADRUGP    PSAENTO    PSANAC    PSAPSI    PSAPSI2    PSAPSI3    PSAPSI4
National Drug File 2 PSNJP54    PSNPSS    
Barcode Medication Administration 1 PSBVT    
Clinical Reminders 1 PXRMISE    

Accessed By FileMan Db Calls, Total: 33

Package Total Routines
Pharmacy Data Management 16 PSS189PI    PSS52P7    PSS52P7A    PSSDDUT2    PSSDEE1    PSSDELOI    PSSPOI    PSSPOIM1
PSSPOIMN    PSSPOST2    PSSPRMIX    PSSPRUTL    PSSSOLI1    PSSSOLIT    PSSSUTIL    PSSVIDRG
Barcode Medication Administration 8 PSBMD    PSBMLLKU    PSBOMD    PSBOMT    PSBOMT1    PSBOPM    PSBRPC2    PSBRPCMO
Inpatient Medications 4 PSIVREC    PSJ53P1    PSJBCMA    PSJCROC    
DSS Extracts 2 ECXAPHA2    ECXBCM    
Controlled Substances 1 PSDORNV    
National Drug File 1 PSNPSS    
National Health Information Network 1 NHINVPSI    

Pointed To By FileMan Files, Total: 9

Package Total FileMan Files
Barcode Medication Administration 3 BCMA MISSING DOSE REQUEST(#53.68)[#53.687(.01)]    BCMA UNABLE TO SCAN LOG(#53.77)[#53.7712(.01)]    BCMA MEDICATION LOG(#53.79)[#53.797(.01)]    
Inpatient Medications 3 IV CATEGORY(#50.2)[1#50.21(.01)]    NON-VERIFIED ORDERS(#53.1)[#53.158(.01)]    PHARMACY QUICK ORDER(#57.1)[#57.18(.01)]    
Pharmacy Data Management 2 IV ADDITIVES(#52.6)[#52.61(6)]    PHARMACY PATIENT(#55)[#55.1058(.01)#55.11(.01)]    
Order Entry Results Reporting 1 ORDER CHECK INSTANCES(#100.05)[#100.114(.01)#100.72(.01)]    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Pharmacy Data Management 3 DRUG ELECTROLYTES(#50.4)[#52.702(.01)]    PHARMACY ORDERABLE ITEM(#50.7)[9]    DRUG(#50)[1]    
Inpatient Medications 1 PRIMARY DRUG(#50.3)[16]    

Fields, Total: 13

Field # Name Loc Type Details
.01 PRINT NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E)!(X'?.ANP) X
  • LAST EDITED:  APR 06, 1990
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  This field should contain the print name of the solution. The name that is entered here will be printed on the IV label, manufacturing list, ward list, etc. The volume should NOT be part of the print name, since the
    volume of the IV ORDER will be printed next to the print name.
  • DELETE TEST:  .01,0)= I 1 D EN^DDIOL("DELETIONS ARE NOT ALLOWED")
    DELETE AUTHORITY: ^
  • GROUP:  PSJI
  • CROSS-REFERENCE:  52.7^B
    1)= S ^PS(52.7,"B",$E(X,1,30),DA)=""
    2)= K ^PS(52.7,"B",$E(X,1,30),DA)
.02 PRINT NAME {2} 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>24!($L(X)<3) X
  • LAST EDITED:  DEC 19, 1985
  • HELP-PROMPT:  Answer must be 3-24 characters in length.
  • DESCRIPTION:  
    An additional print name can be added for each primary solution. This field should only be used when the primary solution is a premix.
  • GROUP:  PSJI
1 GENERIC DRUG 0;2 POINTER TO DRUG FILE (#50)
************************REQUIRED FIELD************************
DRUG(#50)

  • INPUT TRANSFORM:  S DIC("S")="I '$P($G(^PSDRUG(+Y,2)),""^"",5)"_$S($D(DRUGEDIT):"",1:",$S('$G(^(""I"")):1,1:^(""I"")'
  • LAST EDITED:  OCT 18, 2000
  • DESCRIPTION:  
    This field will link the IV Solution file (#52.7) to the drug file (#50).
  • SCREEN:  S DIC("S")="I '$P($G(^PSDRUG(+Y,2)),""^"",5)"_$S($D(DRUGEDIT):"",1:",$S('$G(^(""I"")):1,1:^(""I"")'
  • EXPLANATION:  INACTIVE DRUGS ARE NOT SELECTABLE
  • GROUP:  PSJI
  • CROSS-REFERENCE:  52.7^AC
    1)= S ^PS(52.7,"AC",$E(X,1,30),DA)=""
    2)= K ^PS(52.7,"AC",$E(X,1,30),DA)
  • CROSS-REFERENCE:  52.6^AAP^MUMPS
    1)= I $P($G(^PSDRUG(X,2)),"^",3)'["I" S PSIUDA=X,PSIUX="I" D ENS^PSSGIU K PSIUDA,PSIUX
    2)= I '$D(^PS(52.6,"AC",X)) S XX=$O(^PS(52.7,"AC",X,0)) S:XX=DA XX=$O(^(XX)) I XX,$P($G(^PSDRUG(X,2)),"^",3)["I" S PSIUDA=X,PSIUX="I" D END^PSSGIU K PSIUDA,PSIUX
    3)= Updates the Application Package's Use field for the generic drug selected.
    This is used to automatically update the Application Packages' use field in the Drug file for the generic drug selected. In the form of: ^PS(52.7,"AC",X,DA)
  • CROSS-REFERENCE:  ^^TRIGGER^52.7^16
    1)= K DIV S (DIV,X)=$P($G(^PSDRUG(X,2)),"^",6) I DIV S DIU=$P($G(^PS(52.7,DA,0)),"^",12) I DIV'=DIU S $P(^(0),"^",12)=DIV I $O(^DD(52.7,16,1,0)) S (D0,DIV(0))=DA,DIH=52.7,DIG=16 D ^DICR
    2)= S DIU=$P($G(^PS(52.7,DA,0)),"^",12) I DIU]"" S $P(^(0),"^",12)="" I $O(^DD(52.7,16,1,0)) K DIV S (DIV,X)="",(D0,DIV(0))=DA,DIH=52.7,DIG=16 D ^DICR
    3)= Needed to update the PRIMARY DRUG field.
    CREATE VALUE)= GENERIC DRUG:#64
    DELETE VALUE)= @
    FIELD)= PRIMARY DRUG
    Used to update the PRIMARY DRUG field (16) when the solution's GENERIC DRUG field (1) is changed. The primary drug field will only be updated if the generic drug entered has been matched to a primary drug in the PRIMARY
    DRUG file (50.3).
  • CROSS-REFERENCE:  52.7^AD^MUMPS
    1)= D S527^PSSPOID1
    2)= D K527^PSSPOID1
    This cross reference is used to update the Pharmacy Orderable Item field (#9) of the IV SOLUTIONS file (#52.7). This cross reference is also used to keep the Pharmacy Orderable Item entries in the PHARMACY ORDERABLE ITEM
    file (#50.7) up to date with current information, based on all active Drugs, IV Additives, and IV Solutions that are matched to the Pharmacy Orderable Item. This information includes Inactivation Date status, Non-Formulary
    status, Supply status, and Usage status. This information is also sent to CPRS (Computerized Patient Record System) by using the "PS MFSEND OR" protocol to update the corresponding Orderable Item entry in the ORDERABLE
    ITEMS file (#101.43). The cross references that are set and killed are: ^PSDRUG("A527",Dispense Drug IEN,IV Solution IEN)="", ^PS(52.7,"AOI",Pharmacy Orderable Item IEN,IV Solution IEN)="".
2 VOLUME 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  D IVSOLVOL^PSSDDUT2
  • LAST EDITED:  JUL 01, 2015
  • HELP-PROMPT:  Enter a number from 0.01-9999.
  • DESCRIPTION:  
    The number entered here will represent the volume of this solution. When entering an IV order, this volume will be stuffed into the volume field for that IV ORDER.
  • GROUP:  PSJI
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
4 ELECTROLYTES 2;0 POINTER Multiple #52.702 52.702

  • LAST EDITED:  JAN 17, 1992
  • DESCRIPTION:  
    This contains information on the electrolytes that make up this solution.
  • GROUP:  PSJI
5 SYNONYM 3;0 Multiple #52.703 52.703

  • DESCRIPTION:  
    These are other names by which a solution may be identified.
  • GROUP:  PSJI
6 DRUG INFORMATION 4;0 WORD-PROCESSING #52.704

  • DESCRIPTION:  Any data entered here will be shown under the 'DRUG INQUIRY' option of the IV PACKAGE. This field can be used as a means of communication to other pharmacists or nurses on the wards to inform them about critical IV
    DRUGS.
  • GROUP:  PSJI
7 AVERAGE DRUG COST 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."10N.N) X
  • LAST EDITED:  SEP 26, 1989
  • HELP-PROMPT:  Type a Number between 0 and 9999999, 9 Decimal Digits.
  • DESCRIPTION:  
    This is the average drug cost per ml for this IV solution.
  • GROUP:  PSJI
8 INACTIVATION DATE I;1 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 02, 2015
  • HELP-PROMPT:  Enter the date this drug was inactivated.
  • DESCRIPTION:  This field is used to inactivate a drug. An IV drug should NEVER be deleted from a file since some IV ORDERS may still be using it. Enter the date the drug should be inactivated. Once the date of inactivation arrives,
    the drug will no longer be a valid choice for IV SOLUTIONS.
  • GROUP:  PSJI
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52.7^AE^MUMPS
    1)= I '$D(DIU(0)) N PSSTEST S PSSTEST=$P($G(^PS(52.7,DA,0)),"^",11) Q:'PSSTEST S PSSCROSS=1 D EN1^PSSPOIDT K PSSCROSS Q
    2)= I '$D(DIU(0)) N PSSTEST S PSSTEST=$P($G(^PS(52.7,DA,0)),"^",11) Q:'PSSTEST S PSSCROSS=1 D EN1^PSSPOIDT K PSSCROSS Q
    3)= Do Not Delete
    This cross reference is used to keep the Pharmacy Orderable Item entry in the PHARMACY ORDERABLE ITEM file (#50.7) up to date with current information, based on all active Drugs, IV Additives, and IV Solutions that are
    matched to the Pharmacy Orderable Item. This information includes Inactivation Date status, Non-Formulary status, Supply status, and Usage status. This information is also sent to CPRS (Computerized Patient Record System)
    by using the "PS MFSEND OR" protocol to update the corresponding Orderable Item entry in the ORDERABLE ITEMS file (#101.43).
9 PHARMACY ORDERABLE ITEM 0;11 POINTER TO PHARMACY ORDERABLE ITEM FILE (#50.7) PHARMACY ORDERABLE ITEM(#50.7)

  • LAST EDITED:  OCT 17, 2000
  • DESCRIPTION:  This field is a pointer to the PHARMACY ORDERABLE ITEM (#50.7) File. This field is not editable. It is controlled by the software. Every IV Solution has a Generic Drug pointer to the DRUG (#50) File, and every Drug entry
    has a pointer to the PHARMACY ORDERABLE ITEM (#50.7) File. The software will automatically keep this field updated with the Pharmacy Orderable Item that the Generic Drug points to.
  • TECHNICAL DESCR:  
    This field is a pointer the Pharmacy Orderable Item (#50.7) File.
  • SCREEN:  S DIC("S")="I $P(^PS(52.7,DA,0),U,4)="""""
  • EXPLANATION:  Only solutions with no data in the PRINT NAME {2} field may be selected.
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52.7^AOI
    1)= S ^PS(52.7,"AOI",$E(X,1,30),DA)=""
    2)= K ^PS(52.7,"AOI",$E(X,1,30),DA)
    Cross-reference on PHARMACY ORDERABLE ITEM, field #50.7.
16 *PRIMARY DRUG 0;12 POINTER TO PRIMARY DRUG FILE (#50.3)
************************REQUIRED FIELD************************
PRIMARY DRUG(#50.3)

  • LAST EDITED:  JAN 25, 1996
  • DESCRIPTION:  
    Links the solution in the IV SOLUTIONS file (52.7) to a primary drug in the PRIMARY DRUG file (50.3).
  • TECHNICAL DESCR:  
    When the GENERIC DRUG field is edited, the primary drug linked to the generic drug entered for the solution is triggered into this field.
  • NOTES:  TRIGGERED by the *PRIMARY DRUG field of the DRUG File
    TRIGGERED by the GENERIC DRUG field of the IV SOLUTIONS File
  • CROSS-REFERENCE:  52.7^APD
    1)= S ^PS(52.7,"APD",$E(X,1,30),DA)=""
    2)= K ^PS(52.7,"APD",$E(X,1,30),DA)
    Used to check if a solution is linked to an order's primary drug if the order is a "non-fluid" type.
17 USED IN IV FLUID ORDER ENTRY 0;13 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • INPUT TRANSFORM:  D UIVFOE^PSSDDUT2
  • LAST EDITED:  SEP 29, 2015
  • HELP-PROMPT:  Answer YES to indicate this IV Solution will be available to be ordered via the CPRS IV Fluid Order Entry or NO if it will not be available for selection.
  • DESCRIPTION:  
    Allows Pharmacy to limit the solutions available in IV Fluid order entry. Solutions having data in the PRINT NAME {2} field are assumed to be multi-ingredient drugs, and are not selectable.
  • TECHNICAL DESCR:  
    Limits solutions used in clinician IV Fluid order entry to single ingredient drugs only. Solutions with data in the PRINT NAME {2} field (.02) are now allowed to be marked.
  • SCREEN:  S DIC("S")="I $P(^PS(52.7,DA,0),U,4)="""""
  • EXPLANATION:  Only solutions with no data in the PRINT NAME {2} field may be selected.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  52.7^AF^MUMPS
    1)= I '$D(DIU(0)) N PSSTEST S PSSTEST=$P($G(^PS(52.7,DA,0)),"^",11) Q:'PSSTEST S PSSCROSS=1 D EN1^PSSPOIDT K PSSCROSS Q
    2)= I '$D(DIU(0)) N PSSTEST S PSSTEST=$P($G(^PS(52.7,DA,0)),"^",11) Q:'PSSTEST S PSSCROSS=1 D EN1^PSSPOIDT K PSSCROSS Q
    This cross reference is used to keep the Pharmacy Orderable Item entry in the PHARMACY ORDERABLE ITEM file (#50.7) up to date with current information, based on all active Drugs, IV Additives, and IV Solutions that are
    matched to the Pharmacy Orderable Item. This information includes Inactivation Date status, Non-Formulary status, Supply status, and Usage status. This information is also sent to CPRS (Computerized Patient Record System)
    by using the "PS MFSEND OR" protocol to update the corresponding Orderable Item entry in the ORDERABLE ITEMS file (#101.43).
18 PREMIX 0;14 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  NOV 29, 2007
  • HELP-PROMPT:  Enter 1 if this Solution is a PreMix IV, enter 0 if this Solution is not a PreMix IV.
  • DESCRIPTION:  
    This field is used to identify an IV Solution as a PreMix IV. This indication will be used to identify which entries will have order checks performed against them.

ICR, Total: 8

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #437
  • Pharmacy Benefits Management
  • Barcode Medication Administration
  • PRINT NAME (.01).
    Access: Pointed to

    GENERIC DRUG (1).
    Access: Read w/Fileman

    AVERAGE DRUG COST (7).
    Access: Read w/Fileman

    INACTIVATION DATE (8).
    Access: Read w/Fileman

    VOLUME (2).
    Access: Read w/Fileman

    PHARMACY ORDERABLE ITEM (9).
    Access: Read w/Fileman

    AOI (X-REF).
    Access: Read w/Fileman

    ICR #474
  • Pharmacy Benefits Management
  • GENERIC DRUG (1).
    Access: Read w/Fileman

    ICR #537
  • Health Summary
  • ICR #770
  • Drug Accountability
  • ICR #1881
  • DSS Extracts
  • GENERIC DRUG (1).
    Access: Direct Global Read & w/Fileman

    ICR #2173
  • Inpatient Medications
  • National Drug File
  • ICR #3013
  • Controlled Substances
  • ICR #6794
  • Outpatient Pharmacy
  • External References

    Name Field # of Occurrence
    ^%DT 8+1
    EN^DDIOL .01DEL.01+1
    ^DIC 1+1
    ^DICR 1(XREF 3S), 1(XREF 3K)
    IVSOLVOL^PSSDDUT2 2+1
    END^PSSGIU 1(XREF 2K)
    ENS^PSSGIU 1(XREF 2S)
    K527^PSSPOID1 1(XREF 4K)
    S527^PSSPOID1 1(XREF 4S)
    EN1^PSSPOIDT 8(XREF 1S), 8(XREF 1K), 17(XREF 1S), 17(XREF 1K)

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD(52.7 1(XREF 3S), 1(XREF 3K)
    ^PS(52.6 - [#52.6] 1(XREF 2K)
    ^PS(52.7 - [#52.7] IDWRITE+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K), 8(XREF 1S), 8(XREF 1K)
    9(XREF 1S), 9(XREF 1K), 16(XREF 1S), 16(XREF 1K), 17(XREF 1S), 17(XREF 1K)
    ^PSDRUG - [#50] IDWRITE+1, 1(XREF 2S), 1(XREF 2K), 1(XREF 3S)

    Naked Globals

    Name Field # of Occurrence
    ^( 1(XREF 2K)
    ^("I" ID8+1
    ^(0 ID.02+1, ID2+1, IDWRITE+1, 1(XREF 3S), 1(XREF 3K)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 8+1*
    >> D0 1(XREF 3S), 1(XREF 3K)
    >> DA .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K), 8(XREF 1S), 8(XREF 1K), 9(XREF 1S)
    9(XREF 1K), 16(XREF 1S), 16(XREF 1K), 17(XREF 1S), 17(XREF 1K)
    DIC 1+1!*
    DIC("S" 1+1*, 1SCR+1*, 9SCR+1*, 17SCR+1*
    >> DIE 1+1
    >> DIG 1(XREF 3S), 1(XREF 3K)
    >> DIH 1(XREF 3S), 1(XREF 3K)
    >> DIU 1(XREF 3S), 1(XREF 3K)
    >> DIU(0 8(XREF 1S), 8(XREF 1K), 17(XREF 1S), 17(XREF 1K)
    DIV 1(XREF 3S), 1(XREF 3K)
    DIV(0 1(XREF 3S), 1(XREF 3K)
    >> DRUGEDIT 1+1, 1SCR+1
    PSIUDA 1(XREF 2S), 1(XREF 2K)
    PSIUX 1(XREF 2S), 1(XREF 2K)
    PSSCROSS 8(XREF 1S), 8(XREF 1K), 17(XREF 1S), 17(XREF 1K)
    PSSTEST 8(XREF 1S), 8(XREF 1K), 17(XREF 1S), 17(XREF 1K)
    U ID.02+1, ID2+1, ID8+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, 1+1*!, 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S)
    1(XREF 3K), 7+1!, 8+1*!, 9(XREF 1S), 9(XREF 1K), 16(XREF 1S), 16(XREF 1K)
    >> XX 1(XREF 2K)
    >> Y IDWRITE+1, 1+1, 8+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