Routine: DGREGTE2

Information

DGREGTE2 ;ALB/BAJ,TDM - Temporary & Confidential Address Support Routine; 02/27/2006 ; 12/24/08 12:12pm

Source Information

Source file <DGREGTE2.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Registration	3	($$CNTRYI,$$FORIEN)^DGADDUTL $$CNTY^DGREGAZL ^DGREGTE2
VA Fileman	2	GETS^DIQ ^DIR

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
Registration	2	DGREGTE2 DGREGTED

Entry Points

Name	Comments	DBIA/ICR reference
GETOLD(DGCMP,DFN,TYPE)	;populate array with existing address info
FLDDAT	; Table of field values STRUCTURE --> Description;;Type;Variable Name;Field Number
INPT1(DFN,FORGN,PSTR)	; address input prompts
INIT	; initialize variables ; This tag reads the table at FLDDAT (below) to set relationship between ; variables and Field numbers. ; ; Set up array of fields needed
SURE()	; Are you sure prompt
SKIP(DGN,DGINPUT)	; determine whether or not to skip the prompt
FLDPRMPT	;Table of prompts and responses STRUCTURE --> Description;;Field;Old Value;New Value;Response Code

External References

Name	Field # of Occurrence
$$CNTRYI^DGADDUTL	GETOLD+15
$$FORIEN^DGADDUTL	GETOLD+8
$$CNTY^DGREGAZL	GETOLD+20
^DGREGTE2	INIT+6, INIT+11
GETS^DIQ	GETOLD+13
^DIR	SURE+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	GETOLD+6
^HL(779.004 - [#779.004]	GETOLD+7

Label References

Name	Line Occurrences
$$INPT1	GETOLD+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CCIEN	GETOLD+1~, GETOLD+6*, GETOLD+7, GETOLD+8, GETOLD+15
CCNTRY	GETOLD+1~, GETOLD+7*
CFORGN	GETOLD+1~, GETOLD+2, GETOLD+8, GETOLD+10, GETOLD+17
CFSTR	GETOLD+1~, GETOLD+10*, GETOLD+13, GETOLD+14
COUNTRY	GETOLD+1~, GETOLD+15*, GETOLD+16
DFN	GETOLD~, GETOLD+6, GETOLD+10, GETOLD+13, GETOLD+14, GETOLD+18, GETOLD+19, INPT1~
DGCIEN	GETOLD+1~, GETOLD+18*, GETOLD+20
DGCMP	GETOLD~
DGCMP("OLD"	GETOLD+14, GETOLD+16, GETOLD+22*
DGCNTY	GETOLD+1~, GETOLD+20, GETOLD+21, GETOLD+22
DGCURR	GETOLD+1~
DGCURR(2	GETOLD+14, GETOLD+18, GETOLD+19
DGINPUT	SKIP~
DGINPUT(	SKIP+3, SKIP+5
DGN	SKIP~, SKIP+4, SKIP+6
DGST	GETOLD+1~, GETOLD+19*, GETOLD+20
DIR	SURE+1~
DIR("A"	SURE+4*
DIR("B"	SURE+3*
DIR(0	SURE+2*
DIRUT	SURE+1~
DTOUT	SURE+1~
DUOUT	SURE+1~
>> FCITY	INPT1+4, INPT1+5, INPT1+6
>> FCNTRY	GETOLD+16, INPT1+4
>> FCOUNTY	GETOLD+18, GETOLD+22, INPT1+4, INPT1+5
FDESC	GETOLD+1~, GETOLD+2*
FNODE	GETOLD+1~, GETOLD+4*, GETOLD+6
FNUM	INIT+5~, INIT+7*, INIT+8
FORGN	INPT1~, INPT1+6
FPECE	GETOLD+1~, GETOLD+5*, GETOLD+6
>> FPHONE	INPT1+4, INPT1+5, INPT1+6
>> FPROV	INPT1+4, INPT1+6
>> FPSTAL	INPT1+4, INPT1+6
>> FSLINE1	INPT1+4, INPT1+5, INPT1+6, SKIP+3
>> FSLINE2	INPT1+4, INPT1+5, INPT1+6, SKIP+4, SKIP+5
>> FSLINE3	INPT1+4, INPT1+5, INPT1+6, SKIP+6
>> FSTATE	GETOLD+19, INPT1+4, INPT1+5
FSTR	INPT1+1~, INPT1+5, INPT1+6, INPT1+7
FTYPE	INIT+5~, INIT+7*, INIT+8
>> FZIP	INPT1+4, INPT1+5
I	INIT+5~, INIT+6, INIT+10!, INIT+11
L	GETOLD+1~, GETOLD+14*
NULL	SKIP+1~, SKIP+3, SKIP+4, SKIP+5, SKIP+6
PSTR	INPT1~, INPT1+4*
RFLD	INIT+5~, INIT+12*, INIT+13
>> RPROC(	INIT+13*
SKIP	SKIP+1~, SKIP+2, SKIP+4, SKIP+6*, SKIP+7
T	GETOLD+1~, GETOLD+14, INIT+5~, INIT+6, INIT+7, INIT+10!, INIT+11*, INIT+12, INIT+13
TYPE	GETOLD~, GETOLD+2, GETOLD+4, GETOLD+5, INIT+8
U	GETOLD+6, GETOLD+22
VNAME	INIT+5~, INIT+7*, INIT+8
X	SURE+1~
Y	SURE+1~, SURE+6

Customize PDF page

Package: Registration

Routine: DGREGTE2

Call Graph Total: 5

Caller Graph Total: 2