©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
BDGADD ; IHS/ANMC/LJF - A&D DETAILED PRINT ; [ 06/11/2002 2:27 PM ]
Source file <BDGADD.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 4 | ^%ZISC ($$DOW,$$FMADD,$$FMTE)^XLFDT $$REPEAT^XLFSTR DISP^XQORM1 |
| Registration | 3 | EN^VALM TERM^VALM0 CLEAR^VALM1 |
| IHS Changes To ADT | 2 | PATDATA^BDGADD1 $$CONF^BDGF |
| VA Fileman | 1 | $$GET1^DIQ |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Changes To ADT | 2 | BDGADD1 BDGADD2 |
| Registration | 1 | DGPMGL1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SET(DATA,NUM) | ; put display line into array
|
|
| EN | ; -- main entry point for BDG A&D DETAILED
|
|
| HDR | ; -- header code
|
|
| PHDG | ; heading for paper report
|
|
| PAD(D,L) | ;EP -- SUBRTN to pad length of data
; -- D=data L=length |
|
| SP(N) | ; -- SUBRTN to pad N number of spaces
|
|
| REMAIN | ; total up patients remaining at end of day
; count by service to pull out newborns and oberservations |
|
| HDG | ; set up column headings
|
|
| INIT | ; -- init variables and list array
|
|
| EXIT | ; -- exit code
|
|
| ; print report to paper
|
||
| EXPND | ; -- expand code
|
|
| HELP | ; -- help code
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
| ^DIC(45.7 - [#45.7] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^BDGCTX - [#9009016.6] | REMAIN+4, REMAIN+5 |
| ^TMP("BDGADD" | INIT+2!, SET+2*, PRINT+5, PRINT+8, EXIT+1! |
| Name | Line Occurrences |
|---|---|
| $$PAD | REMAIN+11, REMAIN+12, REMAIN+13, HDG+5, HDG+7, HDG+9, SP+1 |
| $$SP | HDR+1, HDR+3, HDR+4 |
| EXIT | PRINT+9 |
| HDG | INIT+8 |
| HDR | PHDG+2 |
| INIT | BDGADD+5 |
| PHDG | PRINT+2, PRINT+7 |
| BDGADD+5 | |
| REMAIN | INIT+7 |
| SET | REMAIN+14, HDG+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BDGLN | PRINT+1~ |
| BDGREP | EXIT+1! |
| BDGT | BDGADD+5*, EN+1~, EN+3*, HDR+4, INIT+4, REMAIN+5 |
| BDGX | PRINT+1~, PRINT+5*, PRINT+8 |
| COUNT | REMAIN+2~ |
| COUNT( | REMAIN+3*, REMAIN+8* |
| COUNT("D" | REMAIN+12 |
| COUNT("I" | REMAIN+10 |
| COUNT("N" | REMAIN+13 |
| COUNT("O" | REMAIN+11 |
| D | PAD~, PAD+2 |
| DATA | SET~, SET+2 |
| DUZ(2 | HDR+2 |
| I | INIT+5*, REMAIN+2~, REMAIN+3*, PHDG+3* |
| IO | PRINT+2 |
| IOF | PRINT+7 |
| IOSL | PRINT+7 |
| IOST | BDGADD+5 |
| L | PAD~, PAD+2 |
| LINE | REMAIN+2~, REMAIN+10*, REMAIN+11*, REMAIN+12*, REMAIN+13*, REMAIN+14, HDG+1~, HDG+5*, HDG+7*, HDG+9* , HDG+12 |
| N | REMAIN+2~, REMAIN+5*, REMAIN+8, SP~, SP+1 |
| NUM | SET~, SET+1*, SET+2 |
| PREV | INIT+1~, INIT+4* |
| >> RD | BDGADD+5, EN+3 |
| SNM | REMAIN+2~, REMAIN+6*, REMAIN+7 |
| SRV | INIT+1~ |
| SRVN | INIT+1~ |
| SUB | REMAIN+2~, REMAIN+7*, REMAIN+8 |
| SV | REMAIN+2~, REMAIN+4*, REMAIN+5, REMAIN+6 |
| TOT | INIT+1~ |
| TOT( | INIT+5* |
| TOT1 | INIT+1~, INIT+5* |
| TOT2 | INIT+1~, INIT+5* |
| U | REMAIN+8 |
| VALMCNT | EN+1~, INIT+3*, REMAIN+14, HDG+12 |
| >> VALMHDR( | PHDG+3 |
| >> VALMHDR(1 | HDR+1* |
| >> VALMHDR(2 | HDR+3* |
| >> VALMHDR(3 | HDR+4* |
| WARD | PRINT+1~ |
| >> X | HDR+2*, HDR+3, HELP+1* |