DGCNTRY ;BAJ - REGISTRATION SCREEN 7/CROSS REFERENCE CLEANUP ;01/09/2006
Source file <DGCNTRY.m>
| Package | Total | Call Graph | 
|---|---|---|
| Registration | 2 | $$FORIEN^DGADDUTL $$UPD^DGENDBS | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| FORGN(X2) | ||
| DTABLE | ;TABLE of Foreign and Domestic fields: structure -->>;DESCRIPTION;;(F)OREIGN/(D)OMESTIC;FILE;COUNTRY FIELD;FIELD | |
| EN(FILE,ATYPE,FIELD) | ; entry point | |
| SETARR(DATA,FORGN,FILE,ATYPE,FIELD) | ;set up data array | 
| Name | Line Occurrences | 
|---|---|
| $$FORGN | EN+6 | 
| SETARR | EN+6 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ADDTYPE | SETARR+1~, SETARR+5*, SETARR+6 | 
| ATYPE | EN~, EN+6, SETARR~, SETARR+6 | 
| CNT | SETARR+1~, SETARR+4* | 
| CTRYFLD | SETARR+1~, SETARR+5*, SETARR+6 | 
| CURFILE | SETARR+1~, SETARR+5*, SETARR+6 | 
| >> CURFLD | SETARR+5*, SETARR+6 | 
| CURFTYPE | SETARR+1~, SETARR+5*, SETARR+6 | 
| >> DA | EN+5 | 
| DATA | EN+3~, EN+6, EN+7, SETARR~ | 
| DATA( | SETARR+6* | 
| DGENDA | EN+3~, EN+5*, EN+7 | 
| ERROR | EN+3~, EN+5*, EN+7 | 
| FDFLG | SETARR+1~ | 
| FIELD | EN~, EN+6, SETARR~, SETARR+6 | 
| FILE | EN~, EN+6, EN+7, SETARR~, SETARR+6 | 
| FORGN | EN+3~, EN+6*, SETARR~, SETARR+3 | 
| FTYPE | SETARR+1~, SETARR+3*, SETARR+6 | 
| T | SETARR+1~, SETARR+4*, SETARR+5 | 
| >> X | EN+4 | 
| X2 | EN+6, FORGN~ | 
| X2(1 | FORGN+1 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(DTABLE+CNT | SETARR+4 |