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 |  Local Variables  | All
Print Page as PDF
Routine: ICDSELDS

Package: DRG Grouper

Routine: ICDSELDS


Information

ICDSELDS ;ALB/SJA/SS/KUM - Select ICD DIAGNOSIS FROM LEXICON UTILITY LIST ;12/07/2011

Source Information

Source file <ICDSELDS.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA FileMan 2 ^DIR  ^DIWP  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
DRG Grouper 1 ICDDSLK  

Entry Points

Name Comments DBIA/ICR reference
SEL(ICDSRL,X) ; Select from List
ASK(ICDSRL,X) ; Ask for Selection
ONE(X,ICDSRL) ; One Entry Found
MUL(ICDSRL,Y) ; Multiple Entries Found
MULW ; Write Multiple
MULS(X,Y,ICDSRL) ; Select from Multiple Entries
MULSH ; Select from Multiple Entries Help
MULQ ; Quit Multiple
X(X,ICDSRL) ; Set X and Output Array
CL ; Clear
PR(ICDSRL,X) ; Parse Array
TM(ICDX,ICDY) ; Trim Character Y - Default " "

External References

Name Field # of Occurrence
^DIR ONE+15, MULS+13
^DIWP PR+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ONE+14
Function Call: WRITE
  • Prompt: !
  • Line Location: MUL+5
Function Call: WRITE
  • Prompt: !," ",ICDLX," matches found"
  • Condition for execution: +ICDLX>1
  • Line Location: MUL+5
Function Call: WRITE
  • Prompt: !
  • Line Location: MUL+11
Function Call: WRITE
  • Prompt: !,$J(ICDSRLE,5),". ",$G(ICDLTX(1))
  • Line Location: MULW+5
Function Call: WRITE
  • Prompt: !,$G(ICDLHLP)
  • Line Location: MULSH+1
Routine Call
  • DIR
  • Line Location:
    • ONE+15
    • MULS+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^UTILITY($J PR+2!, PR+14, PR+15, PR+17!

Label References

Name Line Occurrences
$$ASK SEL+4
$$MUL ASK+9
$$MULS MUL+9, MUL+11
$$ONE ASK+8
$$TM PR+15
$$X ONE+18, MULQ+2
MULQ MUL+5, MUL+12
MULW MUL+7
PR ONE+9, MULW+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PR+1~
%D PR+1~
DIR ONE+2~, MULS+1~, MULS+17!
DIR("?" MULS+12*
DIR("??" MULS+12*
DIR("A" ONE+9*, ONE+10*, ONE+12*, ONE+13*, ONE+14*, MULS+5*, MULS+6*, MULS+8*
DIR("B" ONE+14*
DIR("PRE" MULS+11*
DIR(0 ONE+14*, MULS+13*
DIRB MULS+1~
DIROUT ASK+1~, ASK+10, ONE+15, MULS+15
DIW PR+1~
DIWF PR+1~, PR+9*
DIWI PR+1~
DIWL PR+1~, PR+9*
DIWR PR+1~
DIWT PR+1~
DIWTC PR+1~
DIWX PR+1~
DTOUT ASK+1~, ASK+10, ONE+15, ONE+16, MULS+15, MULS+16, MULS+17
DUOUT ASK+1~, ASK+10, ONE+15, MULS+15
I PR+1~
ICDCNT1 ONE+3~, ONE+12*
ICDDN PR+1~
ICDGOUP SEL+1~*, SEL+5, MULS+14*
ICDLC ONE+2~, ONE+3~, ONE+7*, ONE+8, ONE+11*, ONE+12*, ONE+13*, PR+1~, PR+6*, PR+7*
, PR+8, PR+13*, PR+15*, PR+16
ICDLEX ONE+2~, ONE+6*, ONE+8, MULW+1~, MULW+3*, MULW+4, X+1~, X+4*, X+6
ICDLFI ONE+2~, ONE+4*, MULS+1~, MULS+3*
ICDLHLP MULS+1~, MULS+9*, MULS+10*, MULSH+1
ICDLI1 MULW+1~, MULW+6*, PR+1~, PR+10*, PR+11*, PR+13*, PR+14*, PR+15
ICDLIEN X+1~, X+5*, X+6
ICDLIT ASK+2~, ASK+5*, ONE+1, ONE+2~, ONE+16*, ONE+17, MUL+1, MUL+3*, MUL+6, MUL+9*
, MUL+11*, MULS+2, MULS+16*, MULQ+2, CL+1!
ICDLL ASK+2~, ASK+3*, ASK+4*, ASK+8, ASK+9, MUL+2~, MUL+3*, MUL+7, MUL+8, MUL+9
, MUL+10, PR+1~, PR+4*, PR+5*, PR+9
ICDLLST MULS+1~, MULS+2*, MULS+4, MULS+7
ICDLMAX MUL+2~, MUL+3*, MUL+8*, MUL+9, MUL+11, MULS+1~, MULS+2*, MULS+3, MULS+6, MULS+8
, MULS+10, MULS+13
ICDLN1 X+1~
ICDLNC ONE+2~, ONE+5*, ONE+6*, ONE+8, MULW+1~, MULW+2*, MULW+4, X+1~, X+7*, X+8
, X+10*, X+11
ICDLNN X+1~, X+7*, X+8*, X+9, X+10*, X+11*, X+12
ICDLRN X+1~, X+9*, X+12*
ICDLS1 MULS+1~, X+1~, X+2*, X+4, X+5, X+7, X+10
ICDLSO ONE+2~, ONE+5*, ONE+8, MULW+1~*, MULW+3, MULW+4, X+1~, X+4*, X+5
ICDLSP ONE+3~, ONE+4*, ONE+12
ICDLSS MUL+2~, MUL+3*, MUL+4*, MUL+6, MUL+9*, MUL+10, MUL+11*, MULQ+1, MULQ+2
ICDLT2 MULW+1~, MULW+6*
ICDLTOT ASK+2~, ASK+5*, ASK+6, ASK+8, ASK+9
ICDLTX ONE+3~, ONE+9, MULW+1~, MULW+5
ICDLTX( ONE+12, MULW+6
ICDLTX(1 ONE+8*, ONE+10, MULW+3*, MULW+4*, MULW+5
ICDLX MUL+2~, MUL+4*, MUL+5, MUL+6
ICDSRFI X+1~, X+3*
ICDSRL SEL~, SEL+4, ASK~, ASK+8, ASK+9, ONE~, ONE+17!, ONE+18, MUL~, MUL+9
, MUL+11, MULS~, MULQ+2, X~, X+10!, PR~, PR+3, PR+6, PR+12!, PR+16*
ICDSRL( MULW+1, MULW+2, MULW+3, MULW+4, MULS+4, MULS+7, X+4, X+5, PR+11, PR+15*
ICDSRL(" " ASK+5, MUL+4, PR+7
ICDSRL(0 ONE+4, MULS+3, X+3
ICDSRL(1 ONE+5, ONE+6, ONE+7
ICDSRLE MUL+2~, MUL+6*, MUL+7, MUL+8, MUL+9, MUL+10, MUL+11, MULW+1, MULW+2, MULW+3
MULW+4, MULW+5
ICDX TM~, TM+1*, TM+2*, TM+3*, TM+4
ICDY TM~, TM+1*, TM+2, TM+3
U MUL+3*, MULS+17
X SEL~, SEL+2*, SEL+3*, SEL+4*, SEL+6, ASK~, ASK+3, ASK+7!, ASK+8*, ASK+9*
, ASK+10*, ASK+11, ONE~, ONE+16, ONE+17, ONE+18*, ONE+19, MUL+2~, MUL+13, MULS~
, MULS+2, MULS+14, MULS+16*, MULS+17, MULQ+2*, MULQ+3, X~, X+2, X+6*, X+13
, PR~, PR+4, PR+11*
Y ONE+3~, ONE+15, ONE+18, MUL~, MUL+3, MULS~, MULS+2, MULS+15, MULS+18
Z PR+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All