Routine: ECXMOV

Package	Total	Call Graph
DSS Extracts	9	$$GETDIV^ECXDEPT ^ECXKILL QUE^ECXTAUTO ^ECXTRAC ($$ECXDATE,$$ECXTIME,$$PATCAT)^ECXUTL ($$INP,$$PRIMARY,ECXDEF)^ECXUTL2 $$PAT^ECXUTL3 ($$ENCNUM,$$OBSPAT)^ECXUTL4 ($$ISASIH,$$NEEDADR)^ECXUTL6
VA FileMan	4	^%DTC FIELD^DID IX1^DIK $$GET1^DIQ
Kernel	3	$$S^%ZTLOAD ($$FMADD,$$FMTE)^XLFDT $$LJ^XLFSTR
MailMan	1	^XMD
Registration	1	DEM^VADPT

Package	Total	Caller Graph
DSS Extracts	1	ECXMOV

Name	Comments	DBIA/ICR reference
BEG	;entry point from option
START	; start package specific extract
GET	;170 Moved record creation to be under "GET"
FILE	;file the extract record
SETUP	;Set required input for ECXTRAC
QUE	; entry point for the background requeuing handled by ECXTAUTO
MAIL(ECXDA)	; ; Created to send a message pointing to a bad record ECX128 ; Input - ECXDA is the PATIENT MOVEMENT (#405) record number for the discharge that has no admission ; associated with it. ECX128
DISASIH	;170 Section added to create a discharge ASIH other facility record
CLEAN	;173 Retain the six most recent sets of entries for ASIH review
SETTMP(ERRMSG,ECDA,ECDATE,DFN,SSN)	;187 Set TMP global for MM messages
SENDMSG	; Added for patch 187. SEND MM messages

Name	Field # of Occurrence
^%DTC	GET+50
$$S^%ZTLOAD	FILE+37
FIELD^DID	START+4
IX1^DIK	FILE+36
$$GET1^DIQ	GET+38, GET+68, DISASIH+20, SETTMP+2
$$GETDIV^ECXDEPT	GET+48, GET+60, DISASIH+24
^ECXKILL	BEG+2, QUE+1
QUE^ECXTAUTO	QUE+1
^ECXTRAC	BEG+2
$$ECXDATE^ECXUTL	GET+49, FILE+22, FILE+23, DISASIH+14
$$ECXTIME^ECXUTL	GET+9, FILE+25, DISASIH+18
$$PATCAT^ECXUTL	GET+65, DISASIH+26
$$INP^ECXUTL2	GET+42, DISASIH+10
$$PRIMARY^ECXUTL2	GET+55
ECXDEF^ECXUTL2	SETUP+2
$$PAT^ECXUTL3	GET+5, DISASIH+6
$$ENCNUM^ECXUTL4	GET+67, DISASIH+27
$$OBSPAT^ECXUTL4	GET+62, DISASIH+25
$$ISASIH^ECXUTL6	GET+26, GET+33
$$NEEDADR^ECXUTL6	START+13, GET+26, GET+33
DEM^VADPT	SETTMP+4
$$FMADD^XLFDT	GET+36, DISASIH+10, CLEAN+5
$$FMTE^XLFDT	SETTMP+5
$$LJ^XLFSTR	SENDMSG+19
^XMD	MAIL+17, SENDMSG+22

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DGPM - [#405]	FIELD^DID, GET1^DIQ
^DIC(42.4 - [#42.4]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	START+9, START+10, GET+3, GET+15, GET+23, DISASIH+4
^DGPM("ATID2"	GET+21, GET+22
^DIC(42 - [#42]	GET+10, GET+39, GET+46, DISASIH+21, DISASIH+23
^ECX(	FILE+20, FILE+33, FILE+34
^ECX(727.4 - [#727.4]	GET+47
^TMP($J	START+3!, START+11, START+14, START+16!, GET+26, GET+33, SETTMP+7*, SENDMSG+2, SENDMSG+10, SENDMSG+15 , SENDMSG+17, SENDMSG+18, SENDMSG+23!
^XMB("NETNAME"	MAIL+8, SENDMSG+4
^XTMP("ECXMOV"	START+13, CLEAN+3, CLEAN+4!, CLEAN+5*

Name	Line Occurrences
CLEAN	START+15
DISASIH	START+11, START+13
FILE	GET+69, DISASIH+30
GET	START+10
SENDMSG	START+14
SETTMP	GET+6, GET+15, GET+16, DISASIH+7, DISASIH+17
SETUP	BEG+1, QUE+1

Name	Field # of Occurrence
^(0	GET+3, GET+23, DISASIH+4

Name	Field # of Occurrence
CNT	CLEAN+1~, CLEAN+2, CLEAN+3, CLEAN+4
DA	FILE+18~, FILE+36*!
DATE	CLEAN+1~, CLEAN+2, CLEAN+3, CLEAN+4*
DFN	SETTMP~, SETTMP+2, SETTMP+7
DIK	FILE+18~, FILE+36*!
DT	CLEAN+5
EC	GET+3, GET+4, GET+10, GET+15, GET+23, GET+30, GET+50, DISASIH+1~, DISASIH+4, DISASIH+5 , DISASIH+16, DISASIH+22
>> EC23	START+6, FILE+21, SENDMSG+3, SENDMSG+5
>> EC7	FILE+20*, FILE+21, FILE+33, FILE+34, FILE+36
ECA	GET+15, GET+29, GET+67, FILE+23, FILE+25, DISASIH+1~, DISASIH+12, DISASIH+17, DISASIH+27
>> ECARG	START+8*, START+9, START+10
>> ECCA	GET+15*
ECCXLOS	DISASIH+1~
ECD	START+8, START+9, START+10, GET+4, GET+6, GET+9, GET+15, GET+16, GET+21, GET+29 , GET+49, GET+50, GET+55, FILE+22, DISASIH+1~, DISASIH+7, DISASIH+13*, DISASIH+14, DISASIH+18
ECDA	START+9, START+10, START+11, START+13, GET+3, GET+6, GET+15, GET+16, GET+26, GET+33 , GET+38, FILE+23, DISASIH+4, DISASIH+7, DISASIH+17, DISASIH+20, SETTMP~, SETTMP+7, SENDMSG+1~, SENDMSG+16* , SENDMSG+17*, SENDMSG+18, SENDMSG+19
>> ECDAL	GET+22*, GET+23
ECDAPRNP	GET+57, FILE+29, DISASIH+1~, DISASIH+19
ECDATE	SETTMP~, SETTMP+5
ECDFN	SENDMSG+1~, SENDMSG+14, SENDMSG+15, SENDMSG+17, SENDMSG+18
ECDI	GET+49, FILE+23, DISASIH+1~, DISASIH+14
ECDIS	START+1~
>> ECDL	GET+21*, GET+22
ECDPRNPI	GET+57, FILE+29, DISASIH+1~, DISASIH+19
>> ECED	START+6*, START+9
>> ECEDN	SENDMSG+5
>> ECFILE	BEG+1, FILE+20, FILE+33, FILE+34, FILE+36, SETUP+2
>> ECGRP	SETUP+2, SENDMSG+4
>> ECHEAD	GET+67, SETUP+1*, SETUP+2, DISASIH+27
ECM	START+8, START+11, START+13, GET+25, GET+26, GET+32, GET+33, GET+49, GET+54, GET+68 , FILE+23, DISASIH+1~, DISASIH+15
ECMOVDT	SETTMP+1~, SETTMP+5*, SETTMP+7
ECMSG	SENDMSG+1~
ECMSG(1	SENDMSG+5*
ECMSG(2	SENDMSG+6*
ECMSG(3	SENDMSG+7*
ECMSG(4	SENDMSG+8*
ECMSG(5	SENDMSG+11, SENDMSG+12, SENDMSG+13, SENDMSG+19, SENDMSG+20*
ECMT	GET+4, GET+16, FILE+24, DISASIH+1~, DISASIH+5, DISASIH+16*, DISASIH+17
>> ECODE	FILE+21, FILE+22, FILE+23, FILE+24, FILE+25*, FILE+33
>> ECODE1	FILE+26, FILE+27, FILE+28, FILE+29, FILE+30, FILE+31, FILE+33
>> ECODE2	FILE+32*, FILE+34
>> ECODE3	FILE+32*, FILE+34
>> ECPACK	SETUP+2, SENDMSG+3, SENDMSG+5
>> ECPIECE	SETUP+2
>> ECPRO	START+5*
>> ECRN	FILE+35*
>> ECRTN	SETUP+2
>> ECSD1	START+8
>> ECSDN	SENDMSG+5
ECSSN	SENDMSG+1~
ECSTR	SENDMSG+1~, SENDMSG+18*, SENDMSG+19
ECTM	GET+9, FILE+24, DISASIH+2~, DISASIH+18
>> ECVER	SETUP+2
ECXA	GET+42, GET+62, GET+67, FILE+21, DISASIH+2~, DISASIH+11, DISASIH+25, DISASIH+27, DISASIH+28*
ECXCERN	GET+2~, FILE+32, DISASIH+3~
ECXDA	MAIL~, MAIL+13
ECXDAPPC	START+1~, GET+53, GET+56, FILE+28, DISASIH+1~, DISASIH+19*
ECXDAPR	GET+53, GET+56, FILE+27, DISASIH+1~, DISASIH+19*
>> ECXDATE	GET+4, GET+5, GET+29, GET+36, GET+42, DISASIH+5, DISASIH+6, DISASIH+10
ECXDD	START+4!, START+5!
ECXDD("SPECIFIER"	START+5
ECXDFN	GET+4, GET+5, GET+6, GET+15, GET+16, GET+21, GET+22, GET+42, GET+55, GET+65 , FILE+21, DISASIH+2~, DISASIH+5, DISASIH+6, DISASIH+7, DISASIH+10, DISASIH+17, DISASIH+26
ECXDOM	GET+42, FILE+26, DISASIH+2~, DISASIH+11
ECXDPCT	GET+53, GET+56, FILE+27, DISASIH+1~, DISASIH+19*
ECXDPR	GET+53, GET+56, FILE+26, DISASIH+1~, DISASIH+19*
ECXDPRPC	START+1~, GET+53, GET+56, FILE+28, DISASIH+1~, DISASIH+19*
ECXDSC	START+1~, GET+55, GET+56, GET+57, DISASIH+1~, DISASIH+19
ECXDSSD	GET+44, GET+47, FILE+26, DISASIH+1~, DISASIH+19*
ECXENC	GET+67, GET+69, FILE+26, DISASIH+1~, DISASIH+27, DISASIH+30
ECXFAC	GET+44, GET+46, GET+48, GET+60, FILE+21, DISASIH+1~, DISASIH+19, DISASIH+23, DISASIH+24
>> ECXLOGIC	FILE+19, FILE+23, FILE+28, FILE+29, FILE+30, FILE+31, FILE+32
ECXLOS	GET+50, FILE+24, DISASIH+2~, DISASIH+19
ECXMPI	GET+7, FILE+19, FILE+26, DISASIH+2~, DISASIH+8*
ECXNMPI	GET+2~, GET+7, FILE+32, DISASIH+3~, DISASIH+8
ECXOBS	GET+62, GET+67, FILE+26, DISASIH+1~, DISASIH+25, DISASIH+27
ECXPAT	GET+5!, GET+6!, DISASIH+1~, DISASIH+6
ECXPAT("MPI"	GET+7, DISASIH+8
ECXPAT("NAME"	GET+7, DISASIH+8
ECXPAT("SIGI"	GET+8, DISASIH+9
ECXPAT("SSN"	GET+7, DISASIH+8
ECXPATCAT	GET+65, FILE+30, DISASIH+1~, DISASIH+26
ECXPDIV	GET+60~, FILE+27, DISASIH+1~, DISASIH+24
ECXPNM	GET+7, FILE+21, DISASIH+2~, DISASIH+8
ECXSIGI	GET+2~, GET+8, FILE+32, DISASIH+3~, DISASIH+9
ECXSSN	GET+7, GET+15, GET+16, GET+67, FILE+21, DISASIH+2~, DISASIH+8, DISASIH+17, DISASIH+27, SETTMP+1~
ECXSTANO	START+2~, GET+44, GET+48, FILE+31, DISASIH+1~, DISASIH+19*
ECXTS	GET+42, GET+62, GET+67, GET+68, FILE+23, DISASIH+2~, DISASIH+11, DISASIH+25, DISASIH+27, DISASIH+29
ECXWRD	GET+44, GET+46, FILE+23, DISASIH+2~, DISASIH+19, DISASIH+20, DISASIH+21, DISASIH+22, DISASIH+23*
ECXWTO	GET+10, FILE+24, DISASIH+1~, DISASIH+19
>> ECXYM	GET+49, FILE+22, FILE+23, DISASIH+14
ERRMSG	SETTMP~, SETTMP+6, SETTMP+7, SENDMSG+1~, SENDMSG+9, SENDMSG+10*, SENDMSG+11, SENDMSG+15, SENDMSG+17, SENDMSG+18
I	SENDMSG+1~, SENDMSG+10*, SENDMSG+11, SENDMSG+12, SENDMSG+13, SENDMSG+19, SENDMSG+20
J	SENDMSG+1~, SENDMSG+9, SENDMSG+11, SENDMSG+12, SENDMSG+13, SENDMSG+15, SENDMSG+19, SENDMSG+20*
LINENUM	MAIL+4~, MAIL+10, MAIL+11, MAIL+12, MAIL+13, MAIL+14, MAIL+15, MAIL+16
MSGTEXT	MAIL+4~
MSGTEXT(	MAIL+11, MAIL+12, MAIL+13, MAIL+14, MAIL+15, MAIL+16
NEEDREC	GET+1~, GET+26, GET+33
NUM	CLEAN+1~, CLEAN+4*
OK	GET+5, GET+6, DISASIH+1~, DISASIH+6, DISASIH+7
PTNAME	SETTMP+1~, SETTMP+2*, SETTMP+3
>> QFLG	START+6, FILE+37
REC	START+1~, START+13*
SSN	SETTMP~, SETTMP+6*, SETTMP+7
U	START+6, START+13, GET+4, GET+10, GET+15, GET+23, GET+26, GET+30, GET+33, GET+42 , GET+46, GET+47, GET+50, GET+56, GET+57, FILE+21, FILE+22, FILE+23, FILE+24, FILE+25 , FILE+26, FILE+27, FILE+28, FILE+29, FILE+30, FILE+31, FILE+32, DISASIH+5, DISASIH+11, DISASIH+12 , DISASIH+13, DISASIH+16, DISASIH+22, DISASIH+23, SETTMP+6, SETTMP+7, SENDMSG+3, SENDMSG+5, SENDMSG+19
VADM	SETTMP+1~
VADM(1	SETTMP+7
VADM(2	SETTMP+6
VAL	START+1~, START+13*
W	START+1~, GET+30, GET+39, GET+45, GET+46, GET+47
WARD	GET+38~, GET+39, DISASIH+1~, DISASIH+19
WTO	START+1~, GET+10, DISASIH+1~, DISASIH+19
X	START+1~, GET+42, GET+50, DISASIH+1~, DISASIH+10, DISASIH+11, DISASIH+12, DISASIH+13
X1	START+1~, GET+50*
X2	START+1~, GET+50*
XMDUZ	SENDMSG+1~, SENDMSG+4*
XMSUB	MAIL+4~, MAIL+6, SENDMSG+1~, SENDMSG+3
XMTEXT	MAIL+4~, MAIL+7, SENDMSG+1~, SENDMSG+21
XMY	MAIL+4~, SENDMSG+1~, SENDMSG+4!
XMY("G.DSS-"	SENDMSG+4*
XMY("G.DSS-MOVS@"	MAIL+8*
YEARMON	START+1~, START+6*, START+13
>> ZTQUEUED	FILE+37

Name

Field # of Occurrence

CNT

CLEAN+1~, CLEAN+2*, CLEAN+3*, CLEAN+4

DA

FILE+18~, FILE+36*!

DATE

CLEAN+1~, CLEAN+2*, CLEAN+3*, CLEAN+4*

DFN

SETTMP~, SETTMP+2, SETTMP+7

DIK

FILE+18~, FILE+36*!