RAMAINU1 ;HISC/GJC-Radiology Utility File Maintenance (utility)
Source file <RAMAINU1.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 2 | UPDATE^DIE $$EXTERNAL^DILFD | 
| Kernel | 1 | $$NOW^XLFDT | 
| Radiology Nuclear Medicine | 1 | UPXCM^RAMAINU | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| CMINTEG(DA,X) | ;ensure data consistency between the 'CONTRAST MEDIA USED' & | |
| AUD70(RADFN,RADTI,RACNI,RATRKCMB) | ;File the 'when, where, and who' data | |
| UPPCM(DA,X) | ;Check that if contrast media data is associated with this | |
| FILEAU(RAD0,RATRKCMB) | ;File the 'when, where, and who' data when the contrast | |
| XCMINTEG(DA) | ;ensure data consistency between the 'CONTRAST MEDIA USED' & | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^RADPT - [#70] | AUD70+7, XCMINTEG+5, XCMINTEG+7, XCMINTEG+11, XCMINTEG+12 | 
| ^RAMIS(71 - [#71] | FILEAU+4, CMINTEG+5, CMINTEG+8, CMINTEG+9 | 
| Name | Line Occurrences | 
|---|---|
| UPPCM | CMINTEG+13, CMINTEG+18 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DA | UPPCM~, UPPCM+10, CMINTEG~, CMINTEG+5, CMINTEG+8, CMINTEG+9, CMINTEG+13, CMINTEG+18, XCMINTEG~, XCMINTEG+5 , XCMINTEG+7, XCMINTEG+11, XCMINTEG+12, XCMINTEG+16, XCMINTEG+21 | 
| DA(1 | XCMINTEG+5, XCMINTEG+7, XCMINTEG+11, XCMINTEG+12 | 
| DA(2 | XCMINTEG+5, XCMINTEG+7, XCMINTEG+11, XCMINTEG+12 | 
| DUZ | FILEAU+12, AUD70+16 | 
| RACM470 | XCMINTEG+7*, XCMINTEG+8, XCMINTEG+18, XCMINTEG+23! | 
| RACM471 | CMINTEG+5*, CMINTEG+6, CMINTEG+15, CMINTEG+20! | 
| RACNI | AUD70~, AUD70+7, AUD70+13 | 
| RAD0 | FILEAU~, FILEAU+4, FILEAU+10, FILEAU+11, FILEAU+12 | 
| RAD1 | FILEAU+4*, FILEAU+9!, FILEAU+10, FILEAU+11, FILEAU+12, FILEAU+13! | 
| RAD3 | AUD70+7*, AUD70+12!, AUD70+13, AUD70+17! | 
| RADFN | AUD70~, AUD70+7, AUD70+13 | 
| RADTI | AUD70~, AUD70+7, AUD70+13 | 
| RAI | CMINTEG+8*, CMINTEG+9, CMINTEG+13!, XCMINTEG+10*, XCMINTEG+11*, XCMINTEG+12, XCMINTEG+16! | 
| RAI(0 | CMINTEG+9*, CMINTEG+10, XCMINTEG+12*, XCMINTEG+13 | 
| RAIENS | AUD70+13*, AUD70+14, AUD70+15, AUD70+16, AUD70+17! | 
| RASFM | FILEAU+13!, AUD70+17!, UPPCM+10!, UPPCM+11! | 
| RASFM( | FILEAU+10*, FILEAU+11*, FILEAU+12*, AUD70+14*, AUD70+15*, AUD70+16* | 
| RASFM(71 | UPPCM+10* | 
| RATRKCMB | FILEAU~, FILEAU+9, FILEAU+11, AUD70~, AUD70+12, AUD70+15 | 
| RAXCM0 | XCMINTEG+5*, XCMINTEG+6, XCMINTEG+8, XCMINTEG+18, XCMINTEG+23! | 
| RAXCMP | XCMINTEG+6*, XCMINTEG+9, XCMINTEG+19, XCMINTEG+23! | 
| U | CMINTEG+6, CMINTEG+7, CMINTEG+10, CMINTEG+15, CMINTEG+16, XCMINTEG+6, XCMINTEG+8, XCMINTEG+13, XCMINTEG+18 | 
| X | UPPCM~, UPPCM+10, CMINTEG~, CMINTEG+6, CMINTEG+7, CMINTEG+15, CMINTEG+16 |