Routine: ECXRAD

Package	Total	Call Graph
DSS Extracts	8	($$GETDIV,$$RADDIV)^ECXDEPT ^ECXKILL VISIT^ECXSCX1 ^ECXTRAC ($$ECXDATE,$$ECXTIME,$$PATCAT,$$PRVCLASS)^ECXUTL ($$INP,$$PRIMARY,ECXDEF)^ECXUTL2 ($$CPT,$$PAT)^ECXUTL3 ($$ENCNUM,$$OBSPAT)^ECXUTL4
VA FileMan	3	FIELD^DID IX1^DIK $$GET1^DIQ
Kernel	2	$$S^%ZTLOAD $$NPI^XUSNPI
Registration	1	$$TSDATA^DGACT

Package	Total	Caller Graph
DSS Extracts	1	ECXRAD

Name	Comments	DBIA/ICR reference
BEG	;entry point from option
START	;start rad extract
GETCASE	;Find all cases associated with the verified report and store in extract
GET	;get data
FILE	;file record
SETUP	;Set required input for ECXTRAC

Name	Field # of Occurrence
$$S^%ZTLOAD	FILE+51
$$TSDATA^DGACT	FILE+23
FIELD^DID	START+3, GET+80, GET+82
IX1^DIK	FILE+50
$$GET1^DIQ	GET+28, GET+49, GET+61, GET+71
$$GETDIV^ECXDEPT	GET+50, GET+54
$$RADDIV^ECXDEPT	GET+91
^ECXKILL	BEG+2
VISIT^ECXSCX1	GET+43
^ECXTRAC	BEG+2
$$ECXDATE^ECXUTL	GET+8, GET+9, GET+32
$$ECXTIME^ECXUTL	GET+7
$$PATCAT^ECXUTL	GET+35
$$PRVCLASS^ECXUTL	GET+58, GET+63
$$INP^ECXUTL2	GET+20
$$PRIMARY^ECXUTL2	GET+17
ECXDEF^ECXUTL2	SETUP+2
$$CPT^ECXUTL3	GET+87
$$PAT^ECXUTL3	GET+10
$$ENCNUM^ECXUTL4	GET+37
$$OBSPAT^ECXUTL4	GET+24
$$NPI^XUSNPI	GET+55, GET+64

FileNo	Call Tags
^DIC(40.7 - [#40.7]	GET1^DIQ
^SC - [#44]	GET1^DIQ
70.03	FIELD^DID
^RAMIS(71 - [#71]	GET1^DIQ
^RA(79.1 - [#79.1]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	GET+51, GET+52
^DIC(42 - [#42]	GET+46, GET+53
^ECX(	FILE+27, FILE+47, FILE+48
^RA(72 - [#72]	GET+60
^RADPT - [#70]	GETCASE+6, GETCASE+7, GETCASE+8, GETCASE+9, GETCASE+14, GETCASE+15, GETCASE+16, GETCASE+17, GET+25, GET+31 , GET+40, GET+85, GET+86, GET+90
^RAMIS(71 - [#71]	GET+75, GET+77
^RAO(75.1 - [#75.1]	GET+32
^RARPT - [#74]	GETCASE+3, GETCASE+5, GETCASE+11, GETCASE+12, GET+9
^RARPT("AA"	START+6, START+7

Name	Line Occurrences
FILE	GET+93
GET	GETCASE+10, GETCASE+18
GETCASE	START+7
SETUP	BEG+1

Name	Field # of Occurrence
^(	GET+86, GET+90
^(0	GET+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARR	GET+80!, GET+82!
ARR("GLOBAL S	UBSCRIPT LOCATION" , GET+84
ARR("LABEL"	GET+81
CASE	GETCASE+2~, GETCASE+3, GETCASE+4, GETCASE+6, GETCASE+7, GETCASE+8, GETCASE+12, GETCASE+13, GETCASE+14, GETCASE+15 , GETCASE+16
DA	FILE+26~, FILE+50*!
DATE	GETCASE+2~
DIK	FILE+26~, FILE+50*!
>> EC23	FILE+30
>> EC7	FILE+27*, FILE+30, FILE+47, FILE+48, FILE+50
>> ECASNPI	GET+19, FILE+28, FILE+40
>> ECASPR	GET+19, FILE+28, FILE+34
>> ECCA	GET+40*, GET+42, GET+44, GET+46, GET+47, GET+55, GET+58, GET+59, GET+60, GET+63 , GET+69
>> ECCLAS	GET+18, FILE+28, FILE+34
>> ECCLAS2	GET+19, FILE+28, FILE+35
ECCN	GETCASE+2~, GETCASE+8, GETCASE+16, GET+31, GET+40, GET+85, GET+86, GET+90
>> ECDI	GET+58*, FILE+31
>> ECDOC	GET+58*, FILE+32
>> ECDOCNPI	GET+55, GET+56, FILE+40
ECDOCPC	GET+2~, GET+58*, FILE+37
ECDT	START+1~, START+4*, START+5, GET+55, GET+58, GET+63, GET+64
>> ECED	START+5
>> ECFILE	BEG+1, FILE+27, FILE+47, FILE+48, FILE+50, SETUP+2
>> ECGRP	SETUP+2
>> ECHEAD	GET+37, SETUP+1*, SETUP+2
ECINED	START+1~, START+5*, START+6
ECINSD	START+1~, START+5, START+6, START+7
>> ECISNPI	GET+64, GET+65, FILE+40
>> ECLOC	GET+25*, GET+28, FILE+31
>> ECMOD	GET+84, GET+86, GET+89, GET+90
>> ECMODS	GET+89, GET+90, FILE+32
>> ECODE	FILE+30, FILE+31, FILE+32, FILE+33, FILE+47
>> ECODE1	FILE+34, FILE+35, FILE+36, FILE+37, FILE+38, FILE+39, FILE+40, FILE+41, FILE+42*, FILE+47
>> ECODE2	FILE+43, FILE+44, FILE+45*, FILE+47
>> ECODE3	FILE+46*, FILE+48
>> ECODE4	FILE+46*, FILE+48
>> ECPACK	SETUP+2
>> ECPIECE	SETUP+2
>> ECPRO	GET+60*, GET+61, GET+72, GET+75, GET+77, FILE+31
>> ECPROF	START+3*, GET+17, GET+58
>> ECPT	GET+75*, GET+78, GET+87
>> ECPTNPI	GET+18, FILE+28, FILE+40
>> ECPTPR	GET+18, FILE+28, FILE+33
>> ECPTTM	GET+18, FILE+28, FILE+32
>> ECRN	FILE+49*
>> ECRTN	SETUP+2
>> ECS	GET+58*, FILE+31
>> ECSD	START+4
ECSTAT	GET+2~, GET+60*, GET+73
>> ECTM	GET+7*, FILE+32
>> ECTY	GET+25*, GET+37, FILE+32
>> ECVER	SETUP+2
>> ECXA	GET+20, GET+24, GET+37, GET+51, GET+92, FILE+30
>> ECXADMDT	GET+21*, GET+37
ECXASIH	GET+4~, GET+21*, GET+92
ECXCASE	GET+5~, GET+59*, FILE+46
ECXCERN	GET+5~, GET+6*, FILE+46
ECXCLST	GET+3~, GET+14*, FILE+43
ECXCM	GET+2~, GET+44*, GET+45, FILE+42
>> ECXCMOD	GET+75, GET+86, GET+87
>> ECXCPT	GET+87*, FILE+31
ECXCSC	GET+2~, GET+71*, FILE+38
ECXDA	START+1~, START+7*, GETCASE+3, GETCASE+5, GETCASE+11, GETCASE+12, GET+9
ECXDATA	FILE+22~, FILE+23*
ECXDATA(7	FILE+24
>> ECXDAY	GET+8*, FILE+31
ECXDD	START+3!
ECXDD("SPECIFIER"	START+3
ECXDFN	GETCASE+2~, GETCASE+5*, GETCASE+6, GETCASE+7, GETCASE+8, GETCASE+9, GETCASE+14, GETCASE+15, GETCASE+16, GETCASE+17 , GET+10, GET+17, GET+20, GET+25, GET+31, GET+35, GET+40, GET+43, GET+85, GET+86 , GET+90, FILE+30
>> ECXDIV	GET+25*, GET+91, FILE+30
>> ECXDOM	GET+21*, FILE+35
>> ECXDSSD	GET+57*, FILE+34
>> ECXDSSP	GET+57*, FILE+37
ECXECL	GET+3~, GET+41, GET+43, FILE+43
>> ECXENC	GET+37*, FILE+35
>> ECXERI	GET+16*, FILE+39
ECXERR	GET+3~, GET+43
ECXESC	GET+3~, GET+41, GET+43, FILE+43
ECXIEN	GET+2~, GET+31*, GET+32
ECXIS	GET+2~, GET+63, GET+64, GET+67, FILE+38
ECXISPC	GET+2~, GET+63*, FILE+38
>> ECXLOGIC	FILE+28, FILE+29, FILE+37, FILE+38, FILE+39, FILE+40, FILE+41, FILE+42, FILE+43, FILE+44 , FILE+45, FILE+46
ECXMDA	GETCASE+2~, GETCASE+7, GETCASE+8, GETCASE+9, GETCASE+15, GETCASE+16, GETCASE+17, GET+25, GET+31, GET+40 , GET+85, GET+86, GET+90
ECXMDT	GETCASE+2~, GETCASE+9, GETCASE+17, GET+7, GET+8, GET+10, GET+17, GET+20, GET+37
>> ECXMN	GET+20*, GET+51, GET+52, FILE+32
>> ECXMPI	GET+12, FILE+29, FILE+34
ECXMVDT	GET+2~, GET+9*, FILE+44
ECXNMPI	GET+5~, GET+12*, FILE+46
>> ECXOBS	GET+24*, GET+37, FILE+35
>> ECXORDDT	GET+32*, FILE+36
>> ECXORDST	GET+28*, FILE+35
ECXPAT	GET+10!
ECXPAT("CL ST	AT" , GET+14
ECXPAT("ERI"	GET+16
ECXPAT("MPI"	GET+12
ECXPAT("NAME"	GET+12
ECXPAT("SIGI"	GET+13
ECXPAT("SSN"	GET+12
>> ECXPATCAT	GET+35*, FILE+41
>> ECXPDIV	GET+91*, FILE+36
>> ECXPNM	GET+12*, FILE+30
ECXPRCL	GET+2~, GET+69*, GET+71, FILE+38
ECXPRCNM	GET+5~, GET+61*, FILE+46
ECXSIGI	GET+5~, GET+13*, FILE+46
>> ECXSSN	GET+12*, GET+37, FILE+30
ECXSTANO	GET+4~, GET+50, GET+54, FILE+45
ECXTEMPD	GET+4~, GET+53*, GET+54
ECXTEMPW	GET+4~, GET+52*, GET+53
>> ECXTS	GET+21*, GET+24, GET+37, FILE+23
ECXTSC	FILE+22~, FILE+24*, FILE+32
ECXUSRTN	GET+2~
ECXVIST	GET+3~, GET+43
ECXVIST("ENCCL"	GET+43
ECXVIST("ENCSC"	GET+43
>> ECXW	GET+46, GET+47, GET+49, FILE+31
>> ECXYM	GET+8, GET+9, GET+32
ERR	GET+80!, GET+82!
ERR("DIERR"	GET+83
OCIEN	GETCASE+2~, GETCASE+11*, GETCASE+12
>> OK	GET+10*, GET+11
QFLG	START+1~, START+2, START+6, START+7, FILE+51
SUB	GET+2~, GET+84*, GET+85, GET+86
TAB	GETCASE+2~, GETCASE+4, GETCASE+6, GETCASE+7, GETCASE+8, GETCASE+13, GETCASE+14, GETCASE+15, GETCASE+16
TEMPIEN	GET+49~*, GET+50
TYPE	GET+2~, GET+77*, GET+78
U	GETCASE+3, GETCASE+5, GETCASE+9, GETCASE+12, GETCASE+17, GET+9, GET+18, GET+19, GET+20, GET+21 , GET+25, GET+31, GET+32, GET+42, GET+44, GET+46, GET+47, GET+52, GET+53, GET+55 , GET+56, GET+58, GET+59, GET+60, GET+63, GET+65, GET+69, GET+75, GET+77, GET+86 , GET+90, FILE+30, FILE+31, FILE+32, FILE+33, FILE+34, FILE+35, FILE+36, FILE+37, FILE+38 , FILE+39, FILE+40, FILE+41, FILE+42, FILE+43, FILE+44, FILE+45, FILE+46
VISIT	GET+3~, GET+42*, GET+43
X	GET+2~, GET+17, GET+18, GET+19, GET+20, GET+21
>> ZTQUEUED	FILE+51

Customize PDF page

Package: DSS Extracts

Routine: ECXRAD

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: