NAME |
TYPE OF BENEFIT APPLIED FOR |
PARENT FILE |
PATIENT |
DICTIONARY NUMBER |
-
- 2
- FIELD NUMBER: 1000
- DD LEVEL: 1
-
- 2.101
- FIELD NUMBER: 2
- DD LEVEL: 2
|
DIR(0) |
SOB^1:HOSPITAL;2:DOMICILIARY;3:OUTPATIENT MEDICAL;4:OUTPATIENT DENTAL;5:NURSING HOME CARE; |
DIR(?) |
Enter the type of benefit this patient applied for. |
DIR(?,#) |
Choose from:
1 HOSPITAL
2 DOMICILIARY
3 OUTPATIENT MEDICAL
4 OUTPATIENT DENTAL
5 NURSING HOME CARE
|
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)) |