PURPOSE OF VISIT (30)    DATA ELEMENT (743.4)

Name Value
NAME PURPOSE OF VISIT
PARENT FILE PATIENT
DICTIONARY NUMBER
  • 2
    FIELD NUMBER:   1900
    DD LEVEL:   1
  • 2.98
    FIELD NUMBER:   9
    DD LEVEL:   2
DIR(0) SOB^1:C&P;2:10-10;3:SCHEDULED VISIT;4:UNSCHED. VISIT;
DIR(?) Enter the purpose of this atient's visit.
DIR OUTPUT TRANSFORM S:$D(Y(0))#2 Y=$P(Y(0),"^")
CODE TO CREATE DATA POINTERS S QAMDTPT(1)=QAMDFN,QAMDTPT(2)=+$O(^DPT(QAMDFN,"S",QAMEVENT-.0000001))