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

Package: DSS Extracts

Routine: ECXRACPT


Information

ECXRACPT ;ALB/DAN - Radiology extract invalid CPT report ;7/25/18 14:29

Source Information

Source file <ECXRACPT.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
DSS Extracts 5 RAD^ECXDVSN2  AUDIT^ECXKILL  $$ECXDATEX^ECXUTL  ($$EXPORT,EXPDISP)^ECXUTL1  (AUDIT,DEVICE)^ECXUTLA  
VA FileMan 4 ^%DT  $$GET1^DIQ  EN^DIQ1  ^DIR  
Kernel 3 HOME^%ZIS  ^%ZISC  ($$FMTE,$$NOW)^XLFDT  
CPT HCPCS Codes 1 $$STATCHK^ICPTAPIU  

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
DSS Extracts 1 ECX RAD SOURCE AUDIT CPT  

Entry Points

Name Comments DBIA/ICR reference
EN ;entry point from menu option
PROCESS ;queued entry
HEADER ;

External References

Name Field # of Occurrence
^%DT PROCESS+16
HOME^%ZIS EN+29
^%ZISC EN+28
$$GET1^DIQ PROCESS+18
EN^DIQ1 PROCESS+9
^DIR HEADER+5
RAD^ECXDVSN2 EN+9
AUDIT^ECXKILL EN+7, EN+10, EN+16, EN+24, EN+30
$$ECXDATEX^ECXUTL PROCESS+15
$$EXPORT^ECXUTL1 EN+11
EXPDISP^ECXUTL1 EN+15
AUDIT^ECXUTLA EN+6
DEVICE^ECXUTLA EN+21
$$STATCHK^ICPTAPIU PROCESS+17
$$FMTE^XLFDT PROCESS+6, PROCESS+33, PROCESS+35
$$NOW^XLFDT PROCESS+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!,"Radiology (RAD) Extract CPT Code Audit",!!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+17
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+20
Function Call: WRITE
  • Prompt: !,"No data found."
  • Line Location: PROCESS+23
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !,"Radiology (RAD) Extract CPT Code Audit"
  • Line Location: HEADER+8
Function Call: WRITE
  • Prompt: !,"DSS Extract Log #: "_ECXARRAY("EXTRACT")
  • Line Location: HEADER+9
Function Call: WRITE
  • Prompt: !,"Date Range of Audit: "_ECXARRAY("START")_" to "_ECXARRAY("END")
  • Line Location: HEADER+10
Function Call: WRITE
  • Prompt: !,"Report Run Date/Time: "_ECXRUN
  • Line Location: HEADER+11
Function Call: WRITE
  • Prompt: !,"Division/Site: "_$P(ECXDIV(DIV),U,2)_" ("_DIV_")",?68,"Page: "_PG
  • Line Location: HEADER+12
Function Call: WRITE
  • Prompt: !,"Division/Site: "_"Unknown",?68,"Page: "_PG
  • Line Location: HEADER+13
Function Call: WRITE
  • Prompt: !!,"Imaging Type (Feeder Location)",?58,"Procedure"
  • Line Location: HEADER+14
Function Call: WRITE
  • Prompt: !?3,"FdrKey",?11,"Procedure",?58,"Date",?69,"DFN"
  • Line Location: HEADER+15
Function Call: WRITE
  • Prompt: !,LN,!
  • Line Location: HEADER+16
Routine Call
  • DIR
  • Line Location:
    • HEADER+5
Routine Call
  • %ZIS
  • Line Location:
    • EN+29

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RAMIS(71 - [#71] GET1^DIQ
^RA(79.2 - [#79.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECX(727.814 - [#727.814] PROCESS+12
^RA(79.2 - [#79.2] PROCESS+8
^TMP($J EN+12!, EN+13*, PROCESS+2!, PROCESS+18*, PROCESS+23, PROCESS+24, PROCESS+26, PROCESS+28, PROCESS+30, PROCESS+32*
, PROCESS+33*

Label References

Name Line Occurrences
HEADER PROCESS+23, PROCESS+25, PROCESS+29
PROCESS EN+14, EN+27

Naked Globals

Name Field # of Occurrence
^(0 PROCESS+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT PROCESS+1~, PROCESS+16*
CNT EN+1~, EN+13*, PROCESS+32, PROCESS+33*
CPT PROCESS+1~, PROCESS+14*, PROCESS+17
D0 EN+1~
DA PROCESS+1~, PROCESS+9*
DATA PROCESS+1~, PROCESS+30*, PROCESS+33, PROCESS+35
DAY PROCESS+1~, PROCESS+15*, PROCESS+16*, PROCESS+17, PROCESS+18
DIC PROCESS+1~, PROCESS+9*
DIQ PROCESS+1~, PROCESS+9*
DIQ(0 PROCESS+9*
DIR PROCESS+1~, HEADER+5!
DIR(0 HEADER+5*
DIRUT PROCESS+1~
DIV PROCESS+1~, PROCESS+12*, PROCESS+18, PROCESS+23*, PROCESS+24*, PROCESS+26, PROCESS+28, PROCESS+30, PROCESS+32, HEADER+12
, HEADER+13
DR PROCESS+1~, PROCESS+9*
DTOUT PROCESS+1~
DUOUT PROCESS+1~
EC PROCESS+1~, PROCESS+12*, PROCESS+13, PROCESS+15, PROCESS+18
ECFK PROCESS+1~, PROCESS+13*, PROCESS+14
ECFL PROCESS+1~, PROCESS+12*, PROCESS+18, PROCESS+26*, PROCESS+28, PROCESS+30, PROCESS+32, PROCESS+34
ECX PROCESS+1~, PROCESS+9!
ECX( PROCESS+10
ECXALL EN+1~, EN+9*
ECXARRAY EN+1~, EN+6
ECXARRAY("DEF" PROCESS+3
ECXARRAY("END" HEADER+10
ECXARRAY("EXTRACT" PROCESS+3, HEADER+9
ECXARRAY("START" HEADER+10
ECXAUD EN+1~, EN+4*, EN+6
ECXDEF PROCESS+1~, PROCESS+3*
ECXDESC EN+1~, EN+18*, EN+21, EN+26!
ECXDIV EN+1~, EN+9
ECXDIV( PROCESS+32, HEADER+12, HEADER+13
ECXERR EN+1~, EN+6, EN+7, EN+9, EN+10
ECXEXT PROCESS+1~, PROCESS+3*, PROCESS+12, PROCESS+32
ECXHEAD EN+1~, EN+4*, EN+6
ECXP PROCESS+1~, PROCESS+13*, PROCESS+18
ECXPGM EN+1~, EN+18*, EN+21, EN+26!
ECXPORT EN+1~, EN+11*, PROCESS+23, PROCESS+25, PROCESS+29, PROCESS+31
ECXRUN PROCESS+1~, PROCESS+6*, HEADER+11
ECXSAVE EN+1~, EN+21, EN+26!
ECXSAVE("ECXARRAY(" EN+19*
ECXSAVE("ECXDIV(" EN+19*
ECXSAVE("ECXHEAD" EN+19*
ECXSAVE("POP" EN+22
ECXSAVE("ZTSK" EN+25
IO EN+28, PROCESS+22
IO(0 EN+28
IOF EN+2, HEADER+7
IOSL PROCESS+29
IOST HEADER+3, HEADER+7
J PROCESS+1~, PROCESS+12*, PROCESS+18
JJ HEADER+1~, HEADER+4*
LN HEADER+1~, HEADER+2*, HEADER+16
PG PROCESS+1~, PROCESS+4*, HEADER+5, HEADER+7*, HEADER+12, HEADER+13
QFLG PROCESS+1~, PROCESS+4*, PROCESS+24, PROCESS+26, PROCESS+28, PROCESS+29, HEADER+5*, HEADER+6
SEQ PROCESS+1~, PROCESS+28*, PROCESS+30
SS HEADER+1~, HEADER+4*
TYPE PROCESS+1~, PROCESS+8*, PROCESS+9, PROCESS+10, PROCESS+26*, PROCESS+27
TYPE( PROCESS+10*, PROCESS+27
TYPENMN PROCESS+1~, PROCESS+27*, PROCESS+32, PROCESS+34
U PROCESS+10, PROCESS+12, PROCESS+13, PROCESS+15, PROCESS+18, PROCESS+27, PROCESS+32, PROCESS+33, PROCESS+35, HEADER+12
X PROCESS+1~, PROCESS+16*
Y PROCESS+1~, PROCESS+16, HEADER+5
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 |  Naked Globals |  Local Variables  | All