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

Package: Registration

PATIENT(#2)-->2.02

Sub-Field: 2.02


Information

Parent File Name Number Package
PATIENT(#2) RACE INFORMATION 2.02 Registration

Details

Field # Name Loc Type Details
.01 RACE INFORMATION 0;1 POINTER TO RACE FILE (#10) RACE(#10)

  • INPUT TRANSFORM:  S DIC("S")="I '$G(^(.02))" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X S:$D(X) DINUM=X
  • LAST EDITED:  JUL 09, 2002
  • HELP-PROMPT:  Select from the available listing all races which best identify this patient
  • DESCRIPTION:  
    Patient's race
  • SCREEN:  S DIC("S")="I '$G(^(.02))"
  • EXPLANATION:  Inactive values are not selectable
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  2.02^B
    1)= S ^DPT(DA(1),.02,"B",$E(X,1,30),DA)=""
    2)= K ^DPT(DA(1),.02,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^2.02^.02
    1)= X ^DD(2.02,.01,1,2,1.3) I X S X=DIV S Y(1)=$S($D(^DPT(D0,.02,D1,0)):^(0),1:"") S X=$P(Y(1),U,2),X=X S DIU=X K Y S X=DIV S X=+$O(^DIC(10.3,"C","S",0)) S:X=0 X="" X ^DD(2.02,.01,1,2,1.4)
    1.3)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(0)=X S Y(1)=$S($D(^DPT(D0,.02,D1,0)):^(0),1:"") S X=$S('$D(^DIC(10.3,+$P(Y(1),U,2),0)):"",1:$P(^(0),U,1))=""
    1.4)= S DIH=$G(^DPT(DIV(0),.02,DIV(1),0)),DIV=X S $P(^(0),U,2)=DIV,DIH=2.02,DIG=.02 D ^DICR
    2)= Q
    CREATE CONDITION)= METHOD OF COLLECTION=""
    CREATE VALUE)= S X=+$O(^DIC(10.3,"C","S",0)) S:X=0 X=""
    DELETE VALUE)= NO EFFECT
    FIELD)= METHOD
    SELF IDENTIFICATION is the default value for collection method
  • FIELD INDEX:  AVAFC20201 (#398) MUMPS I ACTION
    Short Descr:  This x-ref calls the DG FIELD MONITOR event point.
    Description:  This cross reference activates the DG FIELD MONITOR event point.  Applications that wish to monitor edit activity related to this field may subscribe to that event point and take action as indicated by the changes that
    occur.  Refer to the DG FIELD MONITOR protocol for a description of the information available at the time of the event.
    Set Logic:  D FC^DGFCPROT(.DA,2.02,.01,"SET",$H,$G(DUZ),.X,.X1,.X2,$G(XQY0)) Q
    Kill Logic:  D FC^DGFCPROT(.DA,2.02,.01,"KILL",$H,$G(DUZ),.X,.X1,.X2,$G(XQY0)) Q
    X(1):  RACE INFORMATION  (2.02,.01)  (forwards)
.02 METHOD OF COLLECTION 0;2 POINTER TO RACE AND ETHNICITY COLLECTION METHOD FILE (#10.3)
************************REQUIRED FIELD************************
RACE AND ETHNICITY COLLECTION METHOD(#10.3)

  • LAST EDITED:  AUG 14, 2002
  • HELP-PROMPT:  Enter the method in which the race value was collected
  • DESCRIPTION:  
    Method used to collect patient's race
  • NOTES:  TRIGGERED by the RACE INFORMATION field of the RACE INFORMATION sub-field of the PATIENT File
Info |  Details |  All