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

Package: DSS Extracts

Routine: ECXLPRO


Information

ECXLPRO ;ALB/JAP - PRO Extract YTD Lab Report ;3/4/13 15:29

Source Information

Source file <ECXLPRO.m>

Call Graph

Call Graph

Call Graph Total: 10

Package Total Call Graph
DSS Extracts 6 HCPCS^ECXCPRO  (,AUDIT)^ECXKILL  PRINT^ECXLPRO1  ($$PDIV,PDIV3)^ECXPUTL  ($$CYFY,$$EXPORT,EXPDISP)^ECXUTL1  DEVICE^ECXUTLA  
Kernel 2 HOME^%ZIS  ^%ZISC  
VA FileMan 2 EN^DIQ1  ^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: 1

Package Total Caller Graph
DSS Extracts 1 ECX PRO LAB REPORT  

Entry Points

Name Comments DBIA/ICR reference
EN ;setup & queue
PROCESS ;begin processing
HCPCS ;setup hcpcs cross-reference

External References

Name Field # of Occurrence
HOME^%ZIS EN+48
^%ZISC EN+47
EN^DIQ1 EN+10
^DIR EN+19
HCPCS^ECXCPRO PROCESS+37
^ECXKILL EN+9, EN+16, EN+21, EN+38, EN+42
AUDIT^ECXKILL PROCESS+41
PRINT^ECXLPRO1 PROCESS+39
$$PDIV^ECXPUTL EN+8
PDIV3^ECXPUTL EN+14
$$CYFY^ECXUTL1 EN+23, EN+26
$$EXPORT^ECXUTL1 EN+32
EXPDISP^ECXUTL1 EN+37
DEVICE^ECXUTLA EN+41

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Setup for PRO Extract YTD Laboratory Report --",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !,"If you belong to more than one Primary Division, you must"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,"select a Primary Division for the report.",!
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !!,?5,"Try again later... exiting.",!
  • Line Location: EN+16
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+19
Function Call: WRITE
  • Prompt: !!,?5,"Try again later... exiting.",!
  • Line Location: EN+21
Function Call: WRITE
  • Prompt: !!,"Please note: The PRO Extract YTD Laboratory Report requires 132 columns."
  • Line Location: EN+39
Function Call: WRITE
  • Prompt: !," Select an appropriate device for output."
  • Line Location: EN+40
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+41
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+42
Routine Call
  • %ZIS
  • Line Location:
    • EN+48
Routine Call
  • DIR
  • Line Location:
    • EN+19

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECX(727 - [#727] PROCESS+5, PROCESS+6, PROCESS+7, PROCESS+8, PROCESS+9, PROCESS+10
^ECX(727.826 - [#727.826] PROCESS+15, PROCESS+16
^ICPT - [#81] HCPCS+6
^RMPR(661.1 - [#661.1] HCPCS+3, HCPCS+5
^TMP($J EN+33!, EN+34*, PROCESS+2!, PROCESS+32*, PROCESS+33*, PROCESS+34*, PROCESS+35*, HCPCS+8*

Label References

Name Line Occurrences
PROCESS EN+36, EN+45

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C EN+27!
CNT EN+1~, EN+35*
CPT HCPCS+1~, HCPCS+5*, HCPCS+6
CPTNM HCPCS+1~, HCPCS+5*, HCPCS+6*, HCPCS+7, HCPCS+8
DA EN+1~, EN+10*, EN+11
DESC HCPCS+1~, HCPCS+6*, HCPCS+8
DIC EN+1~, EN+10*
DIQ EN+1~, EN+10*
DIQ(0 EN+10*
DIR EN+1~, EN+19!
DIR("A" EN+18*
DIR("B" EN+18*
DIR(0 EN+18*
DIRUT EN+1~
DIV EN+1~, PROCESS+13*
DIVISION PROCESS+1~
DIVISION( PROCESS+13*, PROCESS+26
DR EN+1~, EN+10*
DT EN+23, EN+25
DTOUT EN+1~, EN+20
DUOUT EN+1~, EN+20
DUZ EN+14
E PROCESS+1~, PROCESS+4*, PROCESS+5*, PROCESS+6, PROCESS+7, PROCESS+8, PROCESS+9, PROCESS+10, PROCESS+11, PROCESS+15*
>> ECXALL EN+13*
>> ECXARRAY("END" EN+23*, EN+26*, PROCESS+8
>> ECXARRAY("START" EN+23*, EN+26*, PROCESS+7
>> ECXCTAMT PROCESS+17*, PROCESS+22*, PROCESS+30*
ECXDESC EN+29*, EN+41, EN+44!
>> ECXDIC(4 EN+11
>> ECXDIV EN+14
>> ECXDIV( PROCESS+13
>> ECXERR EN+2*, EN+15
>> ECXFEKEY PROCESS+18*, PROCESS+21
>> ECXFELOC PROCESS+18*, PROCESS+20, PROCESS+23
>> ECXFORM PROCESS+23*
>> ECXGRPR PROCESS+22*
>> ECXHCPC PROCESS+21*, PROCESS+32, PROCESS+33, PROCESS+34, PROCESS+35
>> ECXHEAD EN+3*, PROCESS+5
>> ECXLAB PROCESS+28*, PROCESS+33, PROCESS+34, PROCESS+35
>> ECXLLC PROCESS+17*, PROCESS+24*, PROCESS+30*, PROCESS+34
>> ECXLMC PROCESS+17*, PROCESS+24*, PROCESS+30*, PROCESS+35
ECXPGM EN+29*, EN+41, EN+44!
ECXPORT EN+1~, EN+32*, PROCESS+41
>> ECXPRIME EN+8*, EN+9, EN+10, EN+11*, EN+14, PROCESS+9
>> ECXQTY PROCESS+22*, PROCESS+33
>> ECXREQ PROCESS+21*, PROCESS+28
ECXSAVE EN+41, EN+44!
ECXSAVE("ECXALL" EN+30*
ECXSAVE("ECXARRAY(" EN+30*
ECXSAVE("ECXDIV(" EN+30*
ECXSAVE("ECXHEAD" EN+30*
ECXSAVE("ECXPRIME" EN+30*
ECXSAVE("POP" EN+42
ECXSAVE("ZTSK" EN+43
>> ECXSTAT PROCESS+13*, PROCESS+23*, PROCESS+26, PROCESS+28*
>> ECXTYPE PROCESS+21*, PROCESS+32, PROCESS+33, PROCESS+34, PROCESS+35
EXTRACT PROCESS+1~, PROCESS+4*
EXTRACT( PROCESS+10*, PROCESS+11, PROCESS+15
H HCPCS+1~, HCPCS+2*, HCPCS+3*, HCPCS+5
IO EN+47
IO(0 EN+47
LAST EN+1~
LASTDAY PROCESS+1~, PROCESS+2*, PROCESS+11*
MON EN+25*, EN+27!
NODE0 PROCESS+1~, PROCESS+16*, PROCESS+18, PROCESS+21, PROCESS+22, PROCESS+24
NODE1 PROCESS+1~, PROCESS+16*, PROCESS+22
OUT EN+1~
REC PROCESS+1~, PROCESS+15*, PROCESS+16
U EN+11, EN+23, EN+26, PROCESS+7, PROCESS+8, PROCESS+11, PROCESS+13, PROCESS+18, PROCESS+21, PROCESS+22
, PROCESS+24, PROCESS+33, PROCESS+34, PROCESS+35, HCPCS+5, HCPCS+6
X EN+19!, EN+23*, EN+26*
X1 EN+25*, EN+26, EN+27!
Y EN+19!, EN+22, EN+24
YR EN+25*, EN+27!
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