Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ACDVID

Package: Alcohol Chemical Dependency

Routine: ACDVID


Information

ACDVID ;IHS/ADC/EDE/KML - IDENTIFIERS FOR CDMIS VISIT FILE;

Source Information

Source file <ACDVID.m>

Entry Points

Name Comments DBIA/ICR reference
START ;
; VALUE OF Y AND THE NAKED INDICATOR SET BY FILEMAN ROUTINE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: ?ACDVID,$J(ACDVID("COMP CODE"),3)_"/"_ACDVID("COMP TYPE")_" "_ACDVID("TYPE CONTACT")_" "_ACDVID("PAT NAME")
  • Line Location: START+13
Function Call: WRITE
  • Prompt: @("$E("_DIC_"Y,0),0)")
  • Line Location: START+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACDCOMP - [#9002170.1] START+10
^DPT - [#2] START+7

Naked Globals

Name Field # of Occurrence
^(0 START+3, START+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACDVID START+4*, START+13, START+14!
ACDVID("COMP CODE" , START+10*, START+13, TYPE" , START+11*, START+13
ACDVID("PAT N AME" , START+7*, START+13
ACDVID("PAT S EX" , START+8*
ACDVID("TYPE CONTACT" , START+12*, START+13
ACDX START+5*, START+6, START+8, START+9, START+11, START+12, START+14!
ACDY START+6*, START+7, START+9*, START+10, START+14!
>> DIC START+15
U START+6, START+7, START+8, START+9, START+10, START+11, START+12
>> Y START+2
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All