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

Package: Taxonomy

Routine: ATXCODE0


Information

ATXCODE0 ; IHS/OHPRD/TMJ - EXTENSION OF ROUTINE ATXCODE ;

Source Information

Source file <ATXCODE0.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Taxonomy 2 (DISPLAY,SHOW)^ATXCODE  ^ATXCODE1  
VA Fileman 2 ^DIC  YN^DICN  
DRG Grouper 1 $$ICDDX^ICDCODE  

Entry Points

Name Comments DBIA/ICR reference
X3
SETDIR ; ENTRY POINT - SETS HELP AND DIR FOR INIT SUBROUTINE OF ATXCODE
LOOK ; ENTRY POINT - LOOKUP USER RESPONSE; SET UTILITY NODES
ASK2 ;ASKS USER IF WANTS TO DISPLAY/PRINT RESULTS TO THIS POINT

External References

Name Field # of Occurrence
DISPLAY^ATXCODE LOOK+7
SHOW^ATXCODE ASK2+2
^ATXCODE1 LOOK+5, LOOK+7
^DIC LOOK+1
YN^DICN ASK2+2
$$ICDDX^ICDCODE LOOK+4, LOOK+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: LOOK+2
Function Call: WRITE
  • Prompt: !,$C(7),"Low and high codes of range must both start either with a letter or a number.",!
  • Line Location: LOOK+9
Function Call: WRITE
  • Prompt: !,$C(7),"Low code is higher than high code.",!
  • Line Location: LOOK+10
Function Call: WRITE
  • Prompt: !!,"A code range has yet to be selected. A display cannot be generated.",!
  • Line Location: ASK2+1
Function Call: WRITE
  • Prompt: !!,"Do you want to display the codes from a range you have already selected"
  • Line Location: ASK2+2
Function Call: WRITE
  • Prompt: !!,"A table of ranges you have selected is displayed above. You may ask for the",!,"codes in one of the ranges to be displayed.",!
  • Line Location: ASK2+4
Routine Call
  • DIC
  • Line Location:
    • LOOK+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICD9 - [#80] Classic Fileman Calls

Label References

Name Line Occurrences
ASK2 ASK2+4
X3 LOOK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ASK2+2*, ASK2+3, ASK2+4
>> ATX("HI" LOOK+5*, LOOK+7*, LOOK+8, LOOK+10
>> ATX("LOW" LOOK+4*, LOOK+5, LOOK+8, LOOK+10
>> ATX("NO DISPL AY" , LOOK+2*, LOOK+7, LOOK+9*, LOOK+10*
>> ATXA LOOK+2*
>> ATXONE LOOK+5
>> ATXTABLE ASK2+1
>> ATXTYP LOOK+4, LOOK+5, LOOK+7
DIC LOOK+1*!
DIC(0 LOOK+1*
>> DIR("?" SETDIR+1*, SETDIR+2*, SETDIR+3*, SETDIR+4*, SETDIR+5*
>> DIR("??" SETDIR+6*
>> DIR(0 SETDIR+1*
DR LOOK+1!
U LOOK+4, LOOK+7
>> Y LOOK+2, LOOK+4, LOOK+7
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Label References |  Local Variables |  All