©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
XQ73 ;SEA/MJM - Rubber Band Jump ("^^") Processor ;05/08/98 10:10 [ 04/02/2003 8:29 AM ]
Source file <XQ73.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ACT | ;Execute headers & entry actions, store headers & exit actions
|
|
| R | ;Reset XUTL("XQ") stack pointer ^("T") to 1 (primary menu) 'GO HOME'
|
|
| FND | ;Pop to next Menu-type option, if in path remove options below it
|
|
| RBX | ;Execute stored exit actions to return from RB jump
|
|
| OUT | ;Exit here
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(19 - [#19] | XQ73+65, FND+9, ACT+1, ACT+3, ACT+4, ACT+5, R+3, R+4, RBX+1, RBX+6 |
| ^XUTL("XQ" | XQ73+23, XQ73+34, FND+2, FND+8, FND+15*, ACT+4*, ACT+5*, R+2, R+3, R+4 , R+5, RBX+2, RBX+4, RBX+5*, RBX+7! |
| ^XUTL("XQO" | XQ73+28, FND+14 |
| Name | Line Occurrences |
|---|---|
| ACT | FND+14 |
| OUT | XQ73+50 |
| RBX | XQ73+23, R+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | XQ73+28, XQ73+34, RBX+2, RBX+4, RBX+5 |
| ^("RBX" | XQ73+23, FND+15* |
| ^("T" | FND+15*, R+2, R+5*, RBX+5 |
| ^(1 | R+5 |
| ^(15 | ACT+4, R+3, RBX+1 |
| ^(20 | ACT+1 |
| ^(26 | FND+9, ACT+3, R+4, RBX+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | XQ73+34*, FND+8*, FND+9, OUT+2!, R+4*, RBX+5*, RBX+7! |
| U | XQ73+16, XQ73+23, XQ73+28, XQ73+34, XQ73+55, FND+2, FND+6, FND+15, OUT+1, ACT+1 , ACT+3, ACT+4, R+3, R+4, R+5, R+6, RBX+1, RBX+5, RBX+6 |
| X | OUT+2! |
| XQ | XQ73+50, OUT+2! |
| XQ( | OUT+1 |
| XQA | OUT+2! |
| XQAL | OUT+2! |
| XQCH | OUT+2! |
| XQDAD | FND+5~, FND+6* |
| >> XQDIC | XQ73+45*, FND+14, R+5*, RBX+5* |
| XQFLAG | XQ73+45*, OUT+2! |
| XQFLG | XQ73+23*!, RBX+5, RBX+8 |
| XQHD | OUT+2!, ACT+3*, ACT+5 |
| XQI | XQ73+34*, XQ73+55*, FND+1*, FND+2*, FND+5~, FND+7*, FND+8, FND+14*, OUT+2!, R+2* , R+3, R+4, R+7! |
| XQII | FND+2*, OUT+2! |
| XQJ | FND+2*, FND+14*, OUT+2!, ACT+1, ACT+3, ACT+4, RBX+2*, RBX+4*, RBX+5, RBX+7! |
| XQJMP | XQ73+10*, OUT+2! |
| XQJP | XQ73+55*, XQ73+60*, XQ73+65*, FND+1, FND+2, FND+11*, FND+13, FND+14, OUT+2! |
| XQJP1 | FND+1*, OUT+2! |
| XQJP2 | FND+5~, FND+6*, FND+11 |
| XQK | OUT+2! |
| XQL | OUT+2! |
| >> XQM3 | R+7* |
| XQMA | XQ73+16*, XQ73+28, OUT+2! |
| XQN | RBX+2*, RBX+7! |
| XQNMB | XQ73+16*, OUT+2!, ACT+4*, ACT+5* |
| XQNO | OUT+2! |
| XQNP | FND+1*, FND+2*, FND+4, FND+6, OUT+2! |
| >> XQPSM | XQ73+23*, XQ73+45, XQ73+60, XQ73+65, OUT+1*, RBX+5* |
| XQRB | XQ73+39, RBX+7! |
| XQSAV | XQ73+23*! |
| XQSM | XQ73+34*, OUT+2! |
| XQST | XQ73+34*, XQ73+45*, OUT+2! |
| XQSTK | XQ73+34*, XQ73+39, OUT+2! |
| XQSTP | FND+5~, FND+6*, FND+7 |
| >> XQSV | XQ73+16 |
| XQT | FND+2*, OUT+2!, R+6* |
| XQTT | XQ73+34*, XQ73+45, XQ73+55, FND+1, FND+7, FND+15, OUT+2! |
| XQUIT | FND+14, FND+15, OUT+5!, ACT+2 |
| XQUR | R+7! |
| >> XQY | XQ73+23*, XQ73+28, XQ73+39, FND+14, FND+15, OUT+1, R+3*, R+5*, RBX+1, RBX+5* , RBX+6 |
| >> XQY0 | XQ73+23*, XQ73+28*, XQ73+55, FND+15, R+3*, R+5*, R+6, RBX+1, RBX+5*, RBX+6 |
| XQY1 | FND+2*, FND+6, OUT+2! |
| XQYY | FND+14*, OUT+2!, ACT+1, ACT+3, ACT+4, ACT+5 |
| Y | OUT+2! |