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 |