| NAME |
TYPE OF CARE APPLIED FOR |
| PARENT FILE |
PATIENT |
| DICTIONARY NUMBER |
-
- 2
- FIELD NUMBER: 1000
- DD LEVEL: 1
-
- 2.101
- FIELD NUMBER: 2.1
- DD LEVEL: 2
|
| DIR(0) |
SOB^1:DENTAL;2:PLASTIC SURGERY;3:STERILIZATION;4:PREGNANCY;5:ALL OTHER; |
| DIR(?) |
Enter the type of care this patient is applying for. |
| DIR(?,#) |
Choose from:
1 DENTAL
2 PLASTIC SURGERY
3 STERILIZATION
4 PREGNANCY
5 ALL OTHER
|
| 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,"DIS",9999998.9999999-QAMEVENT)) |
