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

Package: Radiology Nuclear Medicine

Routine: RABWUTL


Information

RABWUTL ;HISC/SM - Billing Aware utilities ; 04 Apr 2014 7:07 AM

Source Information

Source file <RABWUTL.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
DRG Grouper 1 $$ICDDX^ICDCODE  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Radiology Nuclear Medicine 2 RAORD3  RAORD6  

Entry Points

Name Comments DBIA/ICR reference
ODX(RA) ;ordering diagnosis
WRTDX ; write DX and Clin. Inds.
GETDX ; get DX and Clin. Indicators from file 75.1

External References

Name Field # of Occurrence
$$ICDDX^ICDCODE WRTDX+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Ordering Diagnoses:"
  • Line Location: WRTDX+2
Function Call: WRITE
  • Prompt: !?2,$P($$ICDDX^ICDCODE(+RAX(I)),U,2),?10,$P($$ICDDX^ICDCODE(+RAX(I)),U,4)
  • Line Location: WRTDX+9
Function Call: WRITE
  • Prompt: !,?10,"Clinical Indicator(s): "
  • Line Location: WRTDX+14
Function Call: WRITE
  • Prompt: $S(J=1:"SC",J=2:"AO",J=3:"IR",J=4:"SWAC",J=5:"MST",J=6:"HNC",J=7:"CV",1:"SHAD")
  • Line Location: WRTDX+15
Function Call: WRITE
  • Prompt: ","
  • Condition for execution: $P(X,U,J+1,8)["1"
  • Line Location: WRTDX+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RAO(75.1 - [#75.1] ODX+4, GETDX+1, GETDX+3, GETDX+5

Label References

Name Line Occurrences
GETDX ODX+5
WRTDX ODX+6

Naked Globals

Name Field # of Occurrence
^("BA" GETDX+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> I GETDX+2*, GETDX+3*, GETDX+5, WRTDX+3*, WRTDX+4*, WRTDX+9, WRTDX+12
>> J WRTDX+15*
RA ODX~, ODX+4, GETDX+1, GETDX+3, GETDX+5
>> RA1 GETDX+2*, GETDX+4*, GETDX+5
>> RA751 ODX+4*
>> RAORD0 ODX+4
>> RAX( GETDX+5*, WRTDX+4, WRTDX+9, WRTDX+12
>> RAX(0 WRTDX+1
>> RAX(1 GETDX+1*
U WRTDX+9, WRTDX+12, WRTDX+15
>> X WRTDX+12*, WRTDX+13, WRTDX+15
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All