Name | Value |
---|---|
NAME | TYPE OF CARE APPLIED FOR |
PARENT FILE | PATIENT |
DICTIONARY NUMBER |
|
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)) |