Routine: ACDRR1C

Information

ACDRR1C ;IHS/ADC/EDE/KML - PROCESS CDMIS VISITS;

Source Information

Source file <ACDRR1C.m>

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
Alcohol Chemical Dependency	1	PATIENTS^ACDRR1CB

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Alcohol Chemical Dependency	1	ACDRR1CB

Entry Points

Name	Comments	DBIA/ICR reference
PRCTD	; EP-TRANS/DISC/CLOSE ENTRY
PRCTD2	; CHECK FOR PROBLEM OF ALCOHOL OR DRUGS & SAVE ALL PROBLEMS ; do not stop when both found because need visits
PRCSETT	; SET TOBACCO HIT
PRCIIF	; EP-PROCESS IIF ENTRY
EOJ	;
PRCTD3	; CHECK FOR DRUGS
PRCFU	; FOLLOWUP
VISIT	; PROCESS ONE VISIT
PATIENTS	; PROCESS PATIENTS WITH VISITS WITHIN TIME FRAME
VISITS	; PROCESS ALL VISITS WITHIN DATE RANGE
PRCIIF2	; CHECK FOR PROBLEM OF ALCOHOL OR DRUGS & SAVE ALL PROBLEMS ; do not stop when both found because need visits
START	;
INIT	;
PRCSETA	; SET ALCOHOL HIT
PRCIIF3	; CHECK FOR DRUGS
PRCSETD	; SET DRUG HIT
PRCRE	; REOPEN
PRCIN	; INITIAL

External References

Name	Field # of Occurrence
PATIENTS^ACDRR1CB	PATIENTS+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACDIIF - [#9002170]	PRCIIF2+2, PRCIIF2+3, PRCIIF2+14, PRCIIF3+1, PRCIIF3+3
^ACDIIF("C"	PRCIIF+2
^ACDTDC - [#9002171]	PRCTD2+2, PRCTD2+3, PRCTD2+15, PRCTD3+1, PRCTD3+3
^ACDTDC("C"	PRCTD+2
^ACDVIS - [#9002172.1]	VISIT+1, VISIT+2, VISIT+3
^ACDVIS("B"	VISITS+2, VISITS+3, VISITS+5
^TMP("ACDRR1"	INIT+2!, VISIT+8, VISIT+9, VISIT+13, VISIT+18, VISIT+19, VISIT+20, PRCIIF+4, PRCIIF2+9, PRCIIF2+10* , PRCIIF2+15, PRCTD+4, PRCTD2+10, PRCTD2+11, PRCTD2+12, PRCTD2+13, PRCTD2+16, PRCTD2+17, PRCTD2+18, PRCSETA+1 , PRCSETD+1, PRCSETT+1, EOJ+4!

Label References

Name	Line Occurrences
@(	VISIT+15
EOJ	START+4
INIT	START+1
PATIENTS	START+3
PRCIIF	PRCIN+1, PRCRE+1, PRCFU+1
PRCIIF2	PRCIIF+5
PRCIIF3	PRCIIF+6
PRCSETA	PRCIIF2+11, PRCIIF2+16
PRCSETD	PRCIIF2+12, PRCIIF2+17
PRCSETT	PRCIIF2+5, PRCTD2+5
PRCTD2	PRCTD+5
PRCTD3	PRCTD+6
VISIT	VISITS+5
VISITS	START+2

Naked Globals

Name	Field # of Occurrence
^(	VISIT+8, PRCSETA+1, PRCSETD+1*
^("A"	PRCTD2+12, PRCTD2+17, PRCSETA+1*
^("D"	PRCTD2+13, PRCTD2+18, PRCSETD+1*
^(0	PRCIIF2+14, PRCIIF3+3, PRCTD2+15, PRCTD3+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACDA	EOJ+3!
ACDADAYS	PRCIIF2+6, PRCTD2+6, PRCSETA+1, EOJ+3!
ACDAGE	EOJ+3!
ACDAIEN	PRCIIF2+11, PRCIIF2+16, PRCTD2+12, PRCTD2+17, EOJ+3!
>> ACDBT	INIT+1*
>> ACDBTH	INIT+1*
ACDCMBO	EOJ+3!
ACDCODE	VISIT+11~, VISIT+12*, VISIT+13
ACDCSC	EOJ+3!
ACDCSH	EOJ+3!
ACDCSHC	EOJ+3!
ACDCSIEN	EOJ+3!
ACDCT	EOJ+3!
ACDD	EOJ+3!
ACDDATE	VISIT+11~, VISIT+12*, VISIT+13
ACDDDAYS	PRCIIF2+7, PRCTD2+7, PRCSETD+1, EOJ+3!
ACDDIEN	PRCIIF2+12, PRCIIF2+17, PRCTD2+13, PRCTD2+18, EOJ+3!
ACDDRUG	EOJ+3!
>> ACDDTHI	VISITS+3
>> ACDDTLO	VISITS+2
>> ACDET	EOJ+1*
ACDIIEN	PRCIIF+2*, PRCIIF+3, PRCIIF2+2, PRCIIF2+3, PRCIIF2+14, PRCIIF3+1, PRCIIF3+3, EOJ+3!
>> ACDJOB	INIT+1*
>> ACDPGM	VISIT+2
ACDPIEN	VISIT+6*, VISIT+7, VISIT+8, VISIT+9, VISIT+13, VISIT+18, VISIT+19, VISIT+20, PRCIIF+4, PRCIIF2+9 , PRCIIF2+10, PRCIIF2+15, PRCTD+4, PRCTD2+10, PRCTD2+11, PRCTD2+12, PRCTD2+13, PRCTD2+16, PRCTD2+17, PRCTD2+18 , PRCSETA+1, PRCSETD+1, PRCSETT+1, EOJ+3!
ACDPRIEN	EOJ+3!
ACDSEX	EOJ+3!
ACDSTBL	PRCIIF+1!, PRCTD+1!, EOJ+3!
ACDSTBL(	VISIT+19, PRCIIF3+3, PRCTD3+3
ACDTC	VISIT+4*, VISIT+5, VISIT+9, VISIT+10, VISIT+15, EOJ+3!
ACDTIEN	PRCTD+2*, PRCTD+3, PRCTD2+2, PRCTD2+3, PRCTD2+15, PRCTD3+1, PRCTD3+3, EOJ+3!
ACDTOB	PRCIIF2+4, PRCIIF2+5, PRCTD2+4, PRCTD2+5, PRCSETT+1, EOJ+3!
ACDTYPE	VISIT+11~, VISIT+12*, VISIT+13
ACDVCNT	VISITS+1, VISIT+16, EOJ+3!
ACDVDATE	VISITS+2, VISITS+3, VISITS+5, EOJ+3!
ACDVIEN	VISITS+4, VISITS+5, VISIT+1, VISIT+2, VISIT+3, VISIT+9, VISIT+13, VISIT+18, PRCIIF+2, PRCTD+2 , PRCTD2+12, PRCTD2+13, PRCTD2+17, PRCTD2+18, PRCSETA+1, PRCSETD+1, EOJ+3!
C	EOJ+2!
U	VISIT+4, VISIT+6, VISIT+12, PRCIIF2+4, PRCIIF2+6, PRCIIF2+7, PRCTD2+4, PRCTD2+6, PRCTD2+7, PRCTD2+8
X	VISIT+3, VISIT+4, VISIT+6, VISIT+12, VISIT+17, VISIT+18, VISIT+19, VISIT+20, PRCIIF2+3, PRCIIF2+4 , PRCIIF2+6, PRCIIF2+7, PRCIIF2+8, PRCIIF2+9, PRCIIF2+10, PRCIIF2+11, PRCIIF2+12, PRCIIF2+14, PRCIIF2+15, PRCIIF2+16 , PRCIIF2+17, PRCIIF3+3, PRCTD2+3, PRCTD2+4, PRCTD2+6, PRCTD2+7, PRCTD2+8, PRCTD2+9, PRCTD2+10, PRCTD2+11 , PRCTD2+12, PRCTD2+13, PRCTD2+15, PRCTD2+16, PRCTD2+17, PRCTD2+18, PRCTD3+3, EOJ+2!
Y	VISIT+17, VISIT+19, PRCIIF2+13, PRCIIF2+14, PRCIIF3+2, PRCIIF3+3, PRCTD2+14, PRCTD2+15, PRCTD3+2, PRCTD3+3 , EOJ+2!
Z	EOJ+2!

Customize PDF page

Package: Alcohol Chemical Dependency

Routine: ACDRR1C

Call Graph Total: 1

Caller Graph Total: 1