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

Package: Surgery

Routine: SROICDGT


Information

SROICDGT ;BIR/SJA - CODE SET VERSIONING UTILITY ;26 Sep 2013 3:39 PM

Source Information

Source file <SROICDGT.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Surgery 2 $$SPACEBAR^SROICD  GETAPI^SROICDGT  
DRG Grouper 1 $$SYS^ICDEX  
Kernel 1 $$FMTE^XLFDT  
VA FileMan 1 EN^DDIOL  

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

Package Total Caller Graph
Surgery 5 SROICDGT  ^SRO(136  OTHER ASSOCIATED DIAGNOSES  OTHER POSTOP DIAGNOSIS CODES  PRIN ASSOCIATED DIAGNOSES  

Entry Points

Name Comments DBIA/ICR reference
GETAPI(SRAPP,TYPE,SRIEN) ;ICD-9/ICD-10 selection - called by input transform
; - INPUT: X := the initial user input to be searched on (REQUIRED)
; SRAPP := application name in file 130.4;.01 (REQUIRED)
; TYPE := type of call in file 130.4;.04 (REQUIRED)
; SRIEN := top level entry in file 130 (DA) used to get date to compute correct version (OPTIONAL but needs DA)
; Note: applications using this as an example will need to modify the code that uses this.
; - OUTPUT: X := the internal value to be stored in the field.
; Y := the internal value to be stored in the field
MSG(SRTEXT) ;
D1 ; -- Diagnosis ? Help
D2 ; -- Diagnosis ?? Help
D3 ; -- Diagnosis ??? Help
TR(X) ;
TEST ; -- test api calls

External References

Name Field # of Occurrence
EN^DDIOL GETAPI+36, GETAPI+41, GETAPI+42, GETAPI+43, MSG+1, D1+5, D1+6, D2+1, D2+2, D2+3
, D2+4, D2+5, D2+6, D2+7, D2+8, D3+31
$$SYS^ICDEX GETAPI+28
$$SPACEBAR^SROICD GETAPI+12
GETAPI^SROICDGT TEST+1, TEST+3, TEST+4, TEST+5, TEST+6, TEST+8, TEST+9, TEST+10, TEST+11, TEST+13
, TEST+14, TEST+15, TEST+16
$$FMTE^XLFDT GETAPI+29

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: GETAPI+13
Function Call: WRITE
  • Prompt: " ",$P(Y(0,1),U,2)," ICD-9 ",$P(Y(0,1),U,4)
  • Line Location: GETAPI+52
Function Call: WRITE
  • Prompt: !,"1"
  • Line Location: TEST+3
Function Call: WRITE
  • Prompt: !,"2"
  • Line Location: TEST+4
Function Call: WRITE
  • Prompt: !,"3"
  • Line Location: TEST+5
Function Call: WRITE
  • Prompt: !,"4"
  • Line Location: TEST+6
Function Call: WRITE
  • Prompt: !,"5"
  • Line Location: TEST+8
Function Call: WRITE
  • Prompt: !,"6"
  • Line Location: TEST+9
Function Call: WRITE
  • Prompt: !,"7"
  • Line Location: TEST+10
Function Call: WRITE
  • Prompt: !,"8"
  • Line Location: TEST+11
Function Call: WRITE
  • Prompt: !,"9 - SHOULD WORK"
  • Line Location: TEST+13
Function Call: WRITE
  • Prompt: !,"10 - SHOULD WORK"
  • Line Location: TEST+14
Function Call: WRITE
  • Prompt: !,"11 - SHOULD WORK"
  • Line Location: TEST+15
Function Call: WRITE
  • Prompt: !,"12 - SHOULD WORK"
  • Line Location: TEST+16

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(130.4 - [#130.4] GETAPI+46, GETAPI+48
^SRF - [#130] GETAPI+24, GETAPI+25

Label References

Name Line Occurrences
@( GETAPI+33
D2 D1+4
D3 D1+3
MSG GETAPI+16, GETAPI+17, GETAPI+18, GETAPI+24, GETAPI+29, GETAPI+47, GETAPI+49

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> D0 GETAPI+23
DA GETAPI+23, GETAPI+27~
DA(1 GETAPI+23
DA(2 GETAPI+23
DIC GETAPI+9~
DIE GETAPI+9~
DIROUT GETAPI+9~
DT GETAPI+25
DTOUT GETAPI+9~
DUOUT GETAPI+9~
ENTRY GETAPI+9~, GETAPI+46*, GETAPI+47, GETAPI+48
SRAPP GETAPI~, GETAPI+16, GETAPI+46, GETAPI+47
SRCODE GETAPI+9~, GETAPI+48*, GETAPI+49, GETAPI+50
SRDA GETAPI+9~, GETAPI+23*, GETAPI+24, GETAPI+25
SRDT GETAPI+9~, GETAPI+25*, GETAPI+28, GETAPI+29
SRFORMAT GETAPI+35~*, GETAPI+36
SRHLP D3+1~, D3+31
SRHLP(1 D3+2*, D3+3*
SRHLP(10 D3+16*, D3+17*
SRHLP(12 D3+18*, D3+19*
SRHLP(13 D3+20*, D3+21*
SRHLP(15 D3+22*, D3+23*, D3+24*
SRHLP(16 D3+25*, D3+26*
SRHLP(18 D3+27*, D3+28*
SRHLP(19 D3+29*, D3+30*
SRHLP(2 D3+4*, D3+5*
SRHLP(3 D3+6*, D3+7*
SRHLP(4 D3+8*, D3+9*
SRHLP(5 D3+10*, D3+11*
SRHLP(6 D3+12*, D3+13*
SRHLP(8 D3+14*, D3+15*
SRIEN GETAPI~, GETAPI+23
SRONECH GETAPI+9~, GETAPI+40*, D1+1
SRTAG GETAPI+32~*, GETAPI+33*, GETAPI+34*, GETAPI+36
SRTEXT MSG~, MSG+1
>> SRTN GETAPI+23
SRVER GETAPI+9~, GETAPI+28*, GETAPI+29, GETAPI+33, GETAPI+34, GETAPI+38, GETAPI+40, GETAPI+46, GETAPI+47, GETAPI+51
SRX GETAPI+9~
TYPE GETAPI~, GETAPI+17, GETAPI+28, GETAPI+29, GETAPI+46, GETAPI+47, GETAPI+49
U GETAPI+52
X GETAPI+12*!, GETAPI+13*, GETAPI+15!, GETAPI+16!, GETAPI+17!, GETAPI+18!, GETAPI+24!, GETAPI+29!, GETAPI+31!, GETAPI+33
, GETAPI+35, GETAPI+38*, GETAPI+40!, GETAPI+47!, GETAPI+49!, GETAPI+53*, GETAPI+54!, D1+2, D1+3, D1+4
, TR~, TR+1*, TR+2, TEST+1*, TEST+3*, TEST+4*, TEST+5*, TEST+6*, TEST+7*, TEST+9*
, TEST+10*, TEST+11*, TEST+13*, TEST+14*, TEST+15*, TEST+16*
Y GETAPI+11!, GETAPI+12!, GETAPI+31!, GETAPI+40!, GETAPI+53, GETAPI+54!
Y(0 GETAPI+52
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All