Routine: ACDDEGP

Package	Total	Call Graph
Alcohol Chemical Dependency	4	(,SETRG)^ACDAGRG (GETCDMIS,GETREG)^ACDDEGP2 PAUSE^ACDDEU DIC^ACDFMC
VA Fileman	1	^DIR

Package	Total	Caller Graph
Alcohol Chemical Dependency	3	ACDCSD ACDDE ACDRR3

Entry Points

Name	Comments	DBIA/ICR reference
ART	; AGE RANGE TABLE
GETDEMO	; EP - GET CLIENT/PATIENT DEMOGRAPHIC INFO
CHG4	; CHANGE STATE
SETDEMO	; EP - SET CLIENT/PATIENT DEMO VARIABLES
SVDEMO	; SAVE DEMOGRAPHIC INFO
GETPAT	; EP - GET CLIENT/PATIENT
CHG5	; CHANGE TRIBE
CHG2	; CHANGE AGE
DSPDEMO	; DISPLAY AND ALLOW CHANGE OF DEMOGRAPHIC INFO
CHG1	; CHANGE SEX
GETCDMIS	; GET LAST CDMIS INFO FOR PATIENT
CHG3	; CHANGE VETERAN STATUS
GETREG	; GET PATIENT REGISTRATION INFO
DSPDIFF	; DISPLAY DIFFERENCES IN DEMO DATA VALUES
DSPPAT	; DISPLAY CLIENT/PATIENT DATA

External References

Name	Field # of Occurrence
^ACDAGRG	SETDEMO+4
SETRG^ACDAGRG	CHG2+4
GETCDMIS^ACDDEGP2	GETCDMIS+1
GETREG^ACDDEGP2	GETREG+1
PAUSE^ACDDEU	GETPAT+12
DIC^ACDFMC	GETPAT+3
^DIR	DSPPAT+19, CHG1+1, CHG2+1, CHG3+1, CHG4+1, CHG5+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,IORVON,"No AGE and/or AGE RANGE for selected patient. Cannot continue.",IORVOFF,!! Line Location: GETPAT+11
Function Call: WRITE	Prompt: !!,"You previously changed this patient's age so you must edit the",!,"demographic data each time this patient is selected." Line Location: SETDEMO+5
Function Call: WRITE	Prompt: ! Line Location: SETDEMO+6
Function Call: WRITE	Prompt: ! Line Location: DSPDEMO+4
Function Call: WRITE	Prompt: !! Line Location: DSPPAT+1
Function Call: WRITE	Prompt: "PATIENT NAME: ",ACDDFN,! Line Location: DSPPAT+2
Function Call: WRITE	Prompt: ACDDL,! Line Location: DSPPAT+5
Function Call: WRITE	Prompt: "1. SEX: ",ACDSEX,! Line Location: DSPPAT+6
Function Call: WRITE	Prompt: ?32,@ACDRVON,ACDPRD("ACDSEX"),@ACDRVOF,! Line Location: DSPPAT+7
Function Call: WRITE	Prompt: "2. AGE: ",ACDAGE,! Line Location: DSPPAT+8
Function Call: WRITE	Prompt: ?32,@ACDRVON,ACDPRD("ACDAGE"),@ACDRVOF,! Line Location: DSPPAT+9
Function Call: WRITE	Prompt: " AGE RANGE: ",ACDAGER," (",$P($T(ART+ACDAGER),";;",2),")",! Line Location: DSPPAT+10
Function Call: WRITE	Prompt: "3. IS CLIENT A VETERAN (Y/N): ",ACDVET,! Line Location: DSPPAT+11
Function Call: WRITE	Prompt: ?32,@ACDRVON,ACDPRD("ACDVET"),@ACDRVOF,! Line Location: DSPPAT+12
Function Call: WRITE	Prompt: "4. RESIDENT STATE: ",ACDSTANM,! Line Location: DSPPAT+13
Function Call: WRITE	Prompt: ?32,@ACDRVON,ACDPRD("ACDSTANM"),@ACDRVOF,! Line Location: DSPPAT+14
Function Call: WRITE	Prompt: "5. TRIBE: ",ACDTRBN,! Line Location: DSPPAT+15
Function Call: WRITE	Prompt: ?32,@ACDRVON,ACDPRD("ACDTRBN"),@ACDRVOF,! Line Location: DSPPAT+16
Function Call: WRITE	Prompt: ACDDL,! Line Location: DSPPAT+17
Function Call: WRITE	Prompt: ! Line Location: DSPPAT+22
Function Call: WRITE	Prompt: ?8,@ACDRVON,Y,". ",$S(Y=1:"SEX",Y=2:"AGE",Y=3:"IS CLIENT A VET (Y/N)",Y=4:"RESIDENT STATE",1:"TRIBE"),": ",ACDPRD(X),@ACDRVOF,! Line Location: DSPDIFF+6
Routine Call	DIR Line Location: DSPPAT+19 CHG1+1 CHG2+1 CHG3+1 CHG4+1 CHG5+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNPAT - [#9000001]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	GETPAT+6
^TMP("ACD"	GETPAT+7, SETDEMO+1, SETDEMO+3, SETDEMO+5, CHG2+5, SVDEMO+2, SVDEMO+3, SVDEMO+4, SVDEMO+5, SVDEMO+6 , SVDEMO+7, SVDEMO+8, SVDEMO+9, SVDEMO+10, SVDEMO+11, SVDEMO+12, SVDEMO+13, SVDEMO+14, SVDEMO+15, SVDEMO+16 , SVDEMO+17, SVDEMO+18, SVDEMO+19*

Label References

Name	Line Occurrences
@(	DSPPAT+23
DSPDEMO	SETDEMO+5
DSPDIFF	DSPDEMO+5, DSPPAT+3
DSPPAT	DSPDEMO+3
GETDEMO	GETPAT+8
GETREG	SETDEMO+1, GETDEMO+1
SETDEMO	GETPAT+7
SVDEMO	GETDEMO+5

Naked Globals

Name	Field # of Occurrence
^(	SETDEMO+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACDAGE	GETPAT+10, SETDEMO+4, DSPPAT+8, DSPPAT+9, CHG2+3*, SVDEMO+3
>> ACDAGER	GETPAT+10, DSPPAT+10, SVDEMO+2
>> ACDCOMM	SVDEMO+4
>> ACDDFN	GETPAT+6*, DSPPAT+2, SVDEMO+5
>> ACDDFNP	GETPAT+6*, GETPAT+7, SETDEMO+1, SETDEMO+3, SETDEMO+5, CHG2+5, SVDEMO+2, SVDEMO+3, SVDEMO+4, SVDEMO+5 , SVDEMO+6, SVDEMO+7, SVDEMO+8, SVDEMO+9, SVDEMO+10, SVDEMO+11, SVDEMO+12, SVDEMO+13, SVDEMO+14, SVDEMO+15 , SVDEMO+16, SVDEMO+17, SVDEMO+18, SVDEMO+19
>> ACDDL	DSPDEMO+1*, DSPPAT+5, DSPPAT+17
>> ACDLC	DSPDEMO+2, DSPPAT+3, DSPPAT+4
>> ACDPRD(	DSPDIFF+3, DSPDIFF+6
>> ACDPRD("ACDAGE"	DSPPAT+9
>> ACDPRD("ACDSEX"	DSPPAT+7
>> ACDPRD("ACDSTANM"	DSPPAT+14
>> ACDPRD("ACDTRBN"	DSPPAT+16
>> ACDPRD("ACDVET"	DSPPAT+12
>> ACDQ	GETPAT+1, GETPAT+9, GETPAT+13, SETDEMO+7, GETDEMO+6, DSPDEMO+3, DSPDEMO+6, DSPPAT+18, DSPPAT+21*
>> ACDRVOF	DSPPAT+7, DSPPAT+9, DSPPAT+12, DSPPAT+14, DSPPAT+16, DSPDIFF+4, DSPDIFF+6
>> ACDRVON	DSPPAT+7, DSPPAT+9, DSPPAT+12, DSPPAT+14, DSPPAT+16, DSPDIFF+4, DSPDIFF+6
>> ACDSEX	DSPPAT+6, DSPPAT+7, CHG1+1, CHG1+3*, SVDEMO+7
>> ACDSTA	CHG4+3*, SVDEMO+8
>> ACDSTACD	CHG4+4*, SVDEMO+9
>> ACDSTANM	DSPPAT+13, DSPPAT+14, CHG4+5*, SVDEMO+10
>> ACDTRB	CHG5+3*, SVDEMO+11
>> ACDTRBCD	CHG5+4*, SVDEMO+12
>> ACDTRBN	DSPPAT+15, DSPPAT+16, CHG5+5*, SVDEMO+13
>> ACDVET	DSPPAT+11, DSPPAT+12, CHG3+3*, SVDEMO+14
>> ACDY	DSPDIFF+1, DSPDIFF+4, DSPDIFF+5
>> AUPNDAYS	SVDEMO+15
>> AUPNDOB	SVDEMO+16
>> AUPNDOD	SVDEMO+17
>> AUPNLK("ALL"	GETPAT+2*, GETPAT+4!
>> AUPNPAT	SVDEMO+18
>> AUPNSEX	SVDEMO+19
DA	DSPPAT+19!, CHG1+1!, CHG2+1!, CHG3+1!, CHG4+1!, CHG5+1!
>> DIC	GETPAT+3*
>> DIC(0	GETPAT+3*
DIR	DSPPAT+19!, CHG1+1!, CHG2+1!, CHG3+1!, CHG4+1!, CHG5+1!
DIR("A"	DSPPAT+19*
DIR("B"	CHG1+1*
DIR(0	DSPPAT+19, CHG1+1, CHG2+1, CHG3+1, CHG4+1, CHG5+1
>> DIRUT	DSPPAT+20, CHG1+2, CHG2+2, CHG3+2, CHG4+2, CHG5+2
>> IORVOFF	GETPAT+11
>> IORVON	GETPAT+11
U	GETPAT+6, CHG4+4, CHG4+5, CHG5+4, CHG5+5
>> X	SETDEMO+2, SETDEMO+3, DSPPAT+23, DSPDIFF+1*, DSPDIFF+2, DSPDIFF+3, DSPDIFF+6
>> Y	GETPAT+5, GETPAT+6, DSPDIFF+2*, DSPDIFF+6, CHG2+3, CHG4+3, CHG5+3
>> Y(0	CHG1+3, CHG3+3, CHG4+4, CHG4+5, CHG5+4, CHG5+5

Customize PDF page

Package: Alcohol Chemical Dependency

Routine: ACDDEGP

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items