©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
ADGRALP1 ; IHS/ADC/PDW/ENM - READMISSION LISTING (PRINT) ; [ 03/25/1999 11:48 AM ]
Source file <ADGRALP1.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Changes To ADT | 1 | (END1,NEWPG)^ADGRALP |
| VA Fileman | 1 | ^DIR |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SERV | ;EP;***> admit service order
|
|
| END1 | ||
| LINE | ;***> subrtn to print patient data
|
|
| SV4 | ||
| END | ||
| TS() | ; -- treating specialty ifn
|
|
| WD1 | ||
| WD2 | ||
| WD3 | ||
| WD4 | ||
| WARD | ;EP;***> in order by ward
|
|
| SV2 | ||
| SV3 | ||
| SV1 |
| 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 |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ADGDS - [#9009012] | LINE+20 |
| ^AUPNPAT - [#9000001] | LINE+6 |
| ^DGPM - [#405] | LINE+12, LINE+14, TS+1 |
| ^DGPM("APHY" | TS+1 |
| ^DIC(42 - [#42] | LINE+12 |
| ^DIC(45.7 - [#45.7] | LINE+11, LINE+21 |
| ^TMP("DGZRAL" | WD1, WD2, WD3, WD4, WD4+1, SV1, SV2, SV3, SV4, SV4+1 |
| Name | Line Occurrences |
|---|---|
| $$TS | LINE+11 |
| END | WD1, SV1 |
| END1 | WD1+1, WD4+4, SV1+1, SV4+4 |
| LINE | WD4+4, SV4+4 |
| SV1 | SV2 |
| SV2 | SV3 |
| SV3 | SV4 |
| SV4 | SV4+4 |
| WD1 | WD2 |
| WD2 | WD3 |
| WD3 | WD4 |
| WD4 | WD4+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DFN | WD3*, WD4*, WD4+1, SV3*, SV4*, SV4+1, LINE+6, LINE+20 |
| >> DGA | WD4+3*, SV4+3*, LINE+12, LINE+14, TS+1 |
| >> DGBDT | WD1+1, WD1+2, SV1+1, SV1+2 |
| >> DGDS | WD4+3*, SV4+3*, LINE+18, LINE+19 |
| >> DGDSA | WD4+3*, SV4+3*, LINE+20 |
| >> DGDSTR | LINE+20*, LINE+21, LINE+22 |
| >> DGDT | WD1*, WD2*, WD3, WD4, WD4+1, SV1*, SV2*, SV3, SV4, SV4+1 , LINE+2, LINE+3 |
| >> DGDX | WD4+2*, SV4+2*, LINE+5, LINE+14* |
| >> DGEDT | WD1+1, WD1+2, SV1+1, SV1+2 |
| >> DGLST | WD4+3*, SV4+3*, LINE+9, LINE+10 |
| >> DGNM | WD2*, WD3*, WD4, WD4+1, SV2*, SV3*, SV4, SV4+1, LINE+1 |
| >> DGPAGE | WD1+1, WD1+2, SV1+1, SV1+2 |
| >> DGPROC | LINE+22*, LINE+24 |
| >> DGRE | WD4+2*, SV4+2*, LINE+7, LINE+16, LINE+17 |
| >> DGS | WD4+1*, WD4+2, WD4+3, SV4+1*, SV4+2, SV4+3 |
| >> DGSRVL | LINE+21* |
| >> DGSTOP | WD1+1, WD4+4, SV1+1, SV4+4 |
| >> DGSV | WD4+2*, SERV+1*, SV1*, SV1+2, SV2, SV3, SV4, SV4+1, LINE+4, LINE+23 |
| >> DGSVL | LINE+11*, LINE+13 |
| >> DGTYP | LINE+4, LINE+13, LINE+23 |
| >> DGW | WARD+1*, WD1*, WD1+2, WD2, WD3, WD4, WD4+1, SV4+2*, LINE+4 |
| >> DGWRD | LINE+12*, LINE+13 |
| >> DGX | LINE+6* |
| DIR | END! |
| DIR(0 | END* |
| DUZ(2 | LINE+6 |
| IOSL | LINE+25 |
| IOST | END |
| U | WD4+2, WD4+3, SV4+2, SV4+3, LINE+6, LINE+11, LINE+12, LINE+14, LINE+21, LINE+22 , TS+1 |