©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
IBPU ;ALB/CPM - ARCHIVE/PURGING UTILITIES ; 20-APR-92
Source file <IBPU.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 2 | $$LAST^IBPFU $$LOGIEN^IBPU1 |
| VA Fileman | 2 | ^%DT ^DIR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NUM() | ; How many previous fiscal year's worth of data should be retained?
|
|
| ASK(FILE,JOB) | ; User prompts to find/archive/purge entries for each data file.
|
|
| LOGQ | ||
| LOG(FILE) | ; Determine Log status for a file.
|
|
| RESTART(NAME,FILE,JOB) | ; Re-start find/archive action?
|
|
| START(NAME,JOB) | ; Start find/archive/purge action?
|
|
| DAT() | ; What is the date through which data should be archived?
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC - [#1] | ASK+12, LOG+7 |
| ^IBE(350.6 - [#350.6] | LOG+9 |
| Name | Line Occurrences |
|---|---|
| $$LOG | ASK+11 |
| $$RESTART | ASK+15 |
| $$START | ASK+15 |
| LOGQ | LOG+7 |
| Name | Field # of Occurrence |
|---|---|
| ^(1 | LOG+9 |
| ^(2 | LOG+9 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | DAT+2~, DAT+3* |
| %DT("A" | DAT+3* |
| %DT(0 | DAT+3* |
| >> DA | LOG+8*, LOG+9 |
| DESC | START+4~, START+5*, START+6, START+7 |
| DIR | START+4~, RESTART+5~, NUM+2~ |
| DIR("?" | START+7*, START+8*, START+9*, RESTART+8*, RESTART+9*, RESTART+10*, NUM+4*, NUM+5* |
| DIR("A" | START+6*, RESTART+7*, NUM+3* |
| DIR("B" | NUM+6* |
| DIR(0 | START+6*, RESTART+7*, NUM+6* |
| DIRUT | START+4~, START+10, RESTART+5~, RESTART+11, NUM+2~, NUM+7 |
| DTOUT | START+4~, START+10, RESTART+5~, RESTART+11, NUM+2~, NUM+7, DAT+2~ |
| DUOUT | START+4~, START+10, RESTART+5~, RESTART+11, NUM+2~, NUM+7 |
| FILE | ASK~, ASK+11, ASK+12, ASK+15, RESTART~, RESTART+11, LOG~, LOG+7, LOG+8 |
| FNAME | ASK+10~, ASK+12*, ASK+13, ASK+15 |
| JOB | ASK~, ASK+13, ASK+14, ASK+15, START~, START+5, START+8, RESTART~, RESTART+6, RESTART+7 , RESTART+8, RESTART+9 |
| LOG | LOG+6~, LOG+9*, LOG+10 |
| LOG1 | LOG+6~, LOG+9*, LOGQ |
| LOG2 | LOG+6~, LOG+9*, LOGQ |
| NAME | START~, START+6, START+7, START+8, RESTART~, RESTART+6 |
| STATUS | ASK+10~, ASK+11*, ASK+13, ASK+14*, ASK+15 |
| X | DAT+2~ |
| Y | ASK+10~, START+4~, START+10, RESTART+5~, RESTART+11, LOG+6~, LOG+7*, LOG+10*, LOGQ, NUM+2~ , NUM+7, DAT+2~, DAT+5 |