©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
A4A7B ;CFB/SF/TUSC; NEW PERSON FILE 3/6/16/20 LOCATOR ;05/28/97 14:40
Source file <A4A7B.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NAIL | ||
| HORSE | ||
| DATADIC | ;start looping though the data dictionary
|
|
| DIE | ;
|
|
| NEEDLE | ||
| STOP | ||
| Q | ||
| TASK | ||
| FILE | ||
| ROU | ||
| RESTART |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | DATADIC+2, DATADIC+4, DATADIC+6, DATADIC+8, FILE, FILE+1 |
| ^DIC - [#1] | DATADIC+8 |
| ^UTILITY("A4A7B" | A4A7B+2, DATADIC+1, DATADIC+2*, DATADIC+15, DATADIC+16*, DIE+1, DIE+6*, DIE+7, DIE+8*, DIE+10* , ROU+3, ROU+4, Q*, NEEDLE*, STOP*, RESTART*, TASK |
| ^UTILITY("A4A7B0" | DIE+10!, ROU+4! |
| Name | Line Occurrences |
|---|---|
| @( | RESTART |
| DIE | DIE+8 |
| FILE | DATADIC+4 |
| HORSE | DATADIC+8, DATADIC+9, DATADIC+10, DATADIC+12, DATADIC+14, DIE+5, FILE, FILE+1 |
| NAIL | DATADIC+12, DATADIC+14 |
| NEEDLE | HORSE+1, HORSE+2 |
| Q | A4A7B+2, DATADIC+2 |
| Name | Field # of Occurrence |
|---|---|
| ^("CKPT" | ROU+4* |
| ^("SECTION" | DATADIC+1, ROU+3 |
| ^(0 | DATADIC+14 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A4A7B | DATADIC+6*, DATADIC+14*, Q! |
| A4A7B("A" | DATADIC+2*, DATADIC+3, DATADIC+4, DATADIC+6, DATADIC+8, DIE+2*, FILE, FILE+1, NEEDLE |
| A4A7B("B" | DATADIC+4*, DATADIC+5, DATADIC+6, DATADIC+8, DIE+4*, FILE*, FILE+1*, NEEDLE |
| A4A7B("C" | DATADIC+8*, DATADIC+11*, DATADIC+13, FILE*, FILE+1*, NAIL |
| A4A7B("D" | DATADIC+11*, DATADIC+12, DATADIC+13* |
| A4A7B("DIE" | DIE+1*, DIE+2, DIE+3, DIE+4, DIE+5, DIE+6, DIE+9! |
| A4A7B("E" | DATADIC+13* |
| A4A7B("FIND" | ROU+1*, ROU+4 |
| A4A7B("FIRST" | ROU+3* |
| A4A7B("HAY" | DATADIC+8*, DATADIC+9*, DATADIC+10*, DATADIC+12*, DATADIC+14*, DIE+5*, FILE*, FILE+1*, HORSE+1, HORSE+2 , HORSE+3!, NEEDLE |
| A4A7B("HORSE" | HORSE*, HORSE+1, HORSE+2, HORSE+3!, NEEDLE |
| A4A7B("IND" | DATADIC+11, DATADIC+12, DATADIC+13, DATADIC+14 |
| A4A7B("LAST" | ROU+3* |
| A4A7B("LINE" | ROU+2*, ROU+4 |
| A4A7B("NAIL" | DATADIC+8*, DATADIC+9*, DATADIC+10*, DATADIC+14*, DIE+3*, FILE*, FILE+1*, HORSE+3!, NEEDLE, NAIL* |
| A4A7B("NEEDLE" | HORSE+2*, HORSE+3! |
| A4A7B("NODE" | NAIL |
| A4A7B("START" | DATADIC+1*, DATADIC+2 |
| A4A7B("STOP" | DATADIC+1*, DATADIC+2 |
| A4A7B("STRING" | ROU*, ROU+3 |
| A4A7B("TEST" | DIE+1*, DIE+2, DIE+3, DIE+8, DIE+9! |
| A4A7B(0 | DATADIC+6!*, DATADIC+7, DATADIC+8, DATADIC+9, DATADIC+10 |
| >> ANS | A4A7B+2 |
| >> X | DIE+8* |
| >> Z | ROU+3* |
| >> ZTDESC | TASK* |
| >> ZTIO | TASK* |
| >> ZTPRI | TASK* |
| >> ZTRTN | TASK* |
| >> ZTSAVE("*" | TASK* |
| >> ZTSK | TASK |