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 |  All
Print Page as PDF
Routine: ACDWSTA1

Package: Alcohol Chemical Dependency

Routine: ACDWSTA1


Information

ACDWSTA1 ;IHS/ADC/EDE/KML - staff report for preventions 10:19;

Source Information

Source file <ACDWSTA1.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Alcohol Chemical Dependency 4 $$DD^ACDFUNC  (,M1)^ACDWPD  H^ACDWSTAF  F^ACDWUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Alcohol Chemical Dependency 1 ACDWSTAF  

Entry Points

Name Comments DBIA/ICR reference
P2 ;Print day information and secondary providers
P ;$O on prevention date
CK ;See if selected provider matches in the prevention as
P1 ;Check provider / print visit information
F ;Form feed

External References

Name Field # of Occurrence
$$DD^ACDFUNC P1+5
^ACDWPD P+1
M1^ACDWPD P1+8
H^ACDWSTAF F+2
F^ACDWUTL F+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,ACDVNUM,")",?5,$$DD^ACDFUNC(ACDPDT),?18,$E(ACDPG,1,12),?31,"PREVENTION",!!?14,"Primary Provider:",?40,ACDPROV
  • Line Location: P1+5
Function Call: WRITE
  • Prompt: !?8,ACDPNUM,")",?14,"Provider(s) credited:",?40,$P(^DIC(16,ACDGVER,0),U)
  • Line Location: P2+4
Function Call: WRITE
  • Prompt: !?8,ACDPNUM,")",?14,"Provider(s) credited:",?40,$P(^VA(200,ACDGVER,0),U)
  • Line Location: P2+5
Function Call: WRITE
  • Prompt: !?14,"Day",?40,ACDAY
  • Line Location: P2+6
Function Call: WRITE
  • Prompt: !?14,"ACTIVITY",?40,ACDPRVA
  • Line Location: P2+7
Function Call: WRITE
  • Prompt: !?14,"LOCATION",?40,ACDLOTY
  • Line Location: P2+8
Function Call: WRITE
  • Prompt: !?14,"TARGET",?40,ACDTRG
  • Line Location: P2+9
Function Call: WRITE
  • Prompt: !?14,"OUTCOME",?40,ACDOUTC
  • Line Location: P2+10
Function Call: WRITE
  • Prompt: !?14,"NUMBER REACHED",?40,ACDNUMR
  • Line Location: P2+11
Function Call: WRITE
  • Prompt: !?14,"HOURS ",?40,ACDPCHRS,!
  • Line Location: P2+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACDPD - [#9002170.7] P1+7, P1+9, P1+11, CK+4
^ACDPD("B" P+1
^VA(200 - [#200] P2+5

Label References

Name Line Occurrences
CK P1+3
F P1+1, P2+1
P1 P+1
P2 P1+9, P1+11

Naked Globals

Name Field # of Occurrence
^( P1+7, P1+11, CK+4
^(0 P1+11, CK+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACD P+1*
>> ACD1 P1+7*, P1+9, P1+11, CK+4*
>> ACD2 P1+11*, CK+4*
>> ACD6DIG P+1
>> ACDAUF P+1
>> ACDAY P2+6
>> ACDDA P+1*
>> ACDFR P+1
>> ACDGVER P1+11, P2+5, CK+3, CK+4
>> ACDLOTY P2+8
>> ACDN01 P1+7*
>> ACDNUMR P2+11
>> ACDOK P1+3, CK+2*, CK+3*, CK+4*
>> ACDOUTC P2+10
>> ACDPCHRS P2+12, P2+13
>> ACDPDT P1+5
>> ACDPG P1+5
>> ACDPNUM P1+4*, P2+3*, P2+5
>> ACDPROV P1+5
>> ACDPROVP CK+3
>> ACDPRVA P2+7
>> ACDSUMRP P1+5, P2+5, P2+6, P2+7, P2+8, P2+9, P2+10, P2+11, P2+12
>> ACDTHP P2+13*
>> ACDTO P+1
>> ACDTRG P2+9
>> ACDV P+1*, P1+7, P1+9, P1+11, CK+4
>> ACDVNUM P1+4*, P1+5
>> DIRUT P+1, P1+2, P1+7, P1+10, P2+2, F+1, F+2
IOSL F+2
U P1+11, P2+5, CK+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All