ACKQDWL ;AUG/JLTP BIR/PTD HCIOFO/BH-Compile A&SP Capitation Data ; [ 05/21/96 11:15 ]
Source file <ACKQDWL.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 |
|---|---|---|
| OPTN | ; Introduce option.
|
|
| DIV | ; select Division (user may select one/many/ALL)
|
|
| BKG | ; Queue process to run in the background.
|
|
| DQ | ; Entry point when queued.
|
|
| EXIT | ; ALWAYS EXIT HERE
|
|
| GETDT | ; Select month for report.
|
|
| GDT1 | ||
| INIT | ; Initialize important variables.
|
|
| LM(X) | ; Find month previous to X.
|
|
| DATHLP | ; Extended help - select month for capitation report. (ACKQWL)
|
|
| END | ; Set END date field into header for Division and Date
|
|
| BEGIN | ; Set START date and Job # into header record for Division and date
|
| Name | Field # of Occurrence |
|---|---|
| DD^%DT | END+9, BEGIN+3 |
| NOW^%DTC | END+2, END+8, BEGIN+2 |
| ^%ZTLOAD | BKG+4 |
| ABORT^ACKQDWB | DQ+4 |
| BUILD^ACKQDWB | END+10 |
| ^ACKQDWL1 | DQ+7 |
| $$STAQES^ACKQDWLU | DQ+4 |
| $$STAQES1^ACKQDWLU | DIV+10 |
| $$WLSTATUS^ACKQDWLU | DIV+8, DQ+3 |
| CREATE^ACKQDWLU | DQ+5 |
| $$BFY^ACKQUTL | INIT+3 |
| $$HTIM^ACKQUTL | END+10, BEGIN+4 |
| $$XDAT^ACKQUTL | GDT1+1, END+10 |
| $$DIV^ACKQUTL2 | DIV+1 |
| FILE^DIE | END+7, BEGIN+10 |
| ^DIR | GDT1+3 |
| $$SITE^VASITE | INIT+2 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("ACKQWL" | EXIT+3! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | END+6, BEGIN+8 |
| %X | EXIT+2! |
| %Y | EXIT+2! |
| ACKARR | END+1~, BEGIN+1~ |
| ACKARR( | END+6*, BEGIN+8*, BEGIN+9* |
| ACKBFY | EXIT+1!, INIT+3* |
| ACKCP | EXIT+1! |
| ACKCPP | EXIT+1! |
| ACKCPT | EXIT+1! |
| ACKD | EXIT+1! |
| ACKDA | DIV+8, DIV+10, DQ+2, DQ+3, DQ+5, EXIT+1!, INIT+2*, END+6, BEGIN+8, BEGIN+9 |
| ACKDEF | EXIT+4! |
| ACKDIV | DIV+1*, DIV+8, DIV+10, DQ+3, DQ+5, EXIT+3!, END+11! |
| ACKDIV( | END+4, END+5, BEGIN+6, BEGIN+7 |
| ACKDUZ | DIV+5*, EXIT+1! |
| ACKEM | EXIT+1!, INIT+2* |
| ACKICD | EXIT+1! |
| ACKICP | EXIT+1! |
| ACKK1 | EXIT+4! |
| ACKM | DQ+2*, DQ+5, EXIT+1!, GDT1+4*, GDT1+5, INIT+2, INIT+3, END+10 |
| ACKMAN | DIV+5*, DQ+4, EXIT+1! |
| ACKMO | EXIT+1!, END+10* |
| ACKN | EXIT+4! |
| ACKNU | EXIT+1! |
| ACKNV | EXIT+1! |
| ACKST | EXIT+1!, EXIT+4! |
| ACKSTAT | DIV+10*, DIV+12, DQ+4*, DQ+5, EXIT+4! |
| ACKSTOP | EXIT+1! |
| ACKV | EXIT+1! |
| ACKVDVN | EXIT+4! |
| >> ACKWLMSG | DIV+8*, DIV+10, DQ+3*, DQ+4 |
| ACKX | EXIT+4! |
| ACKXEDTE | EXIT+3!, END+9* |
| ACKXFT | EXIT+1!, END+10* |
| ACKXSDTE | EXIT+3!, BEGIN+3* |
| ACKXST | EXIT+1!, BEGIN+4* |
| ACKZIP | EXIT+1! |
| CPT | DQ+1~ |
| D | LM+1~* |
| D0 | EXIT+2! |
| DA | EXIT+2! |
| DFN | EXIT+2! |
| DIE | EXIT+2! |
| DIR | GETDT+1~ |
| DIR("?" | GDT1+1* |
| DIR("??" | GDT1+2* |
| DIR("A" | GDT1* |
| DIR("B" | GDT1+1* |
| DIR(0 | GDT1* |
| DIRUT | DIV+3, DQ+5, EXIT+2!, GDT1+3 |
| DIVARR | EXIT+4! |
| DIVIEN | EXIT+4!, END+5*, END+6, BEGIN+7*, BEGIN+8, BEGIN+9 |
| >> DIVNUM | END+3*, END+4*, END+5, BEGIN+5*, BEGIN+6*, BEGIN+7 |
| DR | EXIT+2! |
| DT | DQ+2, GDT1+1, GDT1+5 |
| DTOUT | EXIT+2! |
| DUOUT | EXIT+2! |
| DUZ | DIV+5 |
| I | EXIT+2! |
| ICD | DQ+1~ |
| IOF | OPTN+1 |
| M | LM+1~*, LM+2*, LM+3 |
| MON | INIT+1~, INIT+2* |
| U | END+5, BEGIN+7 |
| VAERR | EXIT+2! |
| VAPA | EXIT+2! |
| X | EXIT+2!, GETDT+1~, LM~, LM+1, END+9, BEGIN+3 |
| XMZ | EXIT+2! |
| Y | EXIT+2!, GETDT+1~, GDT1+4, LM+1~*, LM+2*, LM+3, END+9*, BEGIN+3* |
| >> ZTDESC | BKG+4* |
| >> ZTIO | BKG+3* |
| >> ZTQUEUED | EXIT+5 |
| >> ZTREQ | EXIT+5* |
| >> ZTRTN | BKG+3* |
| >> ZTSAVE("ACK*" | BKG+3* |
| ZTSK | BKG+5, EXIT+2! |