Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 120.802

Package: Adverse Reaction Tracking

PATIENT ALLERGIES(#120.8)-->120.802

Sub-Field: 120.802


Information

Parent File Name Number Package
PATIENT ALLERGIES(#120.8) DRUG INGREDIENTS 120.802 Adverse Reaction Tracking

Details

Field # Name Loc Type Details
.01 DRUG INGREDIENT 0;1 POINTER TO DRUG INGREDIENTS FILE (#50.416) DRUG INGREDIENTS(#50.416)

  • INPUT TRANSFORM:  S DIC("S")="N GMRA S GMRA=$P(^(0),U) X ""I $L(GMRA),$D(^PS(50.416,""""P"""",GMRA,Y))"" Q" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 25, 1991
  • DESCRIPTION:  
    Drug ingredient to which patient had reaction.
  • SCREEN:  S DIC("S")="N GMRA S GMRA=$P(^(0),U) X ""I $L(GMRA),$D(^PS(50.416,""""P"""",GMRA,Y))"" Q"
  • EXPLANATION:  Select primary drug ingredient.
  • CROSS-REFERENCE:  120.802^B
    1)= S ^GMR(120.8,DA(1),2,"B",$E(X,1,30),DA)=""
    2)= K ^GMR(120.8,DA(1),2,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  120.8^ADRG2^MUMPS
    1)= S GMRA="2^1" D EN2^GMRAUIX0
    2)= S GMRA="2^0" D EN2^GMRAUIX0
    For further information on this xref, see the Cross-reference section of the Adverse Reaction Tracking Technical Manual.
  • FIELD INDEX:  AHDR (#483) MUMPS R ACTION
    Short Descr: Send data to HDR upon entry or update
    Description: Sends data to HDR upon entry or edit of drug ingredients.
    Set Logic: Q:$D(DIU(0)) D SETADR^GMRAHDR
    Kill Logic: Q:$D(DIU(0)) D KILLADR^GMRAHDR
    Whole Kill: Q
    X(1): DRUG INGREDIENT (120.802,.01) (forwards)
Info |  Details