TIUROR1 ;SLC/JER - New PATIENT Review screen ; 12/3/00
Source file <TIUROR1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ASKCTXT() | ; Ask user for new context
 | 
|
| SAVE | ; -- Set aside original list
 | 
|
| RESTORE | ; -- restore original All Signed list
 | 
|
| BREATHE(ONCE) | ; -- Collapse/Re-expand in reverse order to avoid collisions
 | 
|
| RELOAD(TIUEXP) | ; Reload ^TMP("TIUR",$J,"EXPAND") w IFNs to expand, gotten
 | 
|
| LOAD(TIUXCTXT,TIUXCTX2) | ; Load ^TMP("TIUR",$J,"EXPAND") w IFNs to expand,
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  |