
| Name | Value |
|---|---|
| NAME | PTF TYPE OF DISPOSITION |
| PARENT FILE | PTF |
| DICTIONARY NUMBER |
|
| DIR(0) | SO^1:REGULAR;2:NBC/WHILE ASIH;3:EXPIRATION 6 MONTH LIMIT;4:IRREGULAR;5:TRANSFER;6:DEATH WITH AUTOPSY;7:DEATH WITHOUT AUTOPSY; |
| DIR(?) | Enter the type of disposition for this patient for this episode of care. |
| DIR(?,#) | Choose from: 1 REGULAR 2 NBC/WHILE ASIH 3 EXPIRATION 6 MONTH LIMIT 4 IRREGULAR 5 TRANSFER 6 DEATH WITH AUTOPSY 7 DEATH WITHOUT AUTOPSY |
| DIR OUTPUT TRANSFORM | S:$D(Y(0))#2 Y=$P(Y(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) |