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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACDDE2

Package: Alcohol Chemical Dependency

Routine: ACDDE2


Information

ACDDE2 ;IHS/ADC/EDE/KML - GATHER MAINLINE INFO;

Source Information

Source file <ACDDE2.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
VA Fileman 3 ^%DTC  D^DIQ  ^DIR  
Alcohol Chemical Dependency 2 (HDR,PAUSE)^ACDDEU  DIC^ACDFMC  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Alcohol Chemical Dependency 4 ACDDE  ACDDE3  ACDDEM  ACDPSOT  

Entry Points

Name Comments DBIA/ICR reference
GETVDAT2 ; EP - GET SINGLE VISIT DATE
GETVDATE ; EP - GET VISIT DATE (IF OLD LOOP UNTIL ACCEPTED OR REJECTED)
GETPROV ; EP - GET PRIMARY PROVIDER
GETTC ; EP - GET TYPE CONTACT
GETCOMPT ; EP - GET COMPONENT TYPE
INIT ; EP
GETCOMP ; EP - GET COMPONENT
GETCOMPC ; EP - GET COMPONENT CODE
HELP ; EP - HELP FOR VISIT DATE

External References

Name Field # of Occurrence
^%DTC GETVDATE+3
HDR^ACDDEU INIT+12
PAUSE^ACDDEU GETVDAT2+15
DIC^ACDFMC GETCOMPC+4, GETPROV+6
D^DIQ GETVDAT2+6, GETVDAT2+13
^DIR GETCOMPT+4, GETTC+5, GETVDATE+4, GETVDAT2+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"CLIENT SERVICE record for month & year only. Using ",Y(0),".",!
  • Line Location: GETVDAT2+14
Routine Call
  • DIR
  • Line Location:
    • GETCOMPT+4
    • GETTC+5
    • GETVDATE+4
    • GETVDAT2+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^ACDCOMP - [#9002170.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(1 - [#3.5] INIT+7
^%ZIS(2 - [#3.2] INIT+7
^ACDCOMP - [#9002170.1] GETCOMPC+2
^ACDF5PI - [#9002173] INIT+4
^ACDVIS - [#9002172.1] GETCOMPT+3, GETTC+3
^ACDVIS("A" GETCOMPT+2, GETTC+3
^DISV( GETCOMPC+2, GETPROV+3
^TMP("ACD" INIT+10!, GETPROV+2, GETPROV+11*, GETTC+2, GETTC+9*, GETVDATE+6!, GETVDAT2+3, GETVDAT2+18*
^TMP($J INIT+10!
^VA(200 - [#200] GETPROV+3

Label References

Name Line Occurrences
GETCOMP INIT+13
GETCOMPC GETCOMP+2
GETCOMPT GETCOMP+4
GETVDAT2 GETVDATE+1

Naked Globals

Name Field # of Occurrence
^("PRI PROV" GETPROV+2
^("TYPE CONTACT" GETTC+2
^("VISIT DATE" GETVDAT2+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACDCOMC INIT+11*, GETCOMP+1*, GETCOMPC+6*
>> ACDCOMCL INIT+11*, GETCOMPC+6*
>> ACDCOMT INIT+11*, GETCOMP+1*, GETCOMPT+7*
>> ACDCOMTL INIT+11*, GETCOMP+1*, GETCOMPT+7*
>> ACDCONT GETTC+8*, GETVDAT2+4, GETVDAT2+5, GETVDAT2+11
>> ACDCONTL GETTC+8*, GETTC+9
>> ACDDE INIT+1*
>> ACDDOV GETVDAT2+17*
>> ACDDUZZ INIT+9*
>> ACDIO GETCOMPC+7*
ACDNODEF GETTC+4!, GETVDAT2+8!
>> ACDPGM INIT+5*
>> ACDPROV GETPROV+8*
>> ACDPROVN GETPROV+9*, GETPROV+11
>> ACDQ INIT+1*, GETCOMP+3, GETCOMPC+1*, GETCOMPC+8*, GETCOMPT+1*, GETCOMPT+8*, GETPROV+1*, GETPROV+12*, GETTC+1*, GETTC+10*
, GETVDATE+1, GETVDATE+7*, GETVDAT2+1*, GETVDAT2+19*
>> ACDRVOF INIT+7*, INIT+8*
>> ACDRVON INIT+7*, INIT+8*
>> ACDVDTE GETVDAT2+17*
>> ACDVDTI GETVDATE+2, GETVDAT2+17*, GETVDAT2+18
>> ACDY GETVDAT2+13*
DA GETCOMPT+4!, GETTC+5!, GETVDATE+4!, GETVDAT2+9!
>> DIC GETCOMPC+3*, GETPROV+6*
>> DIC("A" GETCOMPC+3*, GETPROV+6*
>> DIC("B" GETCOMPC+2*, GETPROV+2*, GETPROV+3*
>> DIC("S" GETCOMPC+3*, GETPROV+6*
>> DIC(0 GETCOMPC+3*, GETPROV+6*
DIR GETCOMPT+4!, GETTC+5!, GETVDATE+4!, GETVDAT2+9!
DIR("A" GETCOMPT+4*, GETTC+5*, GETVDATE+4*, GETVDAT2+9*
DIR("B" GETCOMPT+3*, GETTC+2*, GETTC+3*, GETTC+4!, GETVDATE+4*, GETVDAT2+6*, GETVDAT2+8!
DIR(0 GETCOMPT+4*, GETTC+5*, GETVDATE+4*, GETVDAT2+9*
>> DIRUT GETCOMPT+5, GETTC+6, GETVDAT2+10
DT GETVDATE+2
DUZ GETCOMPC+2, GETPROV+3
DUZ(2 INIT+3, INIT+4, INIT+5, INIT+9
IO INIT+6, INIT+7
IOF INIT+2
U INIT+7, GETCOMPC+2, GETCOMPC+7, GETCOMPT+3, GETPROV+3, GETPROV+9, GETTC+3
>> X INIT+7*, GETPROV+3*, GETVDATE+4, GETVDAT2+3*, GETVDAT2+4, GETVDAT2+5, GETVDAT2+6*
>> X1 GETVDATE+2*
>> X2 GETVDATE+2*
Y INIT+7*, GETCOMPC+2*, GETCOMPC+5, GETCOMPC+6, GETCOMPT+2*, GETCOMPT+3, GETCOMPT+6, GETCOMPT+7, GETPROV+3*, GETPROV+7
, GETPROV+8, GETPROV+9, GETTC+3*, GETTC+7, GETTC+8, GETVDATE+5, GETVDAT2+6*, GETVDAT2+11, GETVDAT2+12*, GETVDAT2+13*
, GETVDAT2+15~, GETVDAT2+17
Y(0 GETCOMPC+6, GETCOMPC+7, GETCOMPT+7, GETTC+8, GETVDAT2+13*, GETVDAT2+14, GETVDAT2+17
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All