| LOCK TEMPLATE | 
XTMP(ORPTLK) | 
| PACKAGE | 
ORDER ENTRY/RESULTS REPORTING | 
| GLOBAL LOCK? | 
YES | 
| PARTIAL MATCH ALLOWED? | 
NO | 
| ARRAY SUBSCRIPTS | 
- 
- SUBSCRIPT ORDER NUMBER:    1
 
- SUBSCRIPT:    ORPTLK
 
- TYPE:    VARIABLE
 
- VARIABLE CHECK LOGIC:    S Y=0 I ORPTLK["ORPTLK-",$D(^DPT(+$P(ORPTLK,"-",2),0)) S Y=1
 
 
 
 | 
| COMPUTABLE FILE REFERENCES | 
- 
- FILE REFERENCE LOGIC:    D PAT^XULMU(+$P(ORPTLK,"-",2))
 
- DESCRIPTION:    
Returns the patient's name, sex, date of birth, and Social Security Number.
 
 
 
 
 | 
| USAGE | 
This lock is on a patient's chart in ORDER ENTRY/RESULTS REPORTING for CPRS.
It indicates that someone is editing an order for the patient.
 
 |