IBCNERP7 ;DAOU/BHS - eIV STATISTICAL REPORT ;10-JUN-2002
Source file <IBCNERP7.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 |
|---|---|---|
| EN | ;
; Init vars |
|
| S10 | ||
| S20 | ||
| S30 | ||
| S50 | ;D DEVICE^IBCNERP1(IBCNERTN,.IBCNESPC,IBOUT) I STOP G:$$STOP^IBCNERP1 EXIT G S20
|
|
| EXIT | ; Quit this routine
|
|
| DTMRNG | ; Determine the start and end date/times for the report
; Init vars |
|
| DTMRNG0 | ;/ckb - IB*2*687 - Added the DTMRNG0 tag.
|
|
| DTMRNG1 | ||
| DTMRNGX | ; DTMRNG exit pt
|
|
| SECTS | ; Prompt to allow users to include the available sections in the report
; Init vars |
|
| SECTSX | ; SECTS exit pt
|
|
| MAILMSG | ; Tag to be called by TaskMan to generate report with default values
; and send as MailMan message ; Init vars |
|
| OUT() | ; Prompt to allow users to select output format
|
| 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 |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^IBE(350.9 - [#350.9] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBE(350.9 - [#350.9] | MAILMSG+24 |
| ^TMP($J | MAILMSG+30!, MAILMSG+37! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BDT | MAILMSG+3~, MAILMSG+14*, MAILMSG+15 |
| DIR | DTMRNG+2~, DTMRNG0+5!, DTMRNG1+4!, SECTS+2~, SECTS+34!, OUT+1~ |
| DIR("?" | DTMRNG0+3*, DTMRNG0+4*, DTMRNG1+2*, DTMRNG1+3*, SECTS+15*, SECTS+16*, SECTS+17*, SECTS+18*, SECTS+19*, SECTS+20* , SECTS+21*, SECTS+22*, SECTS+23*, SECTS+24*, SECTS+27*, SECTS+30*, SECTS+31*, SECTS+32*, SECTS+33* |
| DIR("A" | DTMRNG0+2*, DTMRNG1+1*, SECTS+7*, SECTS+8*, SECTS+9*, SECTS+10*, SECTS+11*, SECTS+12*, SECTS+13*, OUT+4* |
| DIR("B" | SECTS+14*, OUT+5* |
| DIR(0 | DTMRNG0+1*, DTMRNG1*, SECTS+6*, OUT+3* |
| DIROUT | OUT+1~ |
| DIRUT | DTMRNG+2~, DTMRNG0+6, DTMRNG1+5, SECTS+2~, SECTS+35, OUT+1~, OUT+6 |
| DTOUT | OUT+1~ |
| DUOUT | OUT+1~ |
| EDT | MAILMSG+3~, MAILMSG+13*, MAILMSG+14, MAILMSG+16 |
| IBCNERTN | EN+2~, EN+5*, S50+1, MAILMSG+3~, MAILMSG+27*, MAILMSG+30, MAILMSG+32, MAILMSG+34, MAILMSG+37 |
| IBCNESPC | EN+2~, S50+1, MAILMSG+3~, MAILMSG+32, MAILMSG+34 |
| IBCNESPC("BEGDTM" | DTMRNG0+12*, DTMRNG1+6, MAILMSG+15* |
| IBCNESPC("ENDDTM" | DTMRNG1+14*, MAILMSG+16* |
| IBCNESPC("MM" | EN+12*, MAILMSG+20*, MAILMSG+22 |
| IBCNESPC("SECTS" | SECTS+39*, SECTS+40*, SECTS+41*, MAILMSG+18* |
| IBOUT | EN+2~, S30*, S50+1, MAILMSG+3~, MAILMSG+6*, MAILMSG+34 |
| IOF | EN+6 |
| POP | EN+2~ |
| STOP | EN+2~, EN+4*, S10, S20, S30, S50+1, DTMRNG0+6*, DTMRNG1+5*, SECTS+35*, OUT+6* |
| TM | MAILMSG+3~, MAILMSG+11*, MAILMSG+12*, MAILMSG+15, MAILMSG+16 |
| U | MAILMSG+24 |
| X | DTMRNG+2~, SECTS+2~, OUT+1~ |
| Y | DTMRNG+2~, DTMRNG0+8, DTMRNG0+12, DTMRNG1+6, DTMRNG1+10, DTMRNG1+14, SECTS+2~, SECTS+38*, SECTS+39, SECTS+40 , SECTS+41, OUT+1~, OUT+7 |
| >> ZTQUEUED | MAILMSG+40 |
| >> ZTREQ | MAILMSG+40* |
| >> ZTSTOP | MAILMSG+34 |