Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ACDWDRV2

Package: Alcohol Chemical Dependency

Routine: ACDWDRV2


Information

ACDWDRV2 ; IHS/ADC/EDE/KML - DRV 2 FOR RPTS FROM ^ACDTDC 10:14 NOV 17,1993 ;

Source Information

Source file <ACDWDRV2.m>

Call Graph

Call Graph Total: 14

Package Total Call Graph
Alcohol Chemical Dependency 13 PRHDR^ACD  ^ACDWK  ^ACDWQ  ^ACDWRP13  ^ACDWRP14  ^ACDWRP15  ^ACDWRP4  ^ACDWRP5  
^ACDWRP6  ^ACDWRQ  ^ACDWTDC  (ASF,C,C1,HV)^ACDWUTL  ^ACDWVIS  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Alcohol Chemical Dependency 1 ACDWUTL  

Entry Points

Name Comments DBIA/ICR reference
EOJ ;EP - EOJ FOR XBDBQUE
60 ;;AVE CLIENT STAGE BY COMPONENT
61 ;;CT'S BY HOSPITAL DAYS
62 ;;PLACEMENT DIFFERENCE VOLUME
63 ;;CT'S BY PRIMARY PROBLEM
64 ;;CT'S BY OTHER PROBLEM
65 ;;CT'S FOR OTHER PROBLEM WITHIN PRIMARY PROBLEM
G62
G63
G60
G61
DIR ;Menu
G65
G64
P2 ;
H ;EP
L ;EP TM entry
HED ;H-vars
P ;EP - PRINT REPORT
G51
G50
G57
G56
G55
G54
G59
G58
ACDV ;Visit
G53
59 ;;CT'S BY ALCOHOL/DRUG RELATED ARRESTS
58 ;;CT'S FOR AVE DAYS USED ALCOHOL WITHIN CONTACT
G52
55 ;;CT'S BY DIFFERENCE REASON
54 ;;CT'S BY RECOMMENDED PLACEMENT
57 ;;CT'S FOR AVE DAYS USED DRUGS WITHIN CONTACT
56 ;;CT'S BY GOAL TREATMENT STATUS
51 ;;CT'S BY DRUG TYPE
50 ;;CT'S WITH A DISCHARGE/AFTERCARE PLAN
53 ;;CT'S BY ACTUAL PLACEMENT
52 ;;CT'S BY T/ D/ C/ REASON

External References

Name Field # of Occurrence
PRHDR^ACD ACDWDRV2+4, DIR+2
^ACDWK ACDWDRV2+4
^ACDWQ DIR+8
^ACDWRP13 G60
^ACDWRP14 G57, G58
^ACDWRP15 G62
^ACDWRP4 G59, G61
^ACDWRP5 G50, G51, G52, G53, G54, G55, G56, G63, G64
^ACDWRP6 G65
^ACDWRQ DIR+7
^ACDWTDC P2+6
ASF^ACDWUTL H+1
C^ACDWUTL 51+1
C1^ACDWUTL 64+1
HV^ACDWUTL HED+1
^ACDWVIS P2+3
^DIR DIR+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,I," ",$P($T(@I),";",3)
  • Line Location: DIR+5
Function Call: WRITE
  • Prompt: !
  • Line Location: DIR+5
Function Call: WRITE
  • Prompt: @IOF,!,"CDMIS T/ D/ C REPORT # "_$S(ACDTG:ACDTG,1:$E(ACDTG,2,6)),!,$P(ACDH(0),U)
  • Line Location: H+1
Function Call: WRITE
  • Prompt: ?68,"PG ",ACDH(3),!,ACDH(50),$P(ACDH(0),U,2)
  • Line Location: H+1
Function Call: WRITE
  • Prompt: ?68,"PG ",ACDH(3),!,ACDH(50),$P(ACDH(0),U,2)
  • Line Location: H+1
Routine Call
  • DIR
  • Line Location:
    • DIR+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACDTDC("C" ACDV+8
^ACDVIS("B" ACDV+3, ACDV+5
^TMP("ACD" ACDV+1!, ACDV+6*, ACDV+8*, P2+2, P2+5, 50+1, 51+3, 52+1, 53+2, 54+2
, 55+1, 56+1, 57+1, 58+1, 59+1, 60+3, 61+1, 62+2, 63+1, 64+3
, 65+3, EOJ+1!, EOJ+2

Label References

Name Line Occurrences
@( P2+7, HED+2
ACDV L+3
DIR ACDWDRV2+4
H HED+2
HED P2+11
P2 P+3

Naked Globals

Name Field # of Occurrence
^( 50+1*, 51+3*, 52+1*, 53+2*, 54+2*, 55+1*, 56+1*, 57+1*, 58+1*, 59+1*
, 60+3*, 61+1*, 62+2*, 63+1*, 64+3*, 65+3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACD ACDV+3*, ACDV+5
>> ACD1 ACDV+7*, ACDV+8*, P2+4*, P2+5*, P2+6
>> ACDAAR 59+1
>> ACDADD 60+2*, 60+3
ACDAGE EOJ+4!
ACDAREA EOJ+3!
>> ACDBS 60+2
ACDBT ACDV+1, ACDV+6, ACDV+8, P2+2, P2+5, 50+1, 51+3, 52+1, 53+2, 54+2
, 55+1, 56+1, 57+1, 58+1, 59+1, 60+3, 61+1, 62+2, 63+1, 64+3
, 65+3, EOJ+1, EOJ+2, EOJ+4!
>> ACDC(1 G50*, G51*, G52*, G53*, G54*, G55*, G56*, G57*, G58*, G59*
, G60*, G61*, G62*, G63*, G64*, G65*
>> ACDC(2 G50*, G51*, G52*, G53*, G54*, G55*, G56*, G57*, G58*, G59*
, G60*, G61*, G62*, G63*, G64*, G65*
>> ACDC(3 G50*, G51*, G52*, G53*, G54*, G55*, G56*, G59*, G61*, G62*
, G63*, G64*, G65*
>> ACDC(4 G50*, G51*, G52*, G53*, G54*, G55*, G56*, G62*, G63*, G64*
, G65*
>> ACDC(5 G65*
>> ACDCBO 53+1*, 53+2, 54+1*, 54+2, 60+1*, 60+3, 62+1*, 62+2
>> ACDCOMB 62+1*, 62+2
>> ACDCOMCL 60+1
>> ACDCOMT 60+1
>> ACDCONTL 57+1, 58+1
>> ACDCS 60+2
>> ACDDA P2+3*, P2+6*
>> ACDDAP 50+1
>> ACDDFNP P2+7, 50+1, 51+3, 52+1, 53+2, 54+2, 55+1, 56+1, 59+1, 61+1
, 63+1, 64+3, 65+3
>> ACDDH 61+1
>> ACDDIF 55+1, 62+2
>> ACDDO ACDV+2*
>> ACDDT 51+2*, 51+3
>> ACDDTA( 51+2
>> ACDDUA 58+1*
>> ACDDUD 57+1*
>> ACDES 60+2
ACDFAC EOJ+3!
ACDFOLL EOJ+4!
>> ACDFR L+1, L+2*, ACDV+3, P+2, P+3*
>> ACDGA 56+1
ACDH EOJ+4!
ACDH(0 HED+1*, H+1
ACDH(10 G53, G62
ACDH(11 G54, G62
ACDH(12 G57
ACDH(13 G58
ACDH(14 G55, G62
ACDH(2 H+1
ACDH(3 H+1*
ACDH(4 H+1
ACDH(50 H+1
ACDH(51 G63, G65
ACDH(52 G64, G65
ACDH(55 G60
ACDH(56 G60
ACDH(57 G59
ACDH(58 G61
ACDH(59 G59, G61
ACDH(6 G50, G51, G52, G53, G54, G55, G56, G62, G63, G64
, G65
ACDH(60 G59
ACDH(61 G61
ACDH(7 G50, G51, G52, G53, G54, G55, G56, G63, G64, G65
ACDH(8 G50, G51, G52, G53, G54, G55, G56, G63, G64, G65
ACDH(9 G57, G58
ACDHRS EOJ+4!
ACDJOB ACDV+1, ACDV+6, ACDV+8, P2+2, P2+5, 50+1, 51+3, 52+1, 53+2, 54+2
, 55+1, 56+1, 57+1, 58+1, 59+1, 60+3, 61+1, 62+2, 63+1, 64+3
, 65+3, EOJ+1, EOJ+2, EOJ+4!
>> ACDLOC L+1, L+2*, P+2, P+3*, HED+1
ACDNW EOJ+3!
ACDNW(0 P+3*
ACDNW(1 L+1*, L+2, P+2*, P+3
ACDNW(2 L+1*, L+2, P+2*, P+3
ACDNW(3 L+1*, L+2, P+2*, P+3
ACDNW(4 L+1*, P+2*, P+3
ACDOK P2+7, EOJ+4!
ACDOPT EOJ+4!
>> ACDPLAA 53+1, 62+1
>> ACDPLAA1 53+1, 62+1
ACDPLAAL EOJ+4!
>> ACDPLAR 54+1, 62+1
>> ACDPLAR1 54+1, 62+1
ACDPLARL EOJ+4!
>> ACDPROBP 63+1, 65+3
>> ACDPS 60+2
ACDPT 64+2*, 64+3, 65+2*, 65+3, EOJ+4!
>> ACDPTA( 64+2, 65+2
ACDQ EOJ+3!
ACDQUIT ACDWDRV2+4!, DIR+5*, DIR+6, DIR+7!
>> ACDRPTS L+1, P+2
>> ACDSS 60+2
ACDSTA EOJ+3!
ACDSTAT EOJ+4!
ACDSU EOJ+3!
>> ACDSUS 60+2
>> ACDTDCR 52+1
ACDTG P+3*, P2+7, HED+2*, H+1, EOJ+4!
ACDTGSUB P+3*, 50+1, 51+3, 52+1, 53+2, 54+2, 55+1, 56+1, 57+1, 58+1
, 59+1, 60+3, 61+1, 62+2, 63+1, 64+3, 65+3, EOJ+4!
>> ACDTO L+1, L+2*, ACDV+3, P+2, P+3*
ACDTRB EOJ+3!
>> ACDV ACDV+4*, ACDV+5*, ACDV+6, ACDV+8, P2+1*, P2+2*, P2+3, P2+5
ACDVET EOJ+4!
ACDWDRV DIR+6!, EOJ+4!
ACDWDRV(2 DIR+1*, HED+1*
>> DIR("A" DIR+5*
>> DIR(0 DIR+5*
DIRUT P+1!, P+3, P2+2, P2+5, P2+10
>> DTOUT DIR+5
>> I DIR+5*
IO HED+2
IOF H+1
U HED+1, H+1
>> X DIR+5

Marked Items

Name Field # of Occurrence
$T(@ACDTG HED+1
$T(@I DIR+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All