DGRUDYN ;ALB/SCK - RAI/MDS COTS DYNAMIC ADDRESSING ROUTINE; 9-2-99 ; 6/23/03 3:25pm
Source file <DGRUDYN.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 2 | $$FIND1^DIC $$GET1^DIQ | 
| Health Level Seven | 1 | GET^HLSUB | 
| Kernel | 1 | $$NOW^XLFDT | 
| Registration | 1 | $$SITE^VASITE | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN(EVENT) | ; | |
| WARD(DGPV1,DGP) | ; Retrieve Ward IEN for Division lookup.  If the ward has been ; "translated", then return the original Ward IEN. ; Input ; DGPV1 - Copy of the PV1 segment ; DGP - Piece containing the ward to be checked | |
| ENMFU(DGEVENT,DGDIV) | ;ENTRY POINT FOR MASTER FILE UPDATE ROUTING | 
| FileNo | Call Tags | 
|---|---|
| ^DG(40.8 - [#40.8] | GET1^DIQ | 
| ^DIC(42 - [#42] | FIND1^DIC, GET1^DIQ | 
| ^HL(771 - [#771] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DGRU(46.12 | WARD+15, WARD+17, WARD+18 | 
| Name | Line Occurrences | 
|---|---|
| $$WARD | EN+19, EN+20, EN+21, EN+22 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| CLIENT | EN+5~, EN+40*, EN+41, ENMFU+2~, ENMFU+12*, ENMFU+13 | 
| DGAPIEN | EN+37*, EN+42, ENMFU+2~, ENMFU+9*, ENMFU+14 | 
| DGDIV | EN+5~, EN+25*, EN+28, EN+35, ENMFU~, ENMFU+3, ENMFU+5 | 
| DGENTRY | EN+5~ | 
| DGEVENT | ENMFU~, ENMFU+12 | 
| DGFAC | EN+5~, EN+38*, EN+42, ENMFU+2~, ENMFU+10*, ENMFU+14 | 
| DGIEN | EN+5~, WARD+6~, WARD+9*, WARD+13, WARD+15*, WARD+18*, WARD+19 | 
| DGN | WARD+6~, WARD+8*, WARD+9, WARD+14, WARD+17 | 
| DGP | WARD~, WARD+8 | 
| DGPV1 | WARD~, WARD+8 | 
| DGSCN | EN+5~, EN+28*, EN+32, ENMFU+3*, ENMFU+4, ENMFU+7 | 
| DGSITE | EN+5~ | 
| DGSTN | EN+5~, EN+35*, ENMFU+5* | 
| DGW | WARD+6~, WARD+8* | 
| DGWARD | EN+5~, EN+19*, EN+20*, EN+21*, EN+22*, EN+25 | 
| DGX | WARD+6~, WARD+14*, WARD+15, WARD+17*, WARD+18 | 
| DIC | WARD+6~ | 
| EVENT | EN~, EN+7, EN+19, EN+20, EN+21, EN+40 | 
| HLL | EN+31!, EN+32, ENMFU+6!, ENMFU+7 | 
| HLL("LINKS" | EN+37, EN+38, EN+41*, ENMFU+9, ENMFU+10, ENMFU+13* | 
| >> HLNEXT | EN+11 | 
| HLNODE | EN+5~, EN+12 | 
| HLNODE( | EN+13 | 
| >> HLP("SUBSCRIBER" | EN+42*, ENMFU+14* | 
| >> HLQUIT | EN+11 | 
| I | EN+10~, EN+11*, EN+12, EN+13, EN+16*, EN+17*, EN+18, EN+19, EN+20, EN+21 , EN+22 | 
| J | EN+10~, EN+12*, EN+13* | 
| X | EN+10~ | 
| X( | EN+12*, EN+13*, EN+17, EN+18, EN+19, EN+20, EN+21, EN+22 | 
| Y | WARD+6~ |