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

Package: Surgery

Routine: SROICDL


Information

SROICDL ;ALB/SJA - Select ICD DIAGNOSIS FROM LIXICON UTILITY LIST ;12/07/2011

Source Information

Source file <SROICDL.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: 2

Package Total Caller Graph
Surgery 2 SROICD  SROPCE0A  

Entry Points

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

External References

Name Field # of Occurrence
^DIR ONE+19, MULS+13
^DIWP PR+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ONE+18
Function Call: WRITE
  • Prompt: !
  • Line Location: MUL+4
Function Call: WRITE
  • Prompt: !," ",SRLX," matches found"
  • Condition for execution: +SRLX>1
  • Line Location: MUL+4
Function Call: WRITE
  • Prompt: !
  • Line Location: MUL+10
Function Call: WRITE
  • Prompt: !,$J(SRLE,5),". ",$G(SRLTX(1))
  • Line Location: MULW+5
Function Call: WRITE
  • Prompt: !,$G(SRLHLP)
  • Line Location: MULSH+1
Routine Call
  • DIR
  • Line Location:
    • ONE+19
    • MULS+13

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^UTILITY($J PR+2!, PR+7, PR+8, PR+9!

Label References

Name Line Occurrences
$$ASK SEL+43
$$MUL ASK+3
$$MULS MUL+8, MUL+10
$$ONE ASK+3
$$TM PR+8
$$X ONE+22, MULQ+2
MULQ MUL+4, MUL+11
MULW MUL+6
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+1~, MULS+1~, MULS+16!
DIR("?" MULS+12*
DIR("??" MULS+12*
DIR("A" ONE+10*, ONE+11*, ONE+13*, ONE+15*, ONE+18*, MULS+5*, MULS+6*, MULS+8*
DIR("B" ONE+18*
DIR("PRE" MULS+11*
DIR(0 ONE+18*, MULS+13*
DIRB MULS+1~
>> DIROUT ASK+4, ONE+19, MULS+14
DIW PR+1~
DIWF PR+1~, PR+4*
DIWI PR+1~
DIWL PR+1~, PR+4*
DIWR PR+1~
DIWT PR+1~
DIWTC PR+1~
DIWX PR+1~
DN PR+1~
>> DTOUT ASK+4, ONE+19, ONE+20, MULS+14, MULS+15, MULS+16
>> DUOUT ASK+4, ONE+19, MULS+14
I PR+1~
SRFI X+1~, X+2*
SRL SEL~, SEL+43, ASK~, ASK+3, ONE~, ONE+21!, ONE+22, MUL~, MUL+8, MUL+10
, MULS~, MULQ+2, X~, X+11!, PR~, PR+2, PR+3, PR+6!, PR+9*
SRL( MULW+1, MULW+2, MULW+3, MULW+4, MULS+4, MULS+7, X+3, X+5, PR+5, PR+8*
SRL(" " ASK+2, MUL+3, PR+3
SRL(0 ONE+2, MULS+3, X+2
SRL(1 ONE+4, ONE+5, ONE+6
SRLC ONE+1~, ONE+2~, ONE+6*, ONE+7, ONE+12*, ONE+13*, ONE+14*, ONE+15, ONE+16*, PR+1~
, PR+3*, PR+6*, PR+8*, PR+9
SRLE MUL+1~, MUL+5*, MUL+6, MUL+7, MUL+8, MUL+9, MUL+10, MULW+1, MULW+2, MULW+3
, MULW+4, MULW+5
SRLEX ONE+1~, ONE+5*, ONE+7, MULW+1~, MULW+3*, MULW+4, X+1~, X+3*, X+7
SRLFI ONE+1~, ONE+2*, MULS+1~, MULS+3*
SRLHLP MULS+1~, MULS+9*, MULS+10*, MULSH+1
SRLI MULW+1~, MULW+6*, PR+1~, PR+4*, PR+5*, PR+6*, PR+7*, PR+8
SRLIEN X+1~, X+5*, X+7
SRLIT ASK+1~, ASK+2*, ONE+1~, ONE+20*, ONE+21, MUL+1, MUL+2*, MUL+5, MUL+8*, MUL+10*
, MULS+2, MULS+15*, MULQ+2, CL+1!
SRLL ASK+1~*, ASK+3, MUL+1~, MUL+2*, MUL+6, MUL+7, MUL+8, MUL+9, PR+1~, PR+2*
, PR+4
SRLLAST MULS+1~, MULS+2*, MULS+4, MULS+7
SRLMAX MUL+1~, MUL+2*, MUL+7*, MUL+8, MUL+10, MULS+1~, MULS+2*, MULS+3, MULS+6, MULS+8
, MULS+10, MULS+13
SRLN X+1~
SRLNC ONE+1~, ONE+4*, ONE+5*, ONE+7, MULW+1~, MULW+2*, MULW+4, X+1~, X+8*, X+9
, X+11*, X+12
SRLNN X+1~, X+8*, X+9*, X+10, X+11*, X+12*, X+13
SRLRN X+1~, X+10*, X+13*
SRLS MULS+1~, X+1~, X+2*, X+3, X+5, X+8, X+11
SRLSO ONE+1~, ONE+4*, ONE+7, MULW+1~*, MULW+3, MULW+4, X+1~, X+3*, X+5
SRLSP ONE+2~, ONE+3*, ONE+13
SRLSS MUL+1~, MUL+2*, MUL+3*, MUL+5, MUL+8*, MUL+9, MUL+10*, MULQ+1, MULQ+2
SRLT MULW+1~, MULW+6*
SRLTOT ASK+1~, ASK+2*, ASK+3
SRLTX ONE+2~, ONE+9, MULW+1~, MULW+5
SRLTX( ONE+13, MULW+6
SRLTX(1 ONE+7*, ONE+11, MULW+3*, MULW+4*, MULW+5
SRLX MUL+1~, MUL+3*, MUL+4, MUL+5
>> SRZZONE ONE+23*
U MUL+2*, MULS+16
X SEL~, SEL+43*, SEL+44, ASK~, ASK+1, ASK+3!*, ASK+4*, ASK+5, ONE~, ONE+20
, ONE+21, ONE+22*, ONE+23, ONE+24, MUL+1~, MUL+12, MULS~, MULS+2, MULS+15*, MULS+16
, MULQ+2*, MULQ+3, X~, X+2, X+7*, X+14, PR~, PR+2, PR+5*, TM~
, TM+1*, TM+2*, TM+3*, TM+4
Y ONE+2~, ONE+19, ONE+22, MUL~, MUL+2, MULS~, MULS+2, MULS+14, MULS+17, TM~
, TM+1*, TM+2, TM+3
Z ONE+1~, ONE+13*, PR+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All