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: 216.83

Package: Nursing Service

NURS CARE PLAN(#216.8)-->216.83

Sub-Field: 216.83


Information

Parent File Name Number Package
NURS CARE PLAN(#216.8) TARGET DATE 216.83 Nursing Service

Details

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

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 05, 1996
  • DESCRIPTION:  
    The date/time this target date info. was added to the system
    UNEDITABLE
  • CROSS-REFERENCE:  216.83^B
    1)= S ^NURSC(216.8,DA(1),"TARG","B",$E(X,1,30),DA)=""
    2)= K ^NURSC(216.8,DA(1),"TARG","B",$E(X,1,30),DA)
    This is the main cross-reference on the Target date field.
  • CROSS-REFERENCE:  216.83^AA1^MUMPS
    1)= S NURS=$S($D(^NURSC(216.8,DA(1),"TARG",DA,0)):^(0),1:""),NURS(3)=$P(NURS,U,3) S:NURS(3)'="" ^NURSC(216.8,DA(1),"TARG","AA",NURS(3),9999999-X,DA)="" K NURS
    2)= S NURS=$S($D(^NURSC(216.8,DA(1),"TARG",DA,0)):^(0),1:""),NURS(3)=$P(NURS,U,3) K:NURS(3)'="" ^NURSC(216.8,DA(1),"TARG","AA",NURS(3),9999999-X,DA) K NURS
    This is an inverted time/date mumps cross-reference on the Target Date field.
  • CROSS-REFERENCE:  ^^TRIGGER^216.83^1
    1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^NURSC(216.8,D0,"TARG",D1,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y X ^DD(216.83,.01,1,3,1.1) X ^DD(216.83,.01,1,3,1.4)
    1.1)= S X=DIV S X=$P($G(^NURSC(216.8,DA(1),"TARG",DA,0)),"^",4),X=$S(X]"":X,1:DUZ)
    1.4)= S DIH=$S($D(^NURSC(216.8,DIV(0),"TARG",DIV(1),0)):^(0),1:""),DIV=X S $P(^(0),U,4)=DIV,DIH=216.83,DIG=1 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    2.4)= S DIH=$S($D(^NURSC(216.8,DIV(0),"TARG",DIV(1),0)):^(0),1:""),DIV=X S $P(^(0),U,4)=DIV,DIH=216.83,DIG=1 D ^DICR:$N(^DD(DIH,DIG,1,0))>0
    CREATE VALUE)= S X=$P($G(^NURSC(216.8,DA(1),"TARG",DA,0)),"^",4),X=$S(X]"":X,1:DUZ)
    DELETE VALUE)= NO EFFECT
    FIELD)= USER WHO ENTERED
    This cross-reference triggers an entry into the User Who Entered field of the Target Date sub-file in the NURS Care Plan (#216.8) file when the Target Date field is edited.
.03 GOAL/EXPECTED OUTCOME 0;3 POINTER TO AGGREGATE TERM FILE (#124.2)
************************REQUIRED FIELD************************
AGGREGATE TERM(#124.2)

  • INPUT TRANSFORM:  S DIC("S")="D EN3^NURCCPU4" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUL 12, 1990
  • DESCRIPTION:  
    The particular goal/expected outcome associated with this target date.
  • SCREEN:  S DIC("S")="D EN3^NURCCPU4"
  • EXPLANATION:  Data can only be a goal/expected outcome for this particular problem for this nursing care plan or patient plan of care entry.
  • CROSS-REFERENCE:  216.83^AA2^MUMPS
    1)= S NURS=$S($D(^NURSC(216.8,DA(1),"TARG",DA,0)):^(0),1:""),NURS(1)=$P(NURS,U) S:NURS(1)'="" ^NURSC(216.8,DA(1),"TARG","AA",X,9999999-NURS(1),DA)="" K NURS
    2)= S NURS=$S($D(^NURSC(216.8,DA(1),"TARG",DA,0)):^(0),1:""),NURS(1)=$P(NURS,U) K:NURS(1)'="" ^NURSC(216.8,DA(1),"TARG","AA",X,9999999-NURS(1),DA) K NURS
    This is an inverted time/date cross-reference on the goal/expected outcome field.
1 USER WHO ENTERED 0;4 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  JAN 13, 1992
  • DESCRIPTION:  
    The user who entered this target date.
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the DATE/TIME ENTERED field of the TARGET DATE sub-field of the NURS CARE PLAN File
2 GOAL MET/DC'D 0;2 SET
  • '0' FOR CURRENT;
  • '1' FOR MET;
  • '2' FOR DISCONTINUED;

  • LAST EDITED:  OCT 28, 1989
  • DESCRIPTION:  
    This field tracks whether the outcome is still current, has been met, or has been discontinued for this particular patient plan of care.
3 TARGET DATE 0;5 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ET" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 25, 1989
  • DESCRIPTION:  
    The target date that was entered for this patient's goal.
Info |  Details