PRSNDPC1 ;WOIFO/DAM - Delete POC Records;10/28/09
Source file <PRSNDPC1.m>
| 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 |
|---|---|---|
| DELPOC | ; called from option Delete Nurse POC Daily Time Record
|
|
| EDVDEL(PRSIEN,PRSD,PPI,PRSNVER) | ; DELETE RECORD FUNCTION
; RETURNS 1 IF RECORD IS DELETED OTHERWISE 0 |
|
| CANDEL(PRSIEN,PRSDT,PRSD,PPI,VERSION) | ; Return true if the record on the specified date
; is allowed to be deleted, otherwise return an error message. |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PRSN(451 - [#451] | DELPOC+25, CANDEL+12, CANDEL+18, CANDEL+31 |
| ^PRST(458 - [#458] | DELPOC+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | DELPOC+15~, DELPOC+17* |
| CANDEL | DELPOC+1~, DELPOC+16*, DELPOC+18, DELPOC+26*, DELPOC+27, DELPOC+28, CANDEL+3~, CANDEL+4*, CANDEL+8*, CANDEL+12 , CANDEL+13*, CANDEL+21, CANDEL+22*, CANDEL+28, CANDEL+29*, CANDEL+33, CANDEL+34*, CANDEL+37*, CANDEL+39*, CANDEL+40 |
| DIR | DELPOC+34~ |
| DIR("?" | DELPOC+38* |
| DIR("A" | DELPOC+37* |
| DIR("B" | DELPOC+36* |
| DIR(0 | DELPOC+35* |
| DIRUT | DELPOC+34~, DELPOC+40 |
| DT | DELPOC+2 |
| GROUP | DELPOC+1~, DELPOC+2 |
| GROUP( | DELPOC+5 |
| GROUP(0 | DELPOC+4, DELPOC+5, DELPOC+10 |
| OUT | DELPOC+15~, DELPOC+16*, DELPOC+18, DELPOC+20*, DELPOC+28 |
| PDAYSTAT | CANDEL+3~, CANDEL+31*, CANDEL+33, CANDEL+36, CANDEL+39 |
| PPI | DELPOC+23*, DELPOC+24, DELPOC+25, DELPOC+26, DELPOC+48, EDVDEL~, EDVDEL+7, EDVDEL+10, EDVDEL+11, EDVDEL+14 , CANDEL~, CANDEL+8, CANDEL+12, CANDEL+18, CANDEL+31 |
| PPSTAT | CANDEL+3~, CANDEL+18*, CANDEL+19, CANDEL+21 |
| PRSD | DELPOC+23*, DELPOC+24, DELPOC+25, DELPOC+26, DELPOC+48, EDVDEL~, EDVDEL+7, EDVDEL+10, EDVDEL+11, EDVDEL+14 , CANDEL~, CANDEL+8, CANDEL+12, CANDEL+31 |
| PRSDT | DELPOC+21*, DELPOC+22, DELPOC+26, DELPOC+30, CANDEL~ |
| PRSDTDAT | DELPOC+22*, DELPOC+23, CANDEL+3~ |
| PRSIEN | DELPOC+1~, DELPOC+10*, DELPOC+25, DELPOC+26, DELPOC+30, DELPOC+48, EDVDEL~, EDVDEL+7, EDVDEL+10, EDVDEL+11 , EDVDEL+14, CANDEL~, CANDEL+12, CANDEL+18, CANDEL+31 |
| PRSNA | EDVDEL+3~, EDVDEL+7*, EDVDEL+14*, EDVDEL+16 |
| PRSNVER | DELPOC+25*, DELPOC+26, DELPOC+48, EDVDEL~, EDVDEL+5, EDVDEL+6, EDVDEL+7, EDVDEL+10, EDVDEL+11 |
| RETURN | EDVDEL+3~, EDVDEL+4*, EDVDEL+5, EDVDEL+17*, EDVDEL+18 |
| U | DELPOC+4, DELPOC+10, DELPOC+20, DELPOC+23, DELPOC+27, CANDEL+18, CANDEL+31, CANDEL+39 |
| VALUE | DELPOC+1~, DELPOC+5*, DELPOC+6, DELPOC+10 |
| VERSION | CANDEL~, CANDEL+28 |
| X | DELPOC+4*, DELPOC+15~, DELPOC+20, DELPOC+34~, EDVDEL+3~, EDVDEL+16!, EDVDEL+17 |
| Y | DELPOC+15~, DELPOC+20, DELPOC+21, DELPOC+34~, DELPOC+40 |