©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
INHUTSRD(DIR,DIRH,DIRT,DICHCS) ; ESS,JSH; 11 Apr 94 13:58; scrolling reader routine without key control - non SAIC-CARE version
Source file <INHUTSRD.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| A | ;
|
|
| Q1 | ||
| CR0 | ||
| Q2 | ||
| R1 | ||
| CR() | ;
|
|
| MESS1(DIR) | ;
|
|
| I | ||
| H1 | ||
| YN(DIR,DIRH) | ||
| YNA | ||
| Q | ;
|
|
| TO | ||
| FLUSH | ||
| YN0 | ||
| YN1 | ||
| ER |
| Name | Line Occurrences |
|---|---|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: READ |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("EOFF" | I+1, H1, FLUSH |
| ^%ZOSF("EON" | Q+2, H1, FLUSH+1 |
| Name | Line Occurrences |
|---|---|
| @( | YN1+1 |
| ER | R1+1, R1+2, R1+3, R1+8, R1+9, R1+10, R1+12, YN1+4 |
| FLUSH | A+6 |
| I | R1+1, R1+2, R1+8, R1+9, R1+10, R1+12 |
| Q | R1+1, R1+2, R1+11, Q1, Q2, TO |
| Q1 | R1 |
| Q2 | R1 |
| TO | I+2 |
| YNA | YN1+1, YN1+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | INHUTSRD+6~ |
| D | YN~, YN0*, YN1+3 |
| DICHCS | INHUTSRD~ |
| DIR | INHUTSRD~, A+1, A+2, A+3, A+5, A+6, I, R1+1, R1+8, R1+9 , R1+10, Q+1, YN~, YN+1, YN0, MESS1~, MESS1+1, MESS1+2 |
| DIRA | INHUTSRD+7~, YN~ |
| DIRB | INHUTSRD+7~, YN~ |
| DIRBS | INHUTSRD+7~, YN~ |
| >> DIRCP | YN0* |
| DIRECHO | INHUTSRD+7~, A+3*, I+1, Q+2, YN~, H1 |
| DIRER | INHUTSRD+7~, I+1*, R1+1*, R1+2, R1+3*, R1+8*, R1+9*, R1+10*, R1+11*, R1+12 , YN~, YN1+1*, YN1+4* |
| DIRF | INHUTSRD+7~, A+3*, I, R1+1, YN~, YN0*, YNA, YN1+2 |
| DIRH | INHUTSRD~, R1+2, R1+3, R1+4, R1+5, YN~, YN1+1, H1, H1+1 |
| DIRH( | R1+6 |
| DIRHI | INHUTSRD+7~, R1+10*, YN~ |
| >> DIRI | YN+1* |
| DIRL1 | INHUTSRD+7~, A+5*, R1+11 |
| DIRL2 | INHUTSRD+7~, A+5*, I+2, R1+11 |
| >> DIRL3 | A+5*, R1+11 |
| DIRLO | INHUTSRD+7~, R1+10*, YN~ |
| >> DIRMAX | YN0* |
| DIRT | INHUTSRD~ |
| DIRTC | INHUTSRD+7~, YN~ |
| DIRWRAP | INHUTSRD+7~ |
| DTIME | INHUTSRD+8*, A+2~*, I+2, YNA, CR0, MESS1+3 |
| DTOUT | INHUTSRD+8!, TO* |
| DX | INHUTSRD+6~, YN~ |
| DY | INHUTSRD+6~, YN~ |
| I | MESS1+1~, MESS1+2* |
| K | INHUTSRD+6~ |
| L | MESS1+1~*, MESS1+2, MESS1+3* |
| P | YN~, YN+1*, YNA |
| Q | INHUTSRD+6~, A+1*, Q1, Q2, TO |
| U | R1+4, YN0, YN1+5, H1 |
| X | A+1~, I+2*, R1, R1+1*, R1+2, R1+8, R1+10, R1+11, YN~, YNA* , YN1, YN1+1, YN1+2*, YN1+3*, YN1+4, YN1+5, FLUSH~*, CR0* |
| Z | INHUTSRD+6~, R1+6* |
| Name | Field # of Occurrence |
|---|---|
| $T(ER+DIRER | ER |