Routine: ECXEC

Package	Total	Call Graph
DSS Extracts	12	($$GETDIV,$$RADDIV)^ECXDEPT EN^ECXEC1 ^ECXKILL VISIT^ECXSCX1 QUE^ECXTAUTO (,PAUSE)^ECXTRAC ($$ECXDATE,$$ECXTIME,$$ECXTIMEX,$$PATCAT,$$PRVCLASS)^ECXUTL $$FISCAL^ECXUTL1 ($$PATDEM,ECXDEF)^ECXUTL2 $$CPT^ECXUTL3 ($$CNHSTAT,$$ENCNUM,$$HNCI,$$OBSPAT,$$SHAD,$$TSMAP)^ECXUTL4 NPRF^ECXUTL5
Kernel	3	$$S^%ZTLOAD $$RJ^XLFSTR $$NPI^XUSNPI
Registration	2	$$TSDATA^DGACT DEM^VADPT
VA FileMan	2	IX1^DIK $$GET1^DIQ
DRG Grouper	1	$$CODEC^ICDEX
Event Capture	1	$$GETPRV^ECPRVMUT

Package	Total	Caller Graph
DSS Extracts	1	ECXEC

Name	Comments	DBIA/ICR reference
BEG	;entry point from option
START	;begin EC extract
UPDATE	;sets record and updates counters
FILE	;file record in #727.815
SETUP	;Set required input for ECXTRAC
QUE	; entry point for the background requeuing handled by ECXTAUTO
CLEAN	;166 Section added to clean out table when extract finishes
SETTMP	;181 - Set global TMP for Mail Message

Name	Field # of Occurrence
$$S^%ZTLOAD	FILE+95
$$TSDATA^DGACT	FILE+54
IX1^DIK	FILE+94
$$GET1^DIQ	UPDATE+9, UPDATE+34, UPDATE+52, UPDATE+93, UPDATE+94, UPDATE+95
$$GETPRV^ECPRVMUT	UPDATE+62
$$GETDIV^ECXDEPT	UPDATE+18
$$RADDIV^ECXDEPT	UPDATE+6
EN^ECXEC1	START+18
^ECXKILL	BEG+3, QUE+2
VISIT^ECXSCX1	UPDATE+114
QUE^ECXTAUTO	QUE+2
^ECXTRAC	BEG+3
PAUSE^ECXTRAC	SETUP+9
$$ECXDATE^ECXUTL	FILE+64, SETTMP+3
$$ECXTIME^ECXUTL	UPDATE+8
$$ECXTIMEX^ECXUTL	SETTMP+7
$$PATCAT^ECXUTL	UPDATE+123
$$PRVCLASS^ECXUTL	UPDATE+64, UPDATE+67, UPDATE+70, UPDATE+73, UPDATE+76, UPDATE+80, UPDATE+83
$$FISCAL^ECXUTL1	START+3, START+15
$$PATDEM^ECXUTL2	UPDATE+10
ECXDEF^ECXUTL2	SETUP+3
$$CPT^ECXUTL3	UPDATE+102, UPDATE+103
$$CNHSTAT^ECXUTL4	UPDATE+109
$$ENCNUM^ECXUTL4	UPDATE+133
$$HNCI^ECXUTL4	UPDATE+119
$$OBSPAT^ECXUTL4	UPDATE+106
$$SHAD^ECXUTL4	UPDATE+121
$$TSMAP^ECXUTL4	UPDATE+54
NPRF^ECXUTL5	UPDATE+126
$$CODEC^ICDEX	UPDATE+24, UPDATE+30
DEM^VADPT	SETTMP+2
$$RJ^XLFSTR	UPDATE+34, UPDATE+45, UPDATE+50, UPDATE+51, UPDATE+52
$$NPI^XUSNPI	UPDATE+65, UPDATE+68, UPDATE+71, UPDATE+74, UPDATE+77, UPDATE+81, UPDATE+84

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Event Capture is not initialized",!! Line Location: BEG+1
Function Call: WRITE	Prompt: @IOF,!,"Setting up for ",ECPACK," DSS Extract -",! Line Location: SETUP+5
Function Call: WRITE	Prompt: !," Reminder: A maintenance option, ECS Extract Unusual Volume Report, may" Line Location: SETUP+6
Function Call: WRITE	Prompt: !," assist in identifying problematic data. It should be run before the" Line Location: SETUP+7
Function Call: WRITE	Prompt: !," Event Capture Extract is performed.",! Line Location: SETUP+8

FileNo	Call Tags
^ECL - [#720.5]	GET1^DIQ
^EC(725 - [#725]	GET1^DIQ
^ECX(728.44 - [#728.44]	GET1^DIQ
^ECX(728.441 - [#728.441]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	UPDATE+15, UPDATE+16
^DIC(40.7 - [#40.7]	UPDATE+43, UPDATE+44, UPDATE+50, UPDATE+51
^DIC(42 - [#42]	UPDATE+17
^EC(725 - [#725]	UPDATE+13
^ECD - [#724]	UPDATE+21
^ECH - [#721]	BEG+1, START+13, START+14, START+15, UPDATE+5, UPDATE+23, UPDATE+28, UPDATE+29, UPDATE+91, UPDATE+93 , UPDATE+94, UPDATE+95, UPDATE+97, UPDATE+99, UPDATE+128
^ECH("AC1"	START+7, START+8, START+9
^ECX(	FILE+58, FILE+93*
^ICPT - [#81]	UPDATE+13
^SC - [#44]	UPDATE+40
^TMP("EC"	START+5!
^TMP($J	START+6!, START+18, SETTMP+5, SETTMP+6, SETTMP+7, SETTMP+8*
^XTMP("ECEFPAT"	START+11, START+12, START+15, UPDATE+136, CLEAN+2, CLEAN+3!

Name	Line Occurrences
CLEAN	START+17
FILE	UPDATE+135
SETTMP	UPDATE+20
SETUP	BEG+2, QUE+2
UPDATE	START+9, START+16

Name	Field # of Occurrence
^(	UPDATE+99
^(0	UPDATE+40

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> CNT	UPDATE+27, UPDATE+28, UPDATE+29
DA	FILE+57~, FILE+94*!
DFN	SETTMP+1~, SETTMP+2*
DIK	FILE+57~, FILE+94*!
>> EC23	FILE+63
>> EC7	FILE+58*, FILE+63, FILE+93, FILE+94
>> ECAC	UPDATE+33*, UPDATE+34, UPDATE+39, UPDATE+40, UPDATE+46, FILE+87, FILE+89
>> ECAC1	UPDATE+40*, UPDATE+42, UPDATE+43
>> ECAC1S	UPDATE+37, UPDATE+42, UPDATE+43, UPDATE+45, UPDATE+46, UPDATE+50, UPDATE+53, UPDATE+130
>> ECAC2	UPDATE+40*, UPDATE+41, UPDATE+44
>> ECAC2S	UPDATE+37, UPDATE+41, UPDATE+42, UPDATE+44, UPDATE+45, UPDATE+46, UPDATE+51*, UPDATE+53, UPDATE+130
>> ECASNPI	FILE+61*, FILE+82
>> ECASPR	FILE+61*, FILE+73
>> ECC	UPDATE+7, UPDATE+13, FILE+64
>> ECCH	UPDATE+5*, UPDATE+7, UPDATE+8, UPDATE+19, UPDATE+33, UPDATE+112
>> ECCLAS	FILE+61*, FILE+72
>> ECCLAS2	FILE+61*, FILE+73
>> ECCS	UPDATE+21*, UPDATE+133, FILE+65
>> ECD	START+7, START+8, START+9
>> ECDA	START+8, START+9, START+11*, START+12, START+13, START+14, START+15, UPDATE+5, UPDATE+23, UPDATE+28 , UPDATE+29, UPDATE+62, UPDATE+91, UPDATE+93, UPDATE+94, UPDATE+95, UPDATE+97, UPDATE+99, UPDATE+128, UPDATE+136
ECDCM	START+1~, UPDATE+21*, UPDATE+22
>> ECDSS	UPDATE+53, UPDATE+54, UPDATE+106, FILE+71
ECDSSE	UPDATE+1~, UPDATE+130*, UPDATE+133
>> ECDT	UPDATE+7*, UPDATE+8, UPDATE+10, UPDATE+64, UPDATE+65, UPDATE+67, UPDATE+68, UPDATE+70, UPDATE+71, UPDATE+73 , UPDATE+74, UPDATE+76, UPDATE+77, UPDATE+80, UPDATE+81, UPDATE+83, UPDATE+84, UPDATE+133, FILE+64, SETTMP+3
ECDTEX	SETTMP+1~, SETTMP+3, SETTMP+4, SETTMP+7
>> ECDU	UPDATE+19*, UPDATE+20, UPDATE+21, FILE+64
>> ECED	START+3, START+4*, START+8, START+14
>> ECFILE	BEG+2, FILE+58, FILE+93, FILE+94, SETUP+3, SETUP+10*
>> ECGRP	SETUP+3
>> ECHEAD	UPDATE+133, SETUP+2*, SETUP+3
>> ECL	UPDATE+5*, UPDATE+6, FILE+63
>> ECLL	START+4, START+7, START+8, START+9
>> ECM	UPDATE+7*, FILE+65
>> ECO	UPDATE+19*, FILE+65
>> ECODE	FILE+63, FILE+64, FILE+65, FILE+66, FILE+67, FILE+68, FILE+69, FILE+70, FILE+71*, FILE+93
>> ECODE1	FILE+72, FILE+73, FILE+74, FILE+75, FILE+76, FILE+77, FILE+78, FILE+79, FILE+93
>> ECODE2	FILE+80, FILE+81, FILE+82, FILE+84, FILE+85, FILE+86, FILE+93
>> ECODE3	FILE+87, FILE+88, FILE+89, FILE+90, FILE+91, FILE+92, FILE+93
>> ECP	UPDATE+8, UPDATE+9, UPDATE+11, UPDATE+12, UPDATE+13, UPDATE+102*, FILE+65, SETTMP+7
>> ECPACK	SETUP+3, SETUP+5
>> ECPCE	UPDATE+91*, UPDATE+92
>> ECPCE1	UPDATE+91*, UPDATE+103
>> ECPCE2	UPDATE+91*
>> ECPCE7	UPDATE+92*, FILE+71
>> ECPIECE	SETUP+3
ECPNM	UPDATE+1~, UPDATE+9*, UPDATE+132
>> ECPTNPI	FILE+61*, FILE+82
>> ECPTPR	FILE+61*, FILE+68
>> ECPTTM	FILE+61*, FILE+68
>> ECRN	FILE+93*
>> ECRTN	SETUP+3
>> ECSC	FILE+71
>> ECSD	START+7
>> ECTM	UPDATE+8*, FILE+67, SETTMP+7
>> ECU1	UPDATE+60*, UPDATE+64, UPDATE+65
>> ECU1A	UPDATE+60, UPDATE+64, FILE+65
>> ECU1NPI	UPDATE+60, UPDATE+66, FILE+82
>> ECU2	UPDATE+60*, UPDATE+67, UPDATE+68
>> ECU2A	UPDATE+60, UPDATE+67, FILE+66
>> ECU2NPI	UPDATE+60, UPDATE+69, FILE+82
>> ECU3	UPDATE+60*, UPDATE+70, UPDATE+71
>> ECU3A	UPDATE+60, UPDATE+70, FILE+66
>> ECU3NPI	UPDATE+60, UPDATE+72, FILE+82
>> ECU4	UPDATE+60*, UPDATE+73, UPDATE+74
>> ECU4A	UPDATE+61, UPDATE+73, FILE+85
>> ECU4NPI	UPDATE+61, UPDATE+75, FILE+85
>> ECU5	UPDATE+60*, UPDATE+76, UPDATE+77
>> ECU5A	UPDATE+61, UPDATE+76, FILE+85
>> ECU5NPI	UPDATE+61, UPDATE+78, FILE+85
>> ECU6	UPDATE+60*, UPDATE+80, UPDATE+81
>> ECU6A	UPDATE+61, UPDATE+80, FILE+87
>> ECU6NPI	UPDATE+61, UPDATE+82, FILE+87
>> ECU7	UPDATE+60*, UPDATE+83, UPDATE+84
>> ECU7A	UPDATE+61, UPDATE+83, FILE+87
>> ECU7NPI	UPDATE+61, UPDATE+85, FILE+87
>> ECUPCE	UPDATE+22*, UPDATE+38, UPDATE+49
>> ECUSTOP	UPDATE+22*, UPDATE+50
>> ECV	UPDATE+19*, UPDATE+102, UPDATE+103, FILE+65
>> ECVER	SETUP+3
ECX4CHAR	START+1~, UPDATE+24, UPDATE+34, UPDATE+52*, FILE+87
>> ECXA	UPDATE+15, UPDATE+38, UPDATE+49, UPDATE+106, UPDATE+132, UPDATE+133, UPDATE+134, FILE+63
>> ECXADMDT	UPDATE+133
>> ECXAO	UPDATE+112, UPDATE+115, FILE+81
>> ECXAOL	FILE+75
ECXASIH	UPDATE+2~, UPDATE+134
>> ECXAST	FILE+70
>> ECXCAT	FILE+74
>> ECXCEDT	UPDATE+58*, FILE+76
ECXCERN	UPDATE+3~, UPDATE+4*, FILE+92
ECXCLST	UPDATE+1~, UPDATE+4*, FILE+87
>> ECXCMOD	UPDATE+96, UPDATE+100, UPDATE+103
>> ECXCNH	UPDATE+109*, FILE+76
>> ECXCPT	UPDATE+103*, FILE+68
>> ECXCSDT	UPDATE+58*, FILE+76
>> ECXCTYP	UPDATE+58*, FILE+76
>> ECXCVE	FILE+79
>> ECXCVEDT	FILE+80
>> ECXCVENC	FILE+80
ECXDATA	FILE+53~, FILE+54*
ECXDATA(7	FILE+55
>> ECXDFN	UPDATE+5*, UPDATE+10, UPDATE+109, UPDATE+114, UPDATE+119, UPDATE+121, UPDATE+123, FILE+63, SETTMP+2
>> ECXDIV	UPDATE+55*, FILE+73
>> ECXDOB	FILE+74
>> ECXDOM	FILE+74
>> ECXDSSD	UPDATE+22*, FILE+72
>> ECXDSSP	UPDATE+22*
>> ECXECE	UPDATE+112, UPDATE+115, FILE+81
ECXECL	UPDATE+1~, UPDATE+4, UPDATE+117, FILE+87
>> ECXELIG	FILE+77
>> ECXENC	UPDATE+133*, UPDATE+135, FILE+75
>> ECXENRL	FILE+78
>> ECXERI	FILE+81
ECXERR	UPDATE+114!
ECXESC	UPDATE+1~, UPDATE+4, UPDATE+117, FILE+87
>> ECXEST	FILE+70
>> ECXETH	FILE+60*, FILE+77
>> ECXHNC	UPDATE+112, UPDATE+116, FILE+81
>> ECXHNCI	UPDATE+119*, FILE+77
ECXICD101	START+2~, FILE+86
ECXICD102	START+2~, FILE+86
ECXICD103	START+2~, FILE+86
ECXICD104	START+2~, FILE+86
ECXICD10P	START+2~, UPDATE+24*, FILE+86
>> ECXICD9	UPDATE+24*, FILE+68
>> ECXICD91	FILE+69
>> ECXICD92	FILE+69
>> ECXICD93	FILE+69
>> ECXICD94	FILE+70
>> ECXIR	UPDATE+112, UPDATE+116, FILE+81
>> ECXLOGIC	UPDATE+54, UPDATE+131, FILE+59, FILE+62, FILE+75, FILE+78, FILE+79, FILE+80, FILE+81, FILE+82 , FILE+84, FILE+85, FILE+86, FILE+87, FILE+88, FILE+89, FILE+90, FILE+91, FILE+92
>> ECXMIL	UPDATE+112, UPDATE+116, FILE+81
>> ECXMN	UPDATE+15, UPDATE+16, FILE+66
>> ECXMPI	FILE+62*, FILE+72
>> ECXMST	FILE+74
ECXNMPI	UPDATE+3~, FILE+62*, FILE+92
ECXNODSS	SETTMP+1~, SETTMP+6*, SETTMP+7, SETTMP+8
ECXNPRFI	START+1~, FILE+80
>> ECXOBS	UPDATE+106*, UPDATE+133, FILE+75
>> ECXODIV	UPDATE+58*, FILE+76
>> ECXOEF	FILE+82
>> ECXOEFDT	FILE+82
>> ECXPATCAT	UPDATE+123*, FILE+84
>> ECXPDIV	UPDATE+6*, UPDATE+14, FILE+76
>> ECXPHI	FILE+75
>> ECXPNM	UPDATE+132*, FILE+63
>> ECXPOS	FILE+75
>> ECXPPC1	UPDATE+60, UPDATE+64, FILE+65
>> ECXPPC2	UPDATE+60, UPDATE+67, FILE+66
>> ECXPPC3	UPDATE+60, UPDATE+70, FILE+66
>> ECXPPC4	UPDATE+61, UPDATE+73, FILE+85
>> ECXPPC5	UPDATE+61, UPDATE+76, FILE+85
>> ECXPPC6	UPDATE+61, UPDATE+80, FILE+87
>> ECXPPC7	UPDATE+61, UPDATE+83, FILE+87
>> ECXPRIOR	FILE+75, FILE+79
>> ECXPROV	UPDATE+62*
ECXPRV	UPDATE+62!
ECXPRV(	UPDATE+63!
ECXPRV(""	UPDATE+63
>> ECXPTYPE	FILE+79
ECXQQ	SETUP+4, QUE+1~, QUE+2*
>> ECXRC1	FILE+60*, FILE+77
ECXRES1	UPDATE+1~, UPDATE+4, UPDATE+93, FILE+88
ECXRES2	UPDATE+1~, UPDATE+4, UPDATE+94, FILE+88
ECXRES3	UPDATE+1~, UPDATE+4, UPDATE+95, FILE+88
>> ECXRST	FILE+70
>> ECXSBGRP	FILE+79
>> ECXSHAD	UPDATE+112, UPDATE+115, FILE+84
>> ECXSHADI	UPDATE+121*, FILE+84
ECXSIGI	UPDATE+3~, FILE+92
>> ECXSSN	UPDATE+132*, UPDATE+133, FILE+63
ECXSTANO	UPDATE+2~, UPDATE+14, UPDATE+18, FILE+90
>> ECXSTAT	FILE+74
>> ECXSVCI	FILE+88
>> ECXSVCL	FILE+88
ECXSVH	UPDATE+2~, UPDATE+128*, FILE+91
ECXTEMPD	UPDATE+2~, UPDATE+17*, UPDATE+18
ECXTEMPW	UPDATE+2~, UPDATE+16*, UPDATE+17
>> ECXTS	UPDATE+54, UPDATE+106, UPDATE+133, FILE+54, FILE+55*, FILE+67
>> ECXUESTA	FILE+79
>> ECXUNIT	UPDATE+21*, UPDATE+22, UPDATE+51, UPDATE+52
>> ECXUSRTN	UPDATE+65, UPDATE+66, UPDATE+68, UPDATE+69, UPDATE+71, UPDATE+72, UPDATE+74, UPDATE+75, UPDATE+77, UPDATE+78 , UPDATE+81, UPDATE+82, UPDATE+84, UPDATE+85
ECXVIET	START+1~, FILE+87
>> ECXVISIT	UPDATE+112*, UPDATE+113, UPDATE+114
>> ECXVIST	UPDATE+114
>> ECXVIST("AO"	UPDATE+115
>> ECXVIST("ENCCL"	UPDATE+117
>> ECXVIST("ENCSC"	UPDATE+117
>> ECXVIST("HNC"	UPDATE+116
>> ECXVIST("IR"	UPDATE+116
>> ECXVIST("MST"	UPDATE+116
>> ECXVIST("PGE"	UPDATE+115
>> ECXVIST("SHAD"	UPDATE+115
>> ECXYM	FILE+64, SETTMP+3
EFY	START+2~, START+3*, START+15
>> I	UPDATE+25, UPDATE+26, UPDATE+27, UPDATE+28, UPDATE+30, UPDATE+63*
>> ICD9	UPDATE+23, UPDATE+24, UPDATE+29, UPDATE+30
IOF	SETUP+5
LATE	START+2~, START+11*, UPDATE+136
M	UPDATE+98, UPDATE+99, UPDATE+100, UPDATE+101!
MOD	UPDATE+98, UPDATE+99, UPDATE+101!
OUT	SETUP+1~, SETUP+2*, SETUP+10
PNAME	SETTMP+1~
RECNO	CLEAN+1~, CLEAN+2*, CLEAN+3
ROOT	UPDATE+1~
SSN	SETTMP+1~
U	START+14, START+15, UPDATE+5, UPDATE+7, UPDATE+8, UPDATE+13, UPDATE+16, UPDATE+17, UPDATE+19, UPDATE+21 , UPDATE+22, UPDATE+23, UPDATE+29, UPDATE+33, UPDATE+40, UPDATE+43, UPDATE+44, UPDATE+50, UPDATE+51, UPDATE+52 , UPDATE+66, UPDATE+69, UPDATE+72, UPDATE+75, UPDATE+78, UPDATE+82, UPDATE+85, UPDATE+91, UPDATE+92, UPDATE+93 , UPDATE+94, UPDATE+95, UPDATE+99, UPDATE+112, UPDATE+128, FILE+63, FILE+64, FILE+65, FILE+66, FILE+67 , FILE+68, FILE+69, FILE+70, FILE+71, FILE+72, FILE+73, FILE+74, FILE+75, FILE+76, FILE+77 , FILE+78, FILE+79, FILE+80, FILE+81, FILE+82, FILE+84, FILE+85, FILE+86, FILE+87, FILE+88 , FILE+89, FILE+90, FILE+91, FILE+92, SETTMP+7
VADM	SETTMP+1~
VADM(1	SETTMP+7
VADM(2	SETTMP+7
X	START+1~
Y	START+1~, UPDATE+63*
>> ZTQUEUED	FILE+95

Customize PDF page

Package: DSS Extracts

Routine: ECXEC

Information

Source Information

Call Graph

Call Graph Total: 21

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: