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

Package: Radiology Nuclear Medicine

Routine: RABWRTE


Information

RABWRTE ;HISC/SM - Billing Aware Report Entry ;11/19/04 12:35

Source Information

Source file <RABWRTE.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 ^DIE  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Radiology Nuclear Medicine 2 RARTE4  RARTRPV1  

Entry Points

Name Comments DBIA/ICR reference
SIIL() ; Screen Interpreting Imaging Location
; called by DD(74,86's DIC("S")
; check file 79.1 img loc's credit method
INPUT
ELOC ;Enter Inter. Img. Location
; called from IN1^RARTE4 & NOEDIT^RARTRPV1

External References

Name Field # of Occurrence
^DIE INPUT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,$C(7),"Your signed-on or switched-to location is ",$P($G(RACCESS(DUZ,"LOC",+$G(RAMLC))),U,2),",",!?5,"which has a Credit Method of '",$P($P($P(^DD(79.1,21,0),U,3),"3:",2),";"),"'."
  • Line Location: ELOC+18
Function Call: WRITE
  • Prompt: !,?5,"This Credit Method does not allow for Interpretation work.",!
  • Line Location: ELOC+19
Function Call: WRITE
  • Prompt: !!?5,$C(7),"Your signed-on or switched-to location is ",$P($G(RACCESS(DUZ,"LOC",+$G(RAMLC))),U,2),",",!?5,"which has an Imaging Type of '",$P(^RA(79.2,+$P(RACLC0,U,6),0),U),"'."
  • Line Location: ELOC+22
Function Call: WRITE
  • Prompt: !?5,"But the exam has an Imaging Type of '"_RAXITYPE,"'."
  • Line Location: ELOC+23
Function Call: WRITE
  • Prompt: !!?5,"You may optionally switch your current location to a location that",!?5,"allows either Regular or Interpretation credit. Then that location"
  • Line Location: ELOC+26
Function Call: WRITE
  • Prompt: !?5,"will be used as the default value to this field.",!
  • Line Location: ELOC+27
Function Call: WRITE
  • Prompt: !
  • Line Location: INPUT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: INPUT+3
Routine Call
  • DIE
  • Line Location:
    • INPUT+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RARPT - [#74] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(79.1 ELOC+18
^RA(79.1 - [#79.1] ELOC+8, ELOC+15, SIIL+3, SIIL+7, SIIL+9
^RA(79.2 - [#79.2] ELOC+12, ELOC+22
^RADPT - [#70] ELOC+10, SIIL+7
^RARPT - [#74] ELOC+9

Label References

Name Line Occurrences
INPUT ELOC+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA INPUT*
>> DIE INPUT+1*
>> DR INPUT+2*
DUZ ELOC+18, ELOC+22, INPUT+2
>> RACCESS( ELOC+18, ELOC+22, INPUT+2
RACLC0 ELOC+2~, ELOC+8*, ELOC+17, ELOC+21, ELOC+22
>> RADFN ELOC+10, SIIL+4, SIIL+7
RADT0 ELOC+2~, ELOC+10*, ELOC+11, ELOC+21
>> RADTE SIIL+9
>> RADTI ELOC+10, SIIL+5, SIIL+7
RAERR ELOC+2~, ELOC+7*, ELOC+20*, ELOC+24*, ELOC+25, INPUT+2
RAIIL ELOC+2~, ELOC+9*, ELOC+15
>> RAMLC ELOC+8, ELOC+18, ELOC+22, INPUT+2
>> RARPT ELOC+9, INPUT
RAXITYPE ELOC+2~, ELOC+12*, ELOC+23
RAXITYPI ELOC+2~, ELOC+11*, ELOC+12
U ELOC+11, ELOC+12, ELOC+15, ELOC+17, ELOC+18, ELOC+21, ELOC+22, INPUT+2, SIIL+3, SIIL+7
, SIIL+9
>> Y SIIL+3, SIIL+7, SIIL+9
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All