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)