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