©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
IBOCPDS ;ALB/ARH - CLERK PRODUCTIVITY REPORT, SUMMARY ; 10/8/91
Source file <IBOCPDS.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | (,HOME)^%ZIS ^%ZISC (,$$S)^%ZTLOAD |
| VA Fileman | 3 | DD^%DT NOW^%DTC ^DIR |
| Integrated Billing | 1 | RANGE^IBOCPD |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;get parameters then run the report
|
|
| HDR | ;print the report header
|
|
| DEV | ;get the device
|
|
| PAUSE | ;pause at end of screen if beeing displayed on a terminal
|
|
| EXIT | ;clean up and quit
|
|
| FILE | ;save the data in sorted order in a temporary file
|
|
| ;print the report from the temp sort file to the appropriate device
|
||
| ENT | ;find, save, and print the data that satisfies the search parameters
|
|
| LINE | ;print all data for a particular clerk
|
|
| STOP() | ;determine if user has requested the queued report to stop
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | ENT+5, ENT+6, FILE+1, FILE+2, FILE+3 |
| ^DGCR(399.3 - [#399.3] | LINE+3 |
| ^TMP("IB" | ENT+7, EXIT+1!, FILE+4, FILE+5, FILE+6, FILE+7, FILE+8, PRINT+2, PRINT+3, LINE+2 , LINE+3, LINE+5 |
| ^VA(200 - [#200] | FILE+2 |
| Name | Line Occurrences |
|---|---|
| $$STOP | ENT+5, HDR+1 |
| EXIT | EN+5, DEV+1, DEV+2 |
| FILE | ENT+6 |
| HDR | PRINT+2, LINE+2 |
| LINE | PRINT+2 |
| PAUSE | PRINT+4, LINE+2 |
| ENT+7 |
| Name | Field # of Occurrence |
|---|---|
| ^( | FILE+5*, FILE+6*, FILE+8*, LINE+3, LINE+5 |
| ^("~~" | FILE+7* |
| ^($J | FILE+4*, PRINT+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | HDR+2 |
| >> %ZIS | DEV+1* |
| >> %ZIS("A" | DEV+1* |
| DIR | PAUSE+2! |
| DIR(0 | PAUSE+2* |
| DIROUT | EXIT+5! |
| DIRUT | EXIT+5!, PAUSE+3 |
| DTOUT | EXIT+5! |
| DUOUT | EXIT+5!, PAUSE+3 |
| IBBEG | ENT+4, EXIT+5! |
| IBBEGE | EXIT+5!, HDR+4 |
| IBCDT | ENT+4*, ENT+5*, ENT+6, EXIT+5!, HDR+2*, HDR+5 |
| IBCLK | EXIT+5!, FILE+2*, FILE+5, FILE+6, PRINT+1*, PRINT+2*, LINE+1, LINE+2, LINE+3, LINE+5 |
| IBE | ENT+4*, ENT+5, EXIT+5! |
| IBEND | ENT+4, EXIT+5! |
| IBENDE | EXIT+5!, HDR+4 |
| IBFLD | EN+4*, EXIT+5! |
| IBHDR | EN+2*, EN+3, EXIT+5! |
| IBI | EXIT+5!, HDR+7* |
| IBLN | EXIT+5!, LINE+1*, LINE+2*, LINE+5*, HDR+1* |
| IBNODE | EXIT+5!, FILE+4*, FILE+5*, FILE+6*, FILE+7*, FILE+8* |
| IBPGN | EXIT+5!, PRINT+1*, HDR+1*, HDR+3, HDR+5, STOP+1 |
| IBQUIT | EN+5, ENT+4*, ENT+5*, ENT+7, EXIT+5!, PRINT+2, PRINT+4, LINE+2, HDR+1*, PAUSE+3* |
| IBRT | EXIT+5!, FILE+1*, FILE+6, FILE+8, LINE+2*, LINE+3 |
| IBTD | EXIT+5!, FILE+3*, FILE+4, FILE+5, FILE+6, FILE+7, FILE+8 |
| IFN | ENT+5*, ENT+6*, EXIT+5!, FILE+1, FILE+2, FILE+3 |
| IO | DEV+3 |
| IO("Q" | DEV+2! |
| IOF | EN+3, HDR+3 |
| IOM | HDR+4, HDR+5, HDR+7 |
| IOSL | LINE+2 |
| IOST | HDR+3, PAUSE+1 |
| >> POP | DEV+1 |
| U | ENT+4*, FILE+1, FILE+2, FILE+3, FILE+4, FILE+5, FILE+6, FILE+7, FILE+8, PRINT+3 , LINE+3, LINE+5 |
| X | EXIT+5! |
| Y | EXIT+5!, HDR+2* |
| >> ZTDESC | DEV+2* |
| >> ZTQUEUED | EXIT+4, STOP+1 |
| ZTREQ | STOP+1! |
| >> ZTRTN | DEV+2* |
| >> ZTSAVE("IB*" | DEV+2* |
| >> ZTSTOP | STOP+1*, STOP+2 |