Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR  | 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

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)[12]    

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.
    Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR  | All