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 |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^PS(56

Package: National Drug File

Global: ^PS(56


Information

FileMan FileNo FileMan Filename Package
56 DRUG INTERACTION National Drug File

Description

Directly Accessed By Routines, Total: 176

Package Total Routines
National Drug File 162 PSN105D    PSN125D    PSN142D    PSN144D    PSN153D    PSN158D    PSN161D    PSN172D
PSN188D    PSN204D    PSN207D    PSN235D    PSN238D    PSN247D    PSN256D    PSN281D
PSN290D    PSN293D    PSN301D    PSN310D    PSN325D    PSN337D    PSN356D    PSN359D
PSN370D    PSN373D    PSN388D    PSN398D    PSN415D    PSN424D    PSN432D    PSN459D
PSN466D    PSN497D    PSN4POST    PSN500D    PSN56    PSNDINT    PSNPCH4    PSNPPSNU
PSNVCR2    ^PS(56    PSN110P    PSN111D    PSN114D    PSN118D    PSN120P    PSN121D
PSN123D    PSN127D    PSN130D    PSN132D    PSN134P    PSN135D    PSN138D    PSN146D
PSN148D    PSN149D    PSN155D    PSN163D    PSN166D    PSN170D    PSN174D    PSN177D
PSN179D    PSN182D    PSN184D    PSN186D    PSN190D    PSN195D    PSN198D    PSN201D
PSN210D    PSN213D    PSN216D    PSN219D    PSN222D    PSN225D    PSN228D    PSN232D
PSN241D    PSN244D    PSN250D    PSN253D    PSN259D    PSN266D    PSN269D    PSN272D
PSN275D    PSN278D    PSN284D    PSN287D    PSN304D    PSN307D    PSN313D    PSN316D
PSN319D    PSN322D    PSN328D    PSN331D    PSN334D    PSN339D    PSN341D    PSN344D
PSN347D    PSN350D    PSN353D    PSN362D    PSN367D    PSN376D    PSN379D    PSN382D
PSN385D    PSN391D    PSN394D    PSN401D    PSN404D    PSN408D    PSN411D    PSN418D
PSN421D    PSN427D    PSN435D    PSN439D    PSN443D    PSN446D    PSN450D    PSN453D
PSN456D    PSN462D    PSN469D    PSN473D    PSN478D    PSN481D    PSN484D    PSN487D
PSN490D    PSN494D    PSN4PRE    PSN503D    PSN505D    PSN508D    PSN511D    PSN515D
PSN518D    PSN521D    PSN524D    PSN527D    PSN530D    PSN533D    PSN536D    PSN542D
PSN545D    PSN548D    PSNCLEAN    PSNCLING    PSNDDI1    PSNJP54    PSNPPSCL    PSNPPSI1
PSNPRE1    PSNXREF    
Outpatient Pharmacy 10 PSODDPR1    PSODGDGI    PSODRDU1    PSOHELP    PSOHELP3    PSOHLDS3    PSOHLSG3    PSOORDRG
PSOVER    PSOVER1    
Pharmacy Data Management 4 ^APSPQA(32.5    PSS1P43    PSSDINT    PSSHELP    

Accessed By FileMan Db Calls, Total: 15

Package Total Routines
National Drug File 10 PSN4P77    PSN56    PSNCLEAN    PSNCLING    PSNDINT    PSNPCH4    PSNPPSCL    PSNPPSI1
PSNPPSNK    PSNTER    
Pharmacy Data Management 4 PSS1P43    PSSDINT    PSSDRINT    PSSHELP    
Outpatient Pharmacy 1 PSOHELP    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Pharmacy Data Management 1 DRUG INGREDIENTS(#50.416)[1, 2]    

Fields, Total: 8

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

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>50!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  JUL 10, 1998
  • HELP-PROMPT:  Answer must be 3-50 characters in length.
  • DESCRIPTION:  
    This field is used to store the name of the drug interaction.
  • TECHNICAL DESCR:  
    Name of interaction.
  • AUDIT:  YES, ALWAYS
  • DELETE TEST:  .01,0)= I 1 D EN^DDIOL("DELETIONS ARE NOT ALLOWED")
  • LAYGO TEST:  .01,0)= N ZZZ S ZZZ=$D(PSSDF)!$D(PSNDF) D:'ZZZ EN^DDIOL("ADDITIONS MUST BE MADE THROUGH STANDARD PDM OPTIONS") I ZZZ
  • GROUP:  PSO
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  56^B
    1)= S ^PS(56,"B",$E(X,1,30),DA)=""
    2)= K ^PS(56,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  56^C^KWIC
    1)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "/"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2,^DD("KWIC")'[I S ^PS(56,"C",I,DA)=""
    2)= S %1=1 F %=1:1:$L(X)+1 S I=$E(X,%) I "/"[I S I=$E($E(X,%1,%-1),1,30),%1=%+1 I $L(I)>2 K ^PS(56,"C",I,DA)
    3)= This cross-reference should not be deleted
    This cross-reference is used as a key word lookup to allow lookup based on either of the two ingredients selected.
1 INGREDIENT 1 0;2 POINTER TO DRUG INGREDIENTS FILE (#50.416)
************************REQUIRED FIELD************************
DRUG INGREDIENTS(#50.416)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^PS(50.416,+Y,0),""^"",2),+Y'=$P(^PS(56,DA,0),""^"",3)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 10, 1998
  • HELP-PROMPT:  Enter name of primary ingredient.
  • DESCRIPTION:  
    This field is used to stored the first ingredient of adverse drug/drug reactions.
  • TECHNICAL DESCR:  
    Pointer to file #50.416.
  • SCREEN:  S DIC("S")="I '$P(^PS(50.416,+Y,0),""^"",2),+Y'=$P(^PS(56,DA,0),""^"",3)"
  • EXPLANATION:  Only primary ingredients are selected.
  • AUDIT:  YES, ALWAYS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  56^AI1
    1)= S ^PS(56,"AI1",$E(X,1,30),DA)=""
    2)= K ^PS(56,"AI1",$E(X,1,30),DA)
    3)= Do not delete !
    This xref will be used to track changes to the Drug Ingredient file (#50.416).
  • CROSS-REFERENCE:  56^APD^MUMPS
    1)= S DEL=0 D:$P(^PS(56,DA,0),"^",3) ^PSNDDI1 K DEL
    2)= S DEL=1 D:$P(^PS(56,DA,0),"^",3) ^PSNDDI1 K DEL
    3)= This XREF should not be deleted.
    This XREF is used to index file by drug adverse reactions. This XREF is executed if ingredient 2 is filled in. In the form of: ^PS(56,"APD",Drug Indentifier(Ingredient 1),Drug Identifier (Ingredient 2,DA)
  • CROSS-REFERENCE:  56^AE1^MUMPS
    1)= N ZZZ S ZZZ=$P(^PS(56,DA,0),"^",3) I ZZZ S ^PS(56,"AE",X,ZZZ,DA)="",^PS(56,"AE",ZZZ,X,DA)=""
    2)= N ZZZ S ZZZ=$P(^PS(56,DA,0),"^",3) I ZZZ K ^PS(56,"AE",X,ZZZ,DA),^PS(56,"AE",ZZZ,X,DA)
    Cross-reference checks for duplicate ingredient combinations. In the form of: ^PS(56,"AE",Ingredient 1,Ingredient 2,DA)
2 INGREDIENT 2 0;3 POINTER TO DRUG INGREDIENTS FILE (#50.416)
************************REQUIRED FIELD************************
DRUG INGREDIENTS(#50.416)

  • INPUT TRANSFORM:  S DIC("S")="I '$P(^PS(50.416,+Y,0),""^"",2),+Y'=$P(^PS(56,DA,0),""^"",2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 10, 1998
  • HELP-PROMPT:  Enter name of second ingredient for adverse drug reaction.
  • DESCRIPTION:  
    This field is used to store the name of the second ingredient for drug/drug adverse reaction. This ingredient cannot be the same as the first ingredient.
  • TECHNICAL DESCR:  
    Pointer to file #50.416.
  • SCREEN:  S DIC("S")="I '$P(^PS(50.416,+Y,0),""^"",2),+Y'=$P(^PS(56,DA,0),""^"",2)"
  • EXPLANATION:  Only primary ingredients are to be selected.
  • AUDIT:  YES, ALWAYS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  56^AI2
    1)= S ^PS(56,"AI2",$E(X,1,30),DA)=""
    2)= K ^PS(56,"AI2",$E(X,1,30),DA)
    3)= Do not delete !
    This xref is used to track changes to the Drug Ingredient file (#50.416).
  • CROSS-REFERENCE:  56^APE^MUMPS
    1)= S DEL=0 D:$P(^PS(56,DA,0),"^",2) ^PSNDDI1 K DEL
    2)= S DEL=1 D:$P(^PS(56,DA,0),"^",2) ^PSNDDI1 K DEL
    3)= This XREF should not be deleted.
    This XREF is used to index the file by the drug adverse reactions. This XREF is only executed if ingredient 1 field is filled in. In the form of: ^PS(56,"APD",Drug Identifier(Ingredient 2),Drug Identifier (Ingredient
    1,DA)
  • CROSS-REFERENCE:  56^AE2^MUMPS
    1)= N ZZZ S ZZZ=$P(^PS(56,DA,0),"^",2) I ZZZ S ^PS(56,"AE",X,ZZZ,DA)="",^PS(56,"AE",ZZZ,X,DA)=""
    2)= N ZZZ S ZZZ=$P(^PS(56,DA,0),"^",2) I ZZZ K ^PS(56,"AE",X,ZZZ,DA),^PS(56,"AE",ZZZ,X,DA)
    Cross-reference checks for duplicate ingredient combinations. In the form of: ^PS(56,"AE",Ingredient 2,Ingredient 1,DA)
3 SEVERITY 0;4 SET
************************REQUIRED FIELD************************
  • '1' FOR CRITICAL;
  • '2' FOR SIGNIFICANT;

  • LAST EDITED:  MAR 19, 1992
  • HELP-PROMPT:  Enter severity of drug/drug interaction/
  • DESCRIPTION:  
    This field is used to indicate the type of reaction from the interaction.
  • TECHNICAL DESCR:  
    Set of Codes.
  • AUDIT:  YES, ALWAYS
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
4 NATIONALLY ENTERED 0;5 SET
  • '1' FOR YES;

  • LAST EDITED:  MAR 19, 1992
  • DESCRIPTION:  
    This field is used to indicate if this data was sent out by the ISC.
  • TECHNICAL DESCR:  
    set of codes
  • AUDIT:  YES, ALWAYS
5 TOTAL INDEXES 0;6 NUMBER

  • INPUT TRANSFORM:  K X
  • LAST EDITED:  APR 23, 1992
  • HELP-PROMPT:  Data is not entered using File Manager.
  • DESCRIPTION:  
    This field is used to store the total number of interaction for an entry into the file. This data is not entered directly through FM.
  • TECHNICAL DESCR:  
    Data is stuffed.
  • AUDIT:  YES, ALWAYS
    SOURCE OF DATA: Data comes from index routine.
  • GROUP:  PSO
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
6 LOCALLY EDITED L;1 SET
  • '1' FOR YES;

  • LAST EDITED:  JUN 29, 1998
  • DESCRIPTION:  This field is set if the severity of this interaction has been edited locally. This will allow a site to change the severity of a nationally entered interaction from significant to critical and later change it back.
    Nationally entered critical interactions can not be edited.
    DELETE AUTHORITY: ^
    WRITE AUTHORITY: ^
7 INACTIVATION DATE 0;7 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 15, 1998
  • DESCRIPTION:  
    This is the date when this interaction became inactive.
  • AUDIT:  YES, ALWAYS

ICR, Total: 2

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #2133
  • Pharmacy Data Management
    		•  NAME (.01).
    Access: Direct Global R/W & w/Fileman

    INGREDIENT 1 (1).
    Access: Direct Global R/W & w/Fileman

    INGREDIENT 2 (2).
    Access: Direct Global R/W & w/Fileman

    SEVERITY (3).
    Access: Direct Global R/W & w/Fileman

    LOCALLY EDITED (6).
    Access: Direct Global R/W & w/Fileman
    ICR #2229
  • Outpatient Pharmacy
    		•  NAME (.01).
    Access: Direct Global Read & w/Fileman

    INGREDIENT 1 (1).
    Access: Direct Global Read & w/Fileman

    INGREDIENT 2 (2).
    Access: Direct Global Read & w/Fileman

    SEVERITY (3).
    Access: Direct Global Read & w/Fileman

    NATIONALLY ENTERED (4).
    Access: Both R/W w/Fileman

    TOTAL INDEXES (5).
    Access: Direct Global R/W & w/Fileman

    INACTIVATION DATE (7).
    Access: Direct Global Read & w/Fileman

    		 This file is used to store drug-drug interactions.This cross reference is used to index the file byadverse drug reactions.

    External References

    Name Field # of Occurrence
    ^%DT 7+1
    EN^DDIOL .01DEL.01+1, .01LAYGO.01+1
    ^DIC 1+1, 2+1
    Y^DIQ ID1+1, ID2+1
    ^PSNDDI1 1(XREF 2S), 1(XREF 2K), 2(XREF 2S), 2(XREF 2K)

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD("KWIC" .01(XREF 3S)
    ^DD(50.416 ID1+1, ID2+1
    ^PS(50.416 - [#50.416] ID1+1, ID2+1
    ^PS(56 - [#56] .01(XREF 1S), .01(XREF 1K), .01(XREF 3S), .01(XREF 3K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K)
    , 2(XREF 1S), 2(XREF 1K), 2(XREF 2S), 2(XREF 2K), 2(XREF 3S), 2(XREF 3K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 ID1+1, ID2+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % .01(XREF 3S), .01(XREF 3K)
    >> %1 .01(XREF 3S), .01(XREF 3K)
    >> %DT 7+1*
    %I ID1+1*!, ID2+1*!
    >> C ID1+1*, ID2+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 3S), .01(XREF 3K), 1(XREF 1S), 1(XREF 1K), 1(XREF 2S), 1(XREF 2K), 1(XREF 3S), 1(XREF 3K)
    , 2(XREF 1S), 2(XREF 1K), 2(XREF 2S), 2(XREF 2K), 2(XREF 3S), 2(XREF 3K)
    DEL 1(XREF 2S), 1(XREF 2K), 2(XREF 2S), 2(XREF 2K)
    DIC ID2+1, ID3+1, 1+1!*, 2+1!*
    DIC("S" 1+1*, 1SCR+1*, 2+1*, 2SCR+1*
    >> DIE 1+1, 2+1
    >> I .01(XREF 3S), .01(XREF 3K)
    >> PSNDF .01LAYGO.01+1
    >> PSSDF .01LAYGO.01+1
    U ID1+1, ID2+1
    X .01+1!, .01(XREF 1S), .01(XREF 1K), .01(XREF 3S), .01(XREF 3K), 1+1*!, 1(XREF 1S), 1(XREF 1K), 1(XREF 3S), 1(XREF 3K)
    , 2+1*!, 2(XREF 1S), 2(XREF 1K), 2(XREF 3S), 2(XREF 3K), 5+1!, 7+1*!
    >> Y ID1+1*, ID2+1*, 1+1, 2+1, 7+1
    ZZZ .01LAYGO.01+1~*, 1(XREF 3S), 1(XREF 3K), 2(XREF 3S), 2(XREF 3K)
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All