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 |  Marked Items  | All
Print Page as PDF
Routine: RAWKLU1

Package: Radiology Nuclear Medicine

Routine: RAWKLU1


Information

RAWKLU1 ;HISC/GJC-physician workload statistics by wRVU or CPT ;10/26/05 14:57

Source Information

Source file <RAWKLU1.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 5 $$S^%ZTLOAD  ($$FMADD,$$FMDIFF,$$FMTE,$$NOW)^XLFDT  $$CJ^XLFSTR  $$NAME^XUAF4  $$KSP^XUPARAM  
Radiology Nuclear Medicine 2 $$EOS^RAUTL5  $$SFCTR^RAWRVUP  
Fee Basis 1 $$LASTCY^FBAAFSR  
VA FileMan 1 ^DIR  

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
Radiology Nuclear Medicine 2 RAWKLU  RAWKLU2  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point; called from RAWKLU...
XIT ;exit and kill variables
HDR ; Header for our report
STRTDT(RADATE,RAEARLY) ;Prompt the user for the starting date report verified
ENDDT(RABGDTI,RABGDTX) ;Prompt the user for the ending date report verified (no greater than a
WRITE(RAPCE,HDR,RAY,RAWDTH,RADEC) ;Write out the column headers and the data for our reports.
CFMAT ;ImgTyp Abbr^colabbr-cpt80^col-data80^colabbr-rvu132^col-data132^colabbr-rvu80^col-data80

External References

Name Field # of Occurrence
$$S^%ZTLOAD EN+18
^DIR STRTDT+12, ENDDT+18
$$LASTCY^FBAAFSR HDR+8
$$EOS^RAUTL5 EN+24, EN+29, EN+37, EN+43
$$SFCTR^RAWRVUP EN+45
$$FMADD^XLFDT ENDDT+8
$$FMDIFF^XLFDT ENDDT+8
$$FMTE^XLFDT EN+7, STRTDT+10, ENDDT+16, ENDDT+18
$$NOW^XLFDT EN+7
$$CJ^XLFSTR EN+28, HDR+10
$$NAME^XUAF4 EN+1
$$KSP^XUPARAM EN+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("No data found for this report",IOM)
  • Line Location: EN+28
Function Call: WRITE
  • Prompt: !!,"Physician Total"
  • Line Location: EN+31
Function Call: WRITE
  • Prompt: ?$P(RAFMAT,U,RAPCE),$J(RATOT,$S(RAWDTH=8:10,1:6),RADEC)
  • Line Location: EN+35
Function Call: WRITE
  • Prompt: !,$P(I(0),U),?34,$P(I(0),U,3),?49,$S($O(^RA(79.2,I,"CY",0))>0:$$SFCTR^RAWRVUP(I,DT),1:"1.00 (default)")
  • Line Location: EN+45
Function Call: WRITE
  • Prompt: !?(IOM-$L(RAHDR)\2),RAHDR
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Run Date: ",RARDATE,?68,"Page: ",RAPG
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !,"Facility: ",$E(RAFAC,1,40),?41,"Date Range: ",RABGDTX_" - "_RAENDTX
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !,?7,"***This report was prepared with "_$$LASTCY^FBAAFSR()_" Calendar Year RVU Data***"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,RALN
  • Line Location: HDR+16
Function Call: WRITE
  • Prompt: !
  • Line Location: STRTDT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: ENDDT+5
Function Call: WRITE
  • Prompt: !
  • Line Location: WRITE+9
Routine Call
  • DIR
  • Line Location:
    • STRTDT+12
    • ENDDT+18

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(79.2 - [#79.2] EN+41, EN+42, EN+45
^TMP($J EN+15, EN+16, EN+30

Label References

Name Line Occurrences
HDR EN+14, EN+24, EN+29, EN+37, EN+43
WRITE EN+20, EN+32, HDR+14
XIT EN+27, EN+28

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR STRTDT+3!, STRTDT+14!, ENDDT+5!, ENDDT+18!, ENDDT+20!
DIR("?" STRTDT+7*, STRTDT+8*, STRTDT+9*, STRTDT+10*, STRTDT+11*, ENDDT+13*, ENDDT+14*, ENDDT+15*, ENDDT+16*, ENDDT+17*
DIR("A" STRTDT+5*, STRTDT+6*, ENDDT+12*
DIR("B" STRTDT+12*, ENDDT+18*
DIR(0 STRTDT+4*, ENDDT+11*
DIROUT STRTDT+3!, STRTDT+14!, ENDDT+5!, ENDDT+20!
DIRUT STRTDT+3!, STRTDT+13, STRTDT+14!, ENDDT+5!, ENDDT+19, ENDDT+20!
DT EN+38, EN+45, ENDDT+8, ENDDT+10
DTOUT STRTDT+3!, STRTDT+14!, ENDDT+5!, ENDDT+20!
DUOUT STRTDT+3!, STRTDT+14!, ENDDT+5!, ENDDT+20!
HDR WRITE~, WRITE+6, WRITE+8, WRITE+10
I EN+39*, EN+41*, EN+42, EN+45, XIT+1!
I(0 EN+42*, EN+45
IOF HDR+1
IOM EN+3, EN+11, EN+12, EN+28, HDR+3, HDR+10, HDR+12
IOSL EN+24, EN+29, EN+37, EN+43
IOST HDR+1
RABGDTI ENDDT~, ENDDT+8, ENDDT+11
RABGDTX HDR+5, ENDDT~, ENDDT+16
RACNT EN+3*, EN+16*, EN+18, EN+28, XIT+1!
>> RACYFLG HDR+7
RADATE STRTDT~, STRTDT+10, STRTDT+12
RADEC EN+13*, EN+20, EN+23, EN+32, EN+35, XIT+1!, WRITE~, WRITE+10
RAEARLY STRTDT~, STRTDT+4, STRTDT+10
RAEND ENDDT+5~, ENDDT+8*, ENDDT+10*, ENDDT+11, ENDDT+16, ENDDT+18
>> RAENDTX HDR+5
RAFAC EN+1*, EN+2*, XIT+1!, HDR+5
RAFMAT EN+21*, EN+23, EN+33*, EN+35, XIT+1!, WRITE+7*, WRITE+8, WRITE+9, WRITE+10
RAHDR EN+4*, EN+5*, EN+6*, XIT+1!, HDR+3
RAI XIT+1!, WRITE+7*, WRITE+8, WRITE+10
RALN EN+3*, XIT+1!, HDR+16
RANGE WRITE+6*, WRITE+7, WRITE+12!
RAPCE EN+11*, EN+20, EN+23, EN+32, EN+35, XIT+1!, HDR+12~*, HDR+14, WRITE~, WRITE+8
, WRITE+9
RAPG EN+3*, XIT+1!, HDR+1, HDR+2*, HDR+4
RARDATE EN+7*, XIT+1!, HDR+4
>> RARPTYP EN+5, EN+6, EN+10, EN+11, EN+12, EN+13, HDR+10, HDR+11, HDR+12
RARSLT STRTDT+3~, STRTDT+13*, STRTDT+15, ENDDT+5~, ENDDT+19*, ENDDT+21
>> RASCLD EN+6, EN+10, EN+36
RASFACTR EN+36*, XIT+1!, HDR+13, HDR+15
RATAB XIT+1!, WRITE+8*, WRITE+10
RATMP EN+10*, XIT+1!, HDR+10
RATOT EN+16*, EN+23, EN+30*, EN+35, XIT+1!, WRITE+8*
RATRUNC EN+12*, EN+19, XIT+2!
RAWDTH EN+13*, EN+20, EN+23, EN+32, EN+35, XIT+2!, WRITE~, WRITE+10
RAX EN+14*, EN+15*, EN+16, EN+19, XIT+2!
>> RAXIT EN+15, EN+18*, EN+24*, EN+27, EN+29*, EN+37*, EN+41, EN+43*
RAY EN+16*, EN+20, EN+30*, EN+32, XIT+2!, WRITE~, WRITE+8, WRITE+10
U EN+23, EN+35, EN+45, STRTDT+13, ENDDT+19, WRITE+8, WRITE+9, WRITE+10
X STRTDT+3!, STRTDT+14!, ENDDT+5!, ENDDT+20!
Y STRTDT+3!, STRTDT+13, STRTDT+14!, ENDDT+5!, ENDDT+19, ENDDT+20!
Y(0 STRTDT+13, ENDDT+19
>> ZTSTOP EN+18*

Marked Items

Name Field # of Occurrence
$T(CFMAT+10 EN+21, EN+33
$T(CFMAT+RAI WRITE+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All