©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DIRCR ;SFISC/GFT-DELETE THIS LINE AND SAVE AS '%RCR'*** ;12:18 PM 20 Apr 1993 [ 04/02/2003 8:23 AM ]
Source file <DIRCR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| R(%R) | ;
|
|
| XY(%X,%Y) | ;
|
|
| S(%Z) | ;
|
|
| G | ||
| IHS | ;
|
|
| O | ||
| INIT | ||
| CALL | ||
| STORLIST | ;
|
|
| OS | ;
|
|
| Q(%Z) | ;
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("OS" | OS+1* |
| ^UTILITY("%RCR" | CALL+1, G, INIT* |
| Name | Line Occurrences |
|---|---|
| $$Q | S+6, S+7 |
| $$R | %XY+2 |
| $$S | R+4 |
| %XY | O+2, G+2 |
| @( | STORLIST+5, CALL |
| CALL | O |
| G | G+1, G+2 |
| IHS | STORLIST+3 |
| INIT | IHS+2 |
| O | O+1, O+2 |
| Name | Field # of Occurrence |
|---|---|
| ^( | G+1 |
| ^($J | CALL+1*, G!, INIT+1*, INIT+2! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %A | %XY+1~, %XY+2*, %XY+3*, %XY+4, %XY+5 |
| %B | %XY+1~, %XY+4*, %XY+5 |
| %C | R+1~, R+4* |
| %D | STORLIST+4*, O*, O+1, O+2, CALL+1*, G*!, G+1, G+2, INIT+1* |
| %E | STORLIST+5*, O+1, CALL*, CALL+1*, G!, INIT+1* |
| %F | R+1~, R+4* |
| %G | R+1~, R+4* |
| %I | R+1~, R+4* |
| %Q | %XY+1~, %XY+2*, %XY+3*, %XY+4 |
| %R | R~, R+2, R+3 |
| %R1 | R+1~, R+2*, R+5 |
| %R2 | R+1~, R+2*, R+3*, R+4*, R+5 |
| %RCR | STORLIST+5!, CALL! |
| %RCR( | STORLIST+4, O |
| %X | STORLIST+5!, O+2*, CALL!, CALL+1*, G!, XY~, %XY+2 |
| %Y | STORLIST+5!, CALL!, G!, G+2*, XY~, %XY+5, INIT+1* |
| %Z | %XY+1~, %XY+4*, %XY+5*, S~, S+1, S+2, S+3, S+4, S+5, S+6 , S+7, S+8, Q~, Q+1* |
| %Z( | Q+1* |
| %Z("" | Q+1 |
| DITZS | OS+1, OS+2! |
| >> ZTREQ | OS+2* |