©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
DGPTSUD1 ;ALB/AS/ADL - Look for the same DRG in consecutive RAM movements ; Feb 23 87
Source file <DGPTSUD1.m>
| Package | Total | Call Graph |
|---|---|---|
| DRG Grouper | 1 | ($$DRG,$$GETDATE)^ICDGTDRG |
| VA Fileman | 1 | FILE^DIE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| Q | ||
| 88 | ||
| KILL | ||
| SAME |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGPT - [#45] | DGPTSUD1+5, SAME+1, SAME+4, SAME+8 |
| Name | Line Occurrences |
|---|---|
| 88 | SAME+3, SAME+4, SAME+5 |
| KILL | SAME+9 |
| Q | DGPTSUD1+6 |
| SAME | DGPTSUD1+6 |
| Name | Field # of Occurrence |
|---|---|
| ^("P" | DGPTSUD1+5, SAME+1 |
| ^(0 | SAME+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | Q! |
| DG1 | Q!, SAME+1*, SAME+9, 88, KILL+3, KILL+5, KILL+12 |
| DG2 | Q!, SAME+1*, SAME+9, 88, KILL+8 |
| >> DGADM | SAME+6 |
| DGFDA | KILL~, KILL+4!, KILL+7!, KILL+11! |
| DGFDA( | KILL+1*, KILL+5*, KILL+8*, KILL+12* |
| DGMSG | KILL~, KILL+4!, KILL+7!, KILL+11! |
| DGMV1 | Q!, SAME+1*, SAME+5, SAME+6, SAME+7, SAME+9, 88, KILL+1 |
| DGMV2 | Q!, SAME+1*, SAME+5, 88, KILL+1, KILL+5 |
| DGNODE | DGPTSUD1+5*, Q! |
| DGSUB | Q!, SAME+9*, 88*, KILL+1, KILL+3 |
| DGSUDO | DGPTSUD1+6, Q! |
| DGSUDO( | DGPTSUD1+5*, DGPTSUD1+6, SAME, SAME+1, SAME+3, SAME+6, KILL+10!, KILL+14! |
| DGSUDO(0 | DGPTSUD1+6 |
| DGSUNX | DGPTSUD1+6*, Q!, SAME, SAME+1, SAME+3, SAME+7, KILL+10, KILL+15 |
| DGSUPR | DGPTSUD1+6*, Q!, SAME*, SAME+1, SAME+6, SAME+7, KILL+14, KILL+15* |
| DGSUR | Q!, SAME+7*, SAME+8*, SAME+9 |
| DGSURDT | Q!, SAME+8* |
| FLD | KILL~, KILL+8*, KILL+12* |
| I | DGPTSUD1+5*, Q!, SAME+6*, SAME+7, SAME+8* |
| J | Q!, SAME+6* |
| >> PTF | DGPTSUD1+5, SAME+1, SAME+3, SAME+4, SAME+8, KILL+1, KILL+5, KILL+8, KILL+12 |
| X1 | Q!, SAME+7*, SAME+8 |
| X2 | Q!, SAME+7*, SAME+8 |
| >> XX | DGPTSUD1+6* |