©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
AQAODEL ; IHS/ORDC/LJF - DELETE AN OCCURRENCE RECORD ;
Source file <AQAODEL.m>
| Package | Total | Call Graph |
|---|---|---|
| Quality Assurance | 4 | ^AQAOAUD ASK^AQAOLKP FIND^AQAOREV1 KILL^AQAOUTIL |
| VA Fileman | 2 | ^DIE ^DIR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ASK | ; >>> ask for occ id or patient name or indicator
|
|
| EXIT | ; >> eoj
|
|
| DELETE | ; >>> delete occurrence
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^AQAOC - [#9002167] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AQAGU(0 | DELETE+6 |
| ^AQAOC - [#9002167] | DELETE+4, DELETE+13 |
| Name | Line Occurrences |
|---|---|
| EXIT | ASK+1, DELETE+3, DELETE+4, DELETE+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> AQAOCID | DELETE+9 |
| AQAOIFN | ASK+1!, DELETE+4, DELETE+10, DELETE+12, DELETE+13 |
| >> AQAOUDIT("ACTION" | DELETE+10* |
| >> AQAOUDIT("COMMENT" | DELETE+11* |
| >> AQAOUDIT("DA" | DELETE+10* |
| >> DA | DELETE+12* |
| DIE | DELETE+12!* |
| DIR | DELETE+1! |
| DIR("A" | DELETE+2* |
| DIR("B" | DELETE+1* |
| DIR(0 | DELETE+1* |
| >> DIRUT | DELETE+3 |
| >> DR | DELETE+12* |
| >> Y | DELETE+3 |