PTF ADMISSION DATE (47)    DATA ELEMENT (743.4)

Name Value
NAME PTF ADMISSION DATE
PARENT FILE PTF
DICTIONARY NUMBER
  • 45
    FIELD NUMBER:   2
    DD LEVEL:   1
DIR(0) DO^::EST
DIR(?) Enter this patients PTF admission date.
DIR OUTPUT TRANSFORM X ^DD("DD")
CODE TO CREATE DATA POINTERS S QA=+$O(^DGPM("ATID1",QAMDFN,9999999-QAMEVENT)),QA=+$O(^DGPM("ATID1",QAMDFN,QA,0)),QAMDTPT(1)=+$P($G(^DGPM(QA,0)),"^",16)