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: ACDRL4

Package: Alcohol Chemical Dependency

Routine: ACDRL4


Information

ACDRL4 ;IHS/ADC/EDE/KML - GENERAL RETRIEVAL;

Source Information

Source file <ACDRL4.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Registration 3 EN^VALM  TERM^VALM0  (CLEAR,FULL)^VALM1  
VA Fileman 2 ^DIE  ^DIR  
Alcohol Chemical Dependency 1 SHOW^ACDRLS  
Kernel 1 DISP^XQORM1  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Alcohol Chemical Dependency 2 ACDRL  ACDRL3  

Entry Points

Name Comments DBIA/ICR reference
REMX ;
EN ; -- main entry point for ACD GENRET SELECTION ITEMS
HDRR ;sort header
HDR ; -- header code
HDRP ;print selection header
EXITR ;EP - exit report called from protocol entry
REM ;EP - remove a selected item - called from protocol entry
ADD ;EP - add an item to the selected list - called from a protocol
ADDX ;
Q ;EP - quit selections
INIT ; -- init variables and list array
HELP ; -- help code
SELECTR1 ;
BACK ;go back to listman
EXIT ; -- exit code
SELECTP ;print select - get columns
SELECTS ;select screen items
SELECTR ;sort select
EXPND ; -- expand code
HDRS ;

External References

Name Field # of Occurrence
SHOW^ACDRLS SELECTS+8
^DIE SELECTR1+2, SELECTR1+8
^DIR ADD+2, ADDX+1, SELECTR+1, SELECTP+2, REM+2, REMX+1, HELP+5
EN^VALM EN+2
TERM^VALM0 BACK+1
CLEAR^VALM1 EN+3
FULL^VALM1 ADD+5, HELP+1
DISP^XQORM1 HELP+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+2
Function Call: WRITE
  • Prompt: !,"No items selected."
  • Line Location: ADD+3
Function Call: WRITE
  • Prompt: !,"No items selected."
  • Line Location: ADD+4
Function Call: WRITE
  • Prompt: !
  • Line Location: SELECTR+1
Function Call: WRITE
  • Prompt: !!,"No sort criteria selected ... will sort by "_$S(ACDPTVS="P":"Patient Name",1:"Referral Date")_"."
  • Line Location: SELECTR1+1
Function Call: WRITE
  • Prompt: !!,"No sub-totalling will be done.",!!
  • Line Location: SELECTR1+3
Function Call: WRITE
  • Prompt: !!,"No items have been selected.",!
  • Line Location: REM+1
Function Call: WRITE
  • Prompt: !,"No items selected."
  • Line Location: REM+3
Function Call: WRITE
  • Prompt: !,"No items selected."
  • Line Location: REM+4
Function Call: WRITE
  • Prompt: !,"Item ",ACDC," ",$P(^ACDTITEM(ACDCRIT,0),U)," has not been selected.",!
  • Line Location: REM+6
Function Call: READ
  • Timeout: "visits",1:"patients"),",
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !,"Enter an S to Select an Item, and R to remove a selected item, Q to Quit",!,"the selection process. To exit the report, enter an E.",!,"Hit a Q to select all ",$S(ACDPTVS="V":"visits",1:"patients"),", bypassing all screens.",!
  • Line Location: HELP+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HELP+4
Routine Call
  • VALM
  • Line Location:
    • EN+2
Routine Call
  • DIE
  • Line Location:
    • SELECTR1+2
    • SELECTR1+8
Routine Call
  • DIR
  • Line Location:
    • ADD+2
    • ADDX+1
    • SELECTR+1
    • SELECTP+2
    • REM+2
    • REMX+1
    • HELP+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ACDRPTD - [#9002171.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ACDRPTD - [#9002171.8] SELECTS+3!, SELECTS+5*, SELECTS+6, SELECTP+4*, SELECTP+5*, SELECTP+7*, REM+8!, REM+9!
^ACDTITEM - [#9002171.3] INIT+2, INIT+11, INIT+23, INIT+35, SELECTS+2, SELECTS+3, SELECTS+5, SELECTR1+8, SELECTP+2, SELECTP+3
, REM+6, REM+10
^ACDTITEM("C" INIT+2
^ACDVPRT( REM+9

Label References

Name Line Occurrences
@( HDR+1, ADD+6, SELECTS+5
ADDX ADD+3, ADD+4
BACK ADDX+2, REMX+2, HELP+6
HDR BACK+4
INIT BACK+3
REMX REM+1, REM+3, REM+4
SELECTR ADD+1
SELECTR1 Q+1

Naked Globals

Name Field # of Occurrence
^(0 INIT+2, INIT+11, INIT+23, INIT+35, SELECTP+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACDANS SELECTS+1*, SELECTP+1*, REM+5*
>> ACDC SELECTS+1*, SELECTS+4, SELECTS+6, SELECTP+1*, SELECTP+7, REM+5*, REM+6, REM+7
>> ACDCNT SELECTS+5*
ACDCNTL EN+4!, HDR+1, INIT+2, ADD+1, ADD+6, REM+8, REM+9, Q+1
>> ACDCRIT SELECTS+1*, SELECTS+2, SELECTS+3, SELECTS+5, SELECTS+6, SELECTP+1*, SELECTP+2, SELECTP+3, SELECTP+5, SELECTP+7
, REM+5*, REM+6, REM+8, REM+9, REM+10
ACDCSEL EN+1!, EN+4!, REM+1
ACDCSEL( INIT+9, INIT+21, INIT+33, SELECTS+6*, SELECTP+7*, REM+6, REM+7!
>> ACDCTYP SELECTR+1, SELECTR1+1, SELECTR1+3, SELECTR1+4*
ACDCUT EN+4!, INIT+4*, INIT+18, INIT+30
ACDDISP EN+4!, INIT+1!, INIT+42!, EXIT+1!
ACDDISP( INIT+7, INIT+15*, INIT+19, INIT+26*, INIT+31, INIT+38*
ACDHIGH EN+4!, INIT+1!, INIT+2*, INIT+4, ADD+2, SELECTR+1
>> ACDI SELECTS+1*, SELECTP+1*, REM+5*
>> ACDIOFL INIT+3*, INIT+14, INIT+16, INIT+27
>> ACDIONL INIT+3*, INIT+16, INIT+27
ACDLIST EN+4!, INIT+1!
ACDLIST( INIT+13*, INIT+25*, INIT+37*
ACDLIST("IDX" INIT+15*
>> ACDPCNT SELECTP+1*, SELECTP+7
>> ACDPTVS HDRS+1, HDRS+2, HDRS+4, HDRR+3, HDRR+4, INIT+2, ADD+2, SELECTR+1, SELECTR1+1, SELECTR1+6
, SELECTR1+7, HELP+3
>> ACDQUIT EXITR+1*
>> ACDRPT SELECTS+3, SELECTS+5, SELECTS+6, SELECTR1+2, SELECTR1+8, SELECTP+4, SELECTP+5, SELECTP+7, REM+8, REM+9
ACDSEL EN+4!, INIT+1!
ACDSEL( INIT+2*, INIT+7, INIT+11, INIT+19, INIT+23, INIT+31, INIT+35, SELECTS+1, SELECTR1+8, SELECTP+1
, REM+5
>> ACDSORT SELECTR1+1*, SELECTR1+2, SELECTR1+6*, SELECTR1+7*, SELECTR1+8*
>> ACDSORV SELECTR1+1*, SELECTR1+6*, SELECTR1+7*, SELECTR1+8*
>> ACDTCW SELECTP+5*, SELECTP+7*, SELECTP+8
>> ACDTEXT SELECTS+2*, SELECTS+4
>> ACDVAR SELECTS+3*
C EN+4!, INIT+5*, INIT+8*, INIT+13, INIT+15, INIT+25, INIT+37, INIT+43
DA ADDX+1!, SELECTR1+2*!, SELECTR1+8*!, REM+2!, REMX+1!, HELP+5!
DIE SELECTR1+2*!, SELECTR1+8*!
DIR ADD+2!, ADDX+1!, SELECTR+1!, SELECTP+2!, REM+2!, REMX+1!, HELP+5!, BACK+5!
DIR("A" ADD+2*, ADDX+1*, SELECTR+1*, SELECTP+2*, REM+2*, REMX+1*, HELP+5*
DIR("B" SELECTP+2*
DIR(0 ADD+2*, ADDX+1*, SELECTR+1*, SELECTP+2*, REM+2*, REMX+1*, HELP+5*
>> DIRUT ADD+2*, ADD+4, SELECTP+2*, SELECTP+3, REM+2*, REM+4
DIU SELECTR1+2!, SELECTR1+8!
DIV SELECTR1+2!, SELECTR1+8!
DIW SELECTR1+2!, SELECTR1+8!
DIY SELECTR1+2!, SELECTR1+8!
DR SELECTR1+2*!, SELECTR1+8*!
>> DUOUT ADD+2, SELECTP+2, REM+2
>> E INIT+6*, INIT+13, INIT+14*, INIT+39*
>> F INIT+8*, INIT+9*, INIT+10, INIT+12, INIT+16, INIT+20*, INIT+21*, INIT+22, INIT+24, INIT+27
, INIT+32*, INIT+33*, INIT+34, INIT+36, INIT+39
I EN+4!, INIT+5*, INIT+7*, INIT+9, INIT+11, INIT+13, INIT+15, INIT+18, BACK+6!
IOF ADD+5, HELP+2
>> IORVOFF HDRS+1, HDRP+1, HDRR+2, INIT+3, INIT+12, INIT+13, INIT+24, INIT+36
>> IORVON HDRS+1, HDRP+1, HDRR+2, INIT+3, INIT+10, INIT+22, INIT+34
J EN+4!, INIT+5*, INIT+18*, INIT+19, INIT+21, INIT+23, INIT+25, INIT+26, INIT+30
K EN+4!, INIT+5*, INIT+30*, INIT+31, INIT+33, INIT+35, INIT+37, INIT+38
>> O INIT+8*, INIT+14*, INIT+16*, INIT+25, INIT+27*, INIT+37
U INIT+2, INIT+11, INIT+23, INIT+35, SELECTS+2, SELECTS+3, SELECTS+5, SELECTR1+8, SELECTP+2, SELECTP+3
, SELECTP+5, SELECTP+7, REM+6, REM+10
>> VALMBCK BACK+2*
VALMCC EXIT+2!
VALMCNT EN+5!, INIT+43*
VALMHDR EN+5!, EXIT+2!
VALMHDR(1 HDRS+1*, HDRP+1*, HDRR+1*
VALMHDR(2 HDRS+2*, HDRP+2*, HDRR+2*
VALMHDR(3 HDRS+3*, HDRP+3*, HDRR+3*
VALMHDR(4 HDRS+4*, HDRP+4*, HDRR+4*
X EN+4!, INIT+2*, INIT+8*, INIT+10*, INIT+11*, INIT+12*, INIT+13, INIT+20*, INIT+22*, INIT+23*
, INIT+24*, INIT+25, INIT+32*, INIT+34*, INIT+35*, INIT+36*, INIT+37, SELECTP+5*, REM+9*, HELP+4*
, BACK+6!
Y INIT+2*, ADD+3, SELECTS+1, SELECTR1+1, SELECTR1+3, SELECTR1+8, SELECTP+1, SELECTP+3*, SELECTP+5, SELECTP+7
, REM+3, REM+5, Q+1*, BACK+6!
Z BACK+6!
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