PSODELI ;IHS/DSD/JCM - DELETE ENTRIES IN APSP INTERVENTION FILE ;03/28/93 21:15
Source file <PSODELI.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 4 | ^DIC ^DIE EN1^DIP ^DIR |
| List Manager | 1 | FULL^VALM1 |
| Outpatient Pharmacy | 1 | ^PSOVWI |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| START | ;
|
|
| END | ||
| INTERV | ; Deletes entries from APSP INTERVENTION file
|
|
| DEL | ; Does actual lookup and deletion of entries
|
|
| DELX | ; Exit point from DEL
|
|
| EOJ | ; Clean up variables
|
|
| EDIT | ;Edit Pharmacy Intervention
|
|
| NEW | ;Enter Pharmacy Intervention
|
|
| OUT | ; Print Pharmacy Intervention
|
|
| VIEW | ;View Pharmacy Interventions
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^APSPQA(32.4 - [#9009032.4] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^APSPQA(32.4 - [#9009032.4] | DEL+6, DEL+8 |
| ^DD("DILOCKTM" | DEL+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> APSP("LOG DEL | FLG" , INTERV+2*, EOJ+1! |
| BY | OUT+1~, OUT+3* |
| DA | START+1!, DEL+1!, DEL+5*, DEL+7!, DELX+1!, EOJ+1!, EDIT+1~, EDIT+3!, EDIT+4*, NEW+3! , NEW+4* |
| DIADD | NEW+1~, NEW+3*! |
| DIC | START+1!, INTERV+3*, DEL+1!, DELX+1!, EOJ+1!, EDIT+1~, EDIT+3*!, EDIT+4, NEW+1~, NEW+3*! , NEW+4!, OUT+1~, OUT+3* |
| DIC("A" | EDIT+3* |
| DIC("S" | INTERV+3* |
| DIC(0 | INTERV+3*, EDIT+3*, NEW+3* |
| DIDEL | DEL+5*, EOJ+1! |
| DIE | START+1!, DEL+5*, DEL+7!, EOJ+1!, EDIT+1~, EDIT+3!, EDIT+4*, NEW+1~, NEW+3!, NEW+4* |
| DIK | EOJ+1! |
| DIR | DEL+4!, DELX+1! |
| DIR("A" | DEL+3* |
| DIR(0 | DEL+3* |
| DIRUT | DEL+4, DELX+1!, EOJ+1! |
| DLAYGO | EDIT+1~, NEW+1~, NEW+3* |
| DR | START+1!, DEL+1!, DEL+5*, DEL+7!, EOJ+1!, EDIT+1~, EDIT+4*, NEW+1~, NEW+3!, NEW+4* |
| DTOUT | EOJ+1! |
| DUOUT | EOJ+1! |
| FLDS | OUT+1~, OUT+3* |
| IOF | EDIT+2, NEW+2, OUT+2, VIEW+2 |
| L | OUT+1~, OUT+3* |
| PSODELI | INTERV+3*, EOJ+1! |
| PSODELI("DA" | DEL+1!, DEL+3*, DEL+5, DEL+6, DEL+8 |
| PSODELI("DIC" | INTERV+3*, DEL+5, DELX+1! |
| PSODELI("QFLG" | INTERV+2*, INTERV+3, DEL+2* |
| >> PSOVWI("DIC" | VIEW+2* |
| >> VALMBCK | DELX+1*, EDIT+5*, NEW+5*, OUT+5*, VIEW+3* |
| X | DELX+1!, EOJ+1!, EDIT+3!, NEW+3! |
| Y | DEL+2, DEL+3*, DEL+4, DELX+1!, EOJ+1!, EDIT+1~, EDIT+3, EDIT+4, NEW+1~, NEW+3 , NEW+4, OUT+1~ |