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

Package: Adverse Reaction Tracking

ADVERSE REACTION REPORTING(#120.85)-->120.85315

Sub-Field: 120.85315


Information

Parent File Name Number Package
ADVERSE REACTION REPORTING(#120.85) P&T ADDENDUM 120.85315 Adverse Reaction Tracking

Details

Field # Name Loc Type Details
.01 DATE/TIME ENTERED 0;1 DATE

  • INPUT TRANSFORM:  S %DT="EPSTX",%DT(0)="-NOW" D ^%DT K %DT(0) S X=Y K:Y<1 X
  • LAST EDITED:  JUN 29, 1992
  • DESCRIPTION:  
    This is the date/time the comment was entered.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  120.85315^B
    1)= S ^GMR(120.85,DA(1),"PTC2","B",$E(X,1,30),DA)=""
    2)= K ^GMR(120.85,DA(1),"PTC2","B",$E(X,1,30),DA)
  • FIELD INDEX:  AHDR (#295) MUMPS R ACTION
    Short Descr:  Send data to HDR on entry/edit
    Description:  Send data to HDR when the P&T addendum is added.
    Set Logic:  Q:$D(DIU(0))  D SETOB^GMRAHDR
    Kill Logic:  Q:$D(DIU(0))  D KILLOB^GMRAHDR
    Whole Kill:  Q
    X(1):  DATE/TIME ENTERED  (120.85315,.01)  (forwards)
1 ADDENDUM 1;0 WORD-PROCESSING #120.853151

  • DESCRIPTION:  
    This is the actual comment that is being added.
Info |  Details |  All