©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
IBTODD ;ALB/AAS - CLAIMS TRACKING DENIED DAYS REPORT ; 27-OCT-93
Source file <IBTODD.m>
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 2 | IBT OUTPUT DENIED DAYS REPORT IBTODD1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SORT | ; -- ask how they want it sorted
|
|
| SUBT | ; -- write out sub totals, initialize variable
|
|
| SET | ; -- set array to print from
|
|
| END | ; -- Clean up
|
|
| SUBTQ | ||
| DEV | ; -- select device, run option
|
|
| PROVQ | ||
| PROV(IBTRC) | ; -- find attending for an inpt. stay
|
|
| SUBH(Z) | ; -- write sub header for report
|
|
| DATE | ; -- select date range
|
|
| BLD | ; -- sort through data and build array to print from
|
|
| DQ | ; -- entry print from taskman
|
| Name | Field # of Occurrence |
|---|---|
| ^%ZIS | DEV+3 |
| HOME^%ZIS | DEV+4 |
| ^%ZISC | END+3 |
| ^%ZTLOAD | DEV+4 |
| DT^DICRW | % |
| ^DIR | %+6, SORT+14 |
| DATE^IBOUTL | DATE+1 |
| $$CDT^IBTODD1 | BLD+15 |
| PRINT^IBTODD1 | DQ+5 |
| $$BBS^IBTOSUM1 | BLD+12 |
| $$RATE^IBTOSUM1 | BLD+13 |
| $$EXPAND^IBTRE | SUBH+5 |
| $$DAY^IBTUTL3 | BLD+14, BLD+16, BLD+17 |
| INP^VADPT | PROV+3, PROV+4 |
| KVAR^VADPT | END+6 |
| $$HTE^XLFDT | DQ+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("RM" | DQ+2 |
| ^DGPM - [#405] | PROV+4 |
| ^DIC(42.4 - [#42.4] | PROVQ |
| ^DIC(45.7 - [#45.7] | PROVQ |
| ^DPT - [#2] | BLD+10 |
| ^IBE(356.6 - [#356.6] | BLD+9 |
| ^IBE(356.7 - [#356.7] | DQ+4 |
| ^IBT(356 - [#356] | BLD+8, PROV+4, PROV+7 |
| ^IBT(356.2 - [#356.2] | BLD+3, BLD+5, BLD+6, PROV+3, PROV+4, PROV+7 |
| ^IBT(356.94 - [#356.94] | PROV+8 |
| ^TMP($J | END+1!, DQ+1!, SET+5* |
| Name | Line Occurrences |
|---|---|
| $$PROV | BLD+11 |
| BLD | DQ+5 |
| DATE | %+9 |
| DQ | DEV+7 |
| END | %+7, SORT+15, DATE+2, DEV+3, DEV+4, DEV+7, DQ+6 |
| SET | BLD+19 |
| SUBTQ | SUBT+1 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | PROV+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %ZIS | DEV+3*, END+4! |
| DFN | END+4!, BLD+4~, BLD+10*, SET+5, PROV+1~, PROV+3* |
| DGPM | END+4!, PROV+1~, PROV+7*, PROV+8 |
| DIR | %+4~, %+6!, SORT+14! |
| DIR("?" | %+5*, SORT+5*, SORT+6*, SORT+7*, SORT+8*, SORT+9*, SORT+10*, SORT+11*, SORT+12*, SORT+13* |
| DIR("A" | %+6*, SORT+3* |
| DIR("B" | %+6*, SORT+4* |
| DIR(0 | %+6*, SORT+2* |
| >> DIRUT | %+7, SORT+15 |
| DT | %, BLD+17 |
| I | END+4!, PROV+1~ |
| IBADM | END+4! |
| IBAPL | END+5! |
| IBBBS | END+5!, BLD+12*, BLD+13, SET+5 |
| IBBDT | DATE+2, END+5!, BLD+7, BLD+14 |
| IBC | END+5! |
| IBCDT | END+5!, BLD+15*, BLD+17 |
| IBCNT | END+5! |
| IBD | END+5!, BLD+11*, BLD+12 |
| IBDATA | END+5! |
| IBDAY | END+4!, BLD+16*, BLD+17*, BLD+18*, SET+5 |
| IBDEN | END+4!, DQ+4*, BLD+3 |
| IBDISCH | END+4! |
| IBDISDT | END+4! |
| IBDT | END+5! |
| IBEDT | DATE+2, END+5!, BLD+7, BLD+14 |
| IBETYP | END+4! |
| IBHDT | END+4!, DQ+3* |
| IBI | END+4!, SUBH+5, SUBH+6 |
| IBJ | END+4! |
| IBMAX | END+4!, BLD+14*, BLD+18 |
| IBNAM | END+5!, BLD+10*, SET+2, SET+3 |
| IBPAG | END+4!, DQ+3* |
| IBPRIM | END+5!, SET+2*, SET+4*, SET+5 |
| IBPROV | END+5!, BLD+11*, SET+2, SET+3, SET+5 |
| IBQUIT | END+4!, DQ+3* |
| IBRATE | END+5!, BLD+13*, SET+5 |
| IBSECN | END+5!, SET+3*, SET+4*, SET+5 |
| IBSERV | END+5!, BLD+11*, SET+2, SET+5 |
| IBSORT | %+3*, SORT+15*, END+5!, SET+2, SET+3, SUBH+4, SUBH+5, SUBH+6 |
| IBSPEC | END+5!, BLD+11*, SET+5 |
| IBSUBT | END+5!, SUBT+1, SUBT+2, SUBTQ* |
| IBSUM | %+8*, %+9, DEV+2, END+5! |
| IBTAG | END+4! |
| IBTALL | END+4!, BLD+6*, BLD+16, BLD+17 |
| IBTOTL | END+5! |
| IBTRC | END+4!, BLD+2*, BLD+3*, BLD+5, BLD+6, BLD+11, SET+5, PROV~, PROV+3, PROV+4 , PROV+7 |
| IBTRCD | END+4!, BLD+4~, BLD+5*, BLD+7, BLD+8, BLD+10, BLD+13, BLD+16 |
| IBTRN | END+4!, BLD+4~, BLD+8*, BLD+15, BLD+16, BLD+17 |
| IBTRND | END+4!, BLD+4~, BLD+8*, BLD+9 |
| IBTRND1 | END+4! |
| IO | DEV+6 |
| IO("Q" | DEV+4! |
| J | END+4!, PROV+1~ |
| >> POP | DEV+3 |
| VA | END+4! |
| VA200 | PROV+1~, PROV+3* |
| VAERR | PROV+1~ |
| VAIN | PROV+1~ |
| VAIN(1 | PROV+4 |
| VAIN(11 | PROV+6 |
| VAIN(3 | PROVQ |
| >> VAINDT | PROV+3*, PROV+4* |
| X | END+4!, DQ+2*, PROV+1~, PROV+6*, PROV+9*, PROVQ, SUBH+3~*, SUBH+5*, SUBH+6*, SUBH+7 |
| X2 | END+4! |
| Y | %+8, SORT+15, END+4!, PROV+1~, PROV+8*, PROV+9 |
| Z | SUBH~ |
| >> ZTDESC | DEV+4* |
| >> ZTQUEUED | END+2, DQ+6 |
| >> ZTREQ | END+2* |
| >> ZTRTN | DEV+4* |
| >> ZTSAVE("IB*" | DEV+4* |
| ZTSK | DEV+4! |