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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: APCLD7TS

Package: Patient Care Component Reports

Routine: APCLD7TS


Information

APCLD7TS ; IHS/CMI/LAB - DISPLAY IND LISTS ;

Source Information

Source file <APCLD7TS.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Registration 3 EN^VALM  TERM^VALM0  (CLEAR,FULL)^VALM1  
IHS VA Utilities 2 $$VAL^XBDIQ1  EN^XBVK  
Kernel 1 DISP^XQORM1  
Patient Care Component Reports 1 EP^APCLD7TL  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
DISP ;EP - add an item to the selected list - called from a protocol
EN ;EP -- main entry point for
HDR ; -- header code
EOJ ;EP
EXPND ; -- expand code
LAB ;
BACK ;go back to listman
DISPX ;
INIT ; -- init variables and list array
PAUSE ;EP
EXIT ; -- exit code
TAXS ;
ADDX ;
ADD ;EP - add an item to the selected list - called from a protocol
EP ;EP - CALLED FROM OPTION
HELP ; -- help code

External References

Name Field # of Occurrence
EP^APCLD7TL ADD+13
^DIR PAUSE+2, ADD+4, DISP+3, DISP+18
EN^VALM EN+1
TERM^VALM0 BACK+1
CLEAR^VALM1 EN+2
FULL^VALM1 EN+3, ADD+1, ADD+12, DISP+6
$$VAL^XBDIQ1 INIT+5, DISP+13
EN^XBVK EOJ+1
DISP^XQORM1 HELP+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !
  • Line Location: ADD+2
Function Call: WRITE
  • Prompt: !,"No taxonomy selected."
  • Line Location: ADD+5
Function Call: WRITE
  • Prompt: !,"No taxonomy selected."
  • Line Location: ADD+6
Function Call: WRITE
  • Prompt: !!,"The ",$P(^ATXLAB(APCLTAXI,0),U)," taxonomy is READ ONLY.",!,"You can not update it."
  • Line Location: ADD+10
Function Call: WRITE
  • Prompt: !!,"The ",$P(^ATXAX(APCLTAXI,0),U)," taxonomy is READ ONLY.",!,"You can not update it."
  • Line Location: ADD+11
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !,"No taxonomy selected."
  • Line Location: DISP+4
Function Call: WRITE
  • Prompt: !,"No taxonomy selected."
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: !!!,$S(APCLTAXT="L":$P(^ATXLAB(APCLTAXI,0),U),1:$P(^ATXAX(APCLTAXI,0),U))
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: !!,"Items currently defined to this taxonomy:"
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !?5,Y
  • Line Location: DISP+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: DISP+17
Routine Call
  • VALM
  • Line Location:
    • EN+1
Routine Call
  • DIR
  • Line Location:
    • PAUSE+2
    • ADD+4
    • DISP+3
    • DISP+18

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] ADD+9, ADD+11, DISP+8, DISP+12, DISP+13, DISP+14, DISP+15, DISP+16
^ATXAX("B" INIT+4
^ATXLAB - [#9002228] ADD+8, ADD+10, DISP+8, DISP+10
^ATXLAB("B" INIT+12
^LAB(60 - [#60] DISP+11

Label References

Name Line Occurrences
ADDX ADD+5, ADD+6, ADD+10, ADD+11, DISP+4, DISP+5
BACK ADDX+1, DISPX+1
EN EP+1
EOJ EN+5
HDR BACK+4
INIT BACK+3
PAUSE ADD+10, ADD+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> APCLHIGH INIT+1*, INIT+16*, ADD+3, DISP+2
APCLTAX INIT+1!
APCLTAX( INIT+3*, INIT+5*, INIT+11*
APCLTAX("IDX" INIT+6*, INIT+13*, ADD+7, DISP+7
>> APCLTAXI ADD+7*, ADD+8, ADD+9, ADD+10, ADD+11, ADD+13, DISP+7*, DISP+8, DISP+10, DISP+12
, DISP+13, DISP+14, DISP+15, DISP+16
>> APCLTAXN ADD+8*, ADD+9*
>> APCLTAXT ADD+7*, ADD+8, ADD+9, ADD+10, ADD+11, DISP+7*, DISP+8, DISP+10, DISP+12, DISP+14
>> APCLX INIT+2*, INIT+3, INIT+4, INIT+9*, INIT+11, INIT+12
>> C INIT+1*, INIT+7*, INIT+14*, INIT+16
DIR PAUSE+2!, BACK+5!, ADD+4!, DISP+3!, DISP+18!
DIR("A" PAUSE+2*, ADD+3*, DISP+2*, DISP+18*
DIR(0 PAUSE+2*, ADD+3*, DISP+2*, DISP+18*
>> DIRUT PAUSE+2*, ADD+4*, ADD+6, DISP+3*, DISP+5
>> DUOUT PAUSE+2, ADD+4, DISP+3
>> H DISP+15*, DISP+16
I INIT+4*, INIT+5, INIT+6, INIT+12*, INIT+13, BACK+6!
IO PAUSE+1
IO(0 PAUSE+1
IOF EN+4, ADD+12, DISP+6
IOST PAUSE+1
>> J INIT+2*, INIT+3, INIT+5, INIT+6, INIT+9*, INIT+10*, INIT+11, INIT+13
>> K INIT+9*
>> T INIT+2*, INIT+9*
U INIT+6, INIT+13, ADD+7, ADD+8, ADD+9, ADD+10, ADD+11, DISP+7, DISP+8, DISP+11
, DISP+12, DISP+13, DISP+14, DISP+16
>> VALMBCK BACK+2*
>> VALMCNT INIT+16*
>> VALMHDR(1 HDR+1*
>> VALMHDR(2 HDR+2*
X HELP+1*, BACK+6!, DISP+10*, DISP+11, DISP+12*, DISP+13, DISP+14*, DISP+15
Y INIT+2*, INIT+3, INIT+9*, INIT+11, BACK+6!, ADD+5, ADD+7, DISP+4, DISP+7, DISP+11*
Z INIT+2*, INIT+9*, BACK+6!

Marked Items

Name Field # of Occurrence
$T(@T+J INIT+2
$T(@T+K INIT+9
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All