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

Package: Event Capture

Routine: ECRPROC


Information

ECRPROC ;ALB/CMD - Event Code Procedure Used Report ;09/24/21 20:47

Source Information

Source file <ECRPROC.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Event Capture 2 $$GETPPRV^ECPRVMUT  $$MOD^ECUTL  
VA FileMan 2 DD^%DT  (NOW,YX)^%DTC  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  

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

Package Total Caller Graph
Event Capture 1 ECRRPT2  

Entry Points

Name Comments DBIA/ICR reference
EN ;Main entry point for report
PROCESS ;Get data for the report
SETTMP ;Set data into TMP global for print
EXPORT ;Convert data to exportable format
PRINT ;output report
PAGE ; end of page
TOTPRV ; Total line for Provider
TOTDSS ; Total line for DSS UNIT
HDR ; print heading
FOOTER ;print page footer
PRTMOD ;Print CPT Modifier
ECPCHK(PROC,ECPROC) ;Procedure Code check
EXIT ;common exit point

External References

Name Field # of Occurrence
DD^%DT PRINT+5
NOW^%DTC PRINT+5
YX^%DTC EN+2
$$GETPPRV^ECPRVMUT PROCESS+15
$$MOD^ECUTL PROCESS+32
$$CPT^ICPTCOD PROCESS+27, ECPCHK+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,?12,"No data to report for the date range selected.",!!
  • Line Location: PRINT+7
Function Call: WRITE
  • Prompt: !!,"Location: "_ECLOC
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: !,"DSS Unit: "_ECUNIT
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: !!,ECPROVN,!,?3,ECCAT,!
  • Line Location: PRINT+18
Function Call: WRITE
  • Prompt: !,?6,$J(PCPT_" ",6),$J(PCODE_" ",6),?18,$E(PCNAM,1,40),?70,$J(UNIQ,6),?95,$J(VOL,6)
  • Line Location: PRINT+25
Function Call: WRITE
  • Prompt: !,?70,"--------",?95,"--------",!,"Totals for ",ECPROVN,?70,$J(PROVUNIQ,6),?95,$J(PROVOL,6),!
  • Line Location: TOTPRV+1
Function Call: WRITE
  • Prompt: !!,?70,"--------",?95,"--------",!,?70,"--------",?95,"--------"
  • Line Location: TOTDSS+1
Function Call: WRITE
  • Prompt: !,"Grand Totals for ",ECUNIT,?70,$J($P(DSSTOT,U),6),?95,$J($P(DSSTOT,U,2),6)
  • Line Location: TOTDSS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: TOTDSS+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: $G(PAGE)
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $Y
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?49,"EVENT CAPTURE PROCEDURE SUMMARY REPORT",?122,"Page:",PAGE,!,?49,"FROM "_$P(ECDATE,"^")_" TO "_$P(ECDATE,"^",2),!,?49,"Run Date : ",ECRDT
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!?3,"Category",!,?6,"CPT",?12,"Proc",?18,"Procedure Name"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: ?70,"# UNIQUES",?95,"Volume*"
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !?6,"Code",?12,"Code",!?10,"CPT Modifier (volume)",!
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: DASH
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!?4,"*Volume totals may represent days, minutes, numbers of procedures"
  • Line Location: FOOTER+1
Function Call: WRITE
  • Prompt: " and/or a combination of these."
  • Line Location: FOOTER+2
Function Call: WRITE
  • Prompt: !?4,"UNIQUES totals may present the number of times a provider has used the given procedure code on a patient"
  • Line Location: FOOTER+3
Function Call: WRITE
  • Prompt: !?4,"during the selected time period. The Grand Total number of UNIQUES may not equal the sum of UNIQUES, as a "
  • Line Location: FOOTER+4
Function Call: WRITE
  • Prompt: !?4,"patient may have been seen by more than one Provider."
  • Line Location: FOOTER+5
Function Call: WRITE
  • Prompt: !?10,MODSTR_" ("_^TMP("ECRPROC",$J,ECLOC,ECUNIT,ECPROV,ECCAT,ECPRC,"MOD",MODSTR)_")"
  • Line Location: PRTMOD+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^EC(725 - [#725] PROCESS+23, PROCESS+25, PROCESS+29, ECPCHK+3
^EC(726 - [#726] PROCESS+21
^ECH - [#721] PROCESS+14, PROCESS+32
^ECH("AC" PROCESS+11, PROCESS+12
^ECH("APRV" PROCESS+13
^TMP("ECRPROC" EN+3!, EN+5!, EN+6!, PROCESS+10!, SETTMP+4*, SETTMP+5*, SETTMP+11*, SETTMP+14*, SETTMP+15*, SETTMP+20*
, SETTMP+21*, SETTMP+24*, SETTMP+30*, SETTMP+33*, EXPORT+5, EXPORT+6, EXPORT+7, EXPORT+8, EXPORT+10, EXPORT+11
, EXPORT+16, EXPORT+18, PRINT+7, PRINT+9, PRINT+11, PRINT+13, PRINT+14, PRINT+16, PRINT+19, PRINT+20
, HDR+8, PRTMOD+2, PRTMOD+4, PRTMOD+5, EXIT+1!
^TMP("ECTMP" EN+3!, EN+5!, EN+6!, SETTMP+2, SETTMP+12*, SETTMP+16*, SETTMP+17*, SETTMP+18, SETTMP+19, SETTMP+23
, SETTMP+31*, SETTMP+32*, EXIT+1!
^TMP($J EN+3!, EXPORT+3!, EXPORT+4*, EXPORT+15*, EXPORT+16*, EXPORT+20*

Label References

Name Line Occurrences
$$ECPCHK PROCESS+18
EXIT PRINT+7
EXPORT EN+5
FOOTER PRINT+29, PAGE+1
HDR PRINT+7, PRINT+8
PAGE PRINT+27, PRTMOD+6
PRINT EN+6
PROCESS EN+4
PRTMOD PRINT+26
SETTMP PROCESS+33
TOTDSS PRINT+29
TOTPRV PRINT+28

Naked Globals

Name Field # of Occurrence
^(0 PROCESS+21

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% PRINT+1~, PRINT+5
%H EN+1~, EN+2*
CNT EXPORT+1~, EXPORT+4*, EXPORT+15*, EXPORT+16, EXPORT+20
CPTMOD PRTMOD+1~
DASH PRINT+2~, PRINT+3*, HDR+7
DATA EXPORT+11*, EXPORT+12, PRINT+2~, PRINT+20*, PRINT+21
DSSTOT PRINT+2~, PRINT+13*, TOTDSS+2
EC PROCESS+2~, PROCESS+14*, PROCESS+16, PROCESS+17, PROCESS+19
EC725 PROCESS+3~, PROCESS+25*, PROCESS+29*
ECC PROCESS+1~, PROCESS+19*, PROCESS+21
ECCAT EXPORT+1~, EXPORT+8*, EXPORT+10, EXPORT+11, EXPORT+15, EXPORT+16, EXPORT+18, PRINT+1~, PRINT+16*, PRINT+18
, PRINT+19, PRINT+20, PRTMOD+2, PRTMOD+4, PRTMOD+5
ECCN PROCESS+1~, PROCESS+21*, SETTMP+4, SETTMP+5, SETTMP+11, SETTMP+20, SETTMP+21, SETTMP+24, SETTMP+30
ECCPT PROCESS+1~, PROCESS+23*, PROCESS+26, PROCESS+27*, PROCESS+28, PROCESS+29, EXPORT+1~, PRINT+1~, PRINT+23*
ECD PROCESS+1~
ECDA PROCESS+1~, PROCESS+12*, PROCESS+13, PROCESS+14, PROCESS+15, PROCESS+32
ECDATE PROCESS+2~, PRINT+6, HDR+3
ECDSS EXPORT+1~
>> ECDSSU( PROCESS+8, PROCESS+9
ECDUNIT EXPORT+2~, EXPORT+6*, EXPORT+7, EXPORT+8, EXPORT+10, EXPORT+11, EXPORT+15, EXPORT+16, EXPORT+18
ECED PROCESS+4*, PROCESS+10*, PROCESS+11, PROCESS+27, PRINT+1~, PRINT+6*
ECFILE PROCESS+1~, PROCESS+22*, PROCESS+23, PROCESS+24, PROCESS+25, PROCESS+28, PROCESS+29
ECL PROCESS+3~, PROCESS+19*, PROCESS+20, SETTMP+2, SETTMP+4, SETTMP+5, SETTMP+11, SETTMP+12, SETTMP+14, SETTMP+15
, SETTMP+16, SETTMP+17, SETTMP+18, SETTMP+19, SETTMP+20, SETTMP+21, SETTMP+23, SETTMP+24, SETTMP+30, SETTMP+31
, SETTMP+32, SETTMP+33, EXPORT+1~
ECLOC EXPORT+5*, EXPORT+6, EXPORT+7, EXPORT+8, EXPORT+10, EXPORT+11, EXPORT+15, EXPORT+16, EXPORT+18, PRINT+1~
, PRINT+9*, PRINT+10, PRINT+11, PRINT+13, PRINT+14, PRINT+16, PRINT+19, PRINT+20, PRTMOD+2, PRTMOD+4
, PRTMOD+5
ECLOC( PROCESS+6, PROCESS+7
ECMOD PROCESS+3~, PROCESS+31!, PROCESS+32, SETTMP+7, SETTMP+26
ECMOD( SETTMP+8, SETTMP+9, SETTMP+27, SETTMP+28
ECMODF PROCESS+3~, PROCESS+31*, PROCESS+32*
ECP PROCESS+2~, PROCESS+17*, PROCESS+18, PROCESS+22, PROCESS+23, PROCESS+25, PROCESS+29
ECPAT PROCESS+2~, PROCESS+16*, SETTMP+2, SETTMP+12, SETTMP+18, SETTMP+19, SETTMP+23, SETTMP+31
ECPDX PROCESS+3~, PROCESS+28*, PROCESS+29*, SETTMP+2, SETTMP+4, SETTMP+5, SETTMP+11, SETTMP+12, SETTMP+16, SETTMP+17
, SETTMP+18, SETTMP+19, SETTMP+20, SETTMP+21, SETTMP+23, SETTMP+24, SETTMP+30, SETTMP+31, SETTMP+32
ECPI PROCESS+2~, PROCESS+23*, PROCESS+27*, PROCESS+28
ECPN PROCESS+1~, PROCESS+24*, PROCESS+25*, PROCESS+28*
ECPRC EXPORT+1~, EXPORT+10*, EXPORT+11, EXPORT+14, EXPORT+16, EXPORT+18, PRINT+1~, PRINT+19*, PRINT+20, PRINT+22
, PRINT+23, PRTMOD+2, PRTMOD+4, PRTMOD+5
ECPRCN PRINT+1~, PRINT+23*
ECPROC PROCESS+18, ECPCHK~
ECPROC( ECPCHK+5
ECPROV PRINT+1~, PRINT+14*, PRINT+16, PRINT+17, PRINT+19, PRINT+20, PRTMOD+2, PRTMOD+4, PRTMOD+5
ECPROVN PROCESS+2~, PROCESS+15*, PRINT+1~, PRINT+17*, PRINT+18, TOTPRV+1
ECPRV PROCESS+2~, PROCESS+15*
ECPRVN PROCESS+2~, PROCESS+15, SETTMP+4, SETTMP+5, SETTMP+11, SETTMP+12, SETTMP+19, SETTMP+20, SETTMP+21, SETTMP+23
, SETTMP+24, SETTMP+30, SETTMP+31
>> ECPTYP EN+5
ECRDT EN+1~, EN+2*, HDR+3
ECSD PROCESS+4*, PROCESS+10*, PROCESS+11*, PROCESS+12, PRINT+1~, PRINT+6*
ECU PROCESS+13, EXPORT+1~
ECUN EXPORT+2~, EXPORT+7*, EXPORT+8, EXPORT+10, EXPORT+11, EXPORT+15, EXPORT+16, EXPORT+18
ECUNIT PROCESS+3~, PROCESS+19*, PROCESS+20, SETTMP+2, SETTMP+4, SETTMP+5, SETTMP+11, SETTMP+12, SETTMP+14, SETTMP+15
, SETTMP+16, SETTMP+17, SETTMP+18, SETTMP+19, SETTMP+20, SETTMP+21, SETTMP+23, SETTMP+24, SETTMP+30, SETTMP+31
, SETTMP+32, SETTMP+33, PRINT+1~, PRINT+11*, PRINT+12, PRINT+13, PRINT+14, PRINT+16, PRINT+19, PRINT+20
, TOTDSS+2, PRTMOD+2, PRTMOD+4, PRTMOD+5
ECV PROCESS+3~, PROCESS+19*, SETTMP+5, SETTMP+11, SETTMP+15, SETTMP+17, SETTMP+21, SETTMP+24, SETTMP+30, SETTMP+32
, SETTMP+33
IO PRINT+4
IOF HDR+1, HDR+3
IOSL PRINT+27, PRTMOD+6
JJ PROCESS+2~, PROCESS+6*, PROCESS+7, PROCESS+8*, PROCESS+9
MOD SETTMP+1~, SETTMP+8*, SETTMP+9, SETTMP+27*, SETTMP+28, EXPORT+2~, EXPORT+16, EXPORT+17*, EXPORT+19*
MODAMT EXPORT+2~, EXPORT+18*, EXPORT+19
>> MODCNT EXPORT+16*
MODSTR SETTMP+1~, SETTMP+9*, SETTMP+10*, SETTMP+11, SETTMP+28*, SETTMP+29*, SETTMP+30, PRTMOD+1~, PRTMOD+3*, PRTMOD+4*
, PRTMOD+5
NLOC PROCESS+2~
NLOC( PROCESS+7*, PROCESS+20, SETTMP+2, SETTMP+4, SETTMP+5, SETTMP+11, SETTMP+12, SETTMP+14, SETTMP+15, SETTMP+16
, SETTMP+17, SETTMP+18, SETTMP+19, SETTMP+20, SETTMP+21, SETTMP+23, SETTMP+24, SETTMP+30, SETTMP+31, SETTMP+32
, SETTMP+33
NUNIT PROCESS+2~
NUNIT( PROCESS+9*, PROCESS+20, SETTMP+2, SETTMP+4, SETTMP+5, SETTMP+11, SETTMP+12, SETTMP+14, SETTMP+15, SETTMP+16
, SETTMP+17, SETTMP+18, SETTMP+19, SETTMP+20, SETTMP+21, SETTMP+23, SETTMP+24, SETTMP+30, SETTMP+31, SETTMP+32
, SETTMP+33
PAGE PRINT+2~, PRINT+3*, PAGE+1, HDR+1, HDR+2*, HDR+3
PCNAM EXPORT+1~, EXPORT+14*, EXPORT+20, PRINT+2~, PRINT+22*, PRINT+25
PCODE EXPORT+1~, EXPORT+14*, EXPORT+20, PRINT+2~, PRINT+22*, PRINT+25
PCPT EXPORT+1~, EXPORT+14*, EXPORT+15, PRINT+2~, PRINT+22*, PRINT+25
PRNDT PRINT+2~
PRNTDT PRINT+2~, PRINT+5*
PRO ECPCHK+1~
PROC ECPCHK~, ECPCHK+2, ECPCHK+3*, ECPCHK+4*
PROVOL EXPORT+1~, EXPORT+9*, EXPORT+13*, EXPORT+20, PRINT+2~, PRINT+15*, PRINT+24*, TOTPRV+1
PROVUNIQ PRINT+2~, PRINT+15*, PRINT+24*, TOTPRV+1
PRVUNIQ EXPORT+1~, EXPORT+9*, EXPORT+13*, EXPORT+20
PX ECPCHK+1~, ECPCHK+3*, ECPCHK+4*, ECPCHK+5
SUB EXPORT+2~, EXPORT+16*, EXPORT+17, EXPORT+18, EXPORT+19
U PROCESS+17, PROCESS+19, PROCESS+27, PROCESS+28, PROCESS+29, SETTMP+4, SETTMP+5, SETTMP+10, SETTMP+14, SETTMP+15
, SETTMP+16, SETTMP+17, SETTMP+20, SETTMP+21, SETTMP+24, SETTMP+29, SETTMP+32, SETTMP+33, EXPORT+12, EXPORT+15
, EXPORT+16, EXPORT+20, PRINT+17, PRINT+21, TOTDSS+2, ECPCHK+3, ECPCHK+4
UNIQ PRINT+2~, PRINT+21*, PRINT+24, PRINT+25
UNIQUE EXPORT+1~, EXPORT+12*, EXPORT+13
UNIQUES PRINT+2~
VOL EXPORT+1~, EXPORT+12*, EXPORT+13, PRINT+2~, PRINT+21*, PRINT+24, PRINT+25
Y EN+2, PRINT+2~, PRINT+5*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All