ADGRALC ; IHS/ADC/PDW/ENM - READMISSION LISTINGS (CALC) ; [ 03/25/1999 11:48 AM ]
Source file <ADGRALC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| A | ; -- driver
|
|
| Q | ; -- cleanup
|
|
| TS() | ; -- treating specialty
|
|
| LP1 | ; -- loop admissions
|
|
| 1 | ; -- check for readmission
|
|
| M1PD() | ; -- movement, admission, previous, date
|
|
| M1P() | ; -- movement, admission, previous
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPM - [#405] | 1+4, M1PD+1, TS+1 |
| ^DGPM("AMV1" | LP1+3, LP1+4, LP1+5 |
| ^DGPM("APHY" | TS+1 |
| ^DGPM("ATID1" | M1P+1 |
| ^DIC(42 - [#42] | 1+6 |
| ^DIC(45.7 - [#45.7] | 1+8 |
| ^DPT - [#2] | 1+3 |
| ^TMP("DGZRAL" | ADGRALC+3!, 1+12*, 1+16*, 1+19* |
| Name | Line Occurrences |
|---|---|
| $$M1P | 1+11, 1+15, 1+18, M1PD+1 |
| $$M1PD | 1+11, 1+15, 1+18 |
| $$TS | 1+6 |
| 1 | LP1+5 |
| LP1 | A+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | LP1+1~, LP1+4*, LP1+5, 1+3, 1+12, 1+16, 1+19, Q+1!, M1P+1 |
| >> DGBDT | LP1+2 |
| DGDS | LP1+1~, 1+11, 1+15, 1+18, Q+1! |
| DGDSA | LP1+1~, 1+11, 1+15, 1+18, Q+1! |
| DGDT | LP1+1~, LP1+2*, LP1+3*, LP1+4, LP1+5, 1+12, 1+16, 1+19, Q+1!, M1P+1 |
| >> DGEDT | LP1+2 |
| DGPMDA | 1+1~, 1+2* |
| DGRE | LP1+1~, 1+2, 1+11, 1+15, 1+18, Q+1! |
| >> DGSRT | 1+5, 1+7 |
| >> DGTYP | 1+5, 1+7, 1+10, 1+14 |
| DX | LP1+1~, 1+1~, 1+4*, 1+11, 1+15, 1+18, Q+1! |
| ED | LP1+1~, LP1+2*, LP1+3, Q+1! |
| IFN | LP1+1~, LP1+5*, 1+2, 1+4, Q+1!, TS+1 |
| N | LP1+1~, 1+4*, Q+1! |
| NAME | LP1+1~, 1+1~, 1+3*, 1+16, 1+19, Q+1! |
| TS | LP1+1~, 1+1~, 1+6*, 1+7, 1+8*, 1+11, 1+15, 1+19, Q+1! |
| U | 1+3, 1+4, 1+6, 1+8, 1+11, 1+15, 1+18, TS+1 |
| UTL | LP1+1~, 1+1~, 1+11*, 1+12, 1+15*, 1+16, 1+18*, 1+19, Q+1! |
| WARD | LP1+1~, 1+1~, 1+6*, 1+11, 1+16, 1+18, Q+1! |
| WD | LP1+1~, 1+4*, 1+5, 1+6, Q+1! |