PTF PROCEDURE 1 (65) DATA ELEMENT (743.4)

Name	Value
NAME	PTF PROCEDURE 1
PARENT FILE	PTF
DICTIONARY NUMBER	45 FIELD NUMBER: 45.01 DD LEVEL: 1
DIR(0)	PO^80.1:AEMNQZ
DIR(?)	Enter the first procedure for this patient's current episode of care.
DIR OUTPUT TRANSFORM	S:$D(Y(0,0))#2 Y=Y(0,0)
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)