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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ECXMOV

Package: DSS Extracts

Routine: ECXMOV


Information

ECXMOV ;ALB/JAP,BIR/DMA,PTD-Transfer and Discharge Extract ;1/30/19 09:25

Source Information

Source file <ECXMOV.m>

Call Graph

Call Graph

Call Graph Total: 16

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 2 $$S^%ZTLOAD  $$FMADD^XLFDT  
MailMan 1 ^XMD  

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

Package Total Caller Graph
DSS Extracts 1 ECXMOV  
Event Capture 1 ECXMOV  

Entry Points

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 ECX*128
; Input - ECXDA is the PATIENT MOVEMENT (#405) record number for the discharge that has no admission
; associated with it. ECX*128
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

External References

Name Field # of Occurrence
^%DTC GET+44
$$S^%ZTLOAD FILE+29
FIELD^DID START+4
IX1^DIK FILE+28
$$GET1^DIQ GET+32, GET+62, DISASIH+16
$$GETDIV^ECXDEPT GET+42, GET+54, DISASIH+20
^ECXKILL BEG+2, QUE+1
QUE^ECXTAUTO QUE+1
^ECXTRAC BEG+2
$$ECXDATE^ECXUTL GET+43, FILE+17, FILE+18, DISASIH+11
$$ECXTIME^ECXUTL GET+7, FILE+20, DISASIH+14
$$PATCAT^ECXUTL GET+59, DISASIH+22
$$INP^ECXUTL2 GET+36, DISASIH+7
$$PRIMARY^ECXUTL2 GET+49
ECXDEF^ECXUTL2 SETUP+2
$$PAT^ECXUTL3 GET+4, DISASIH+5
$$ENCNUM^ECXUTL4 GET+61, DISASIH+23
$$OBSPAT^ECXUTL4 GET+56, DISASIH+21
$$ISASIH^ECXUTL6 GET+20, GET+27
$$NEEDADR^ECXUTL6 START+11, GET+20, GET+27
$$FMADD^XLFDT GET+30, DISASIH+7, CLEAN+5
^XMD MAIL+17

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] START+8, START+9, GET+2, GET+11, GET+17, DISASIH+3
^DGPM("ATID2" GET+15, GET+16
^DIC(42 - [#42] GET+8, GET+33, GET+40, DISASIH+17, DISASIH+19
^ECX( FILE+15, FILE+27*
^ECX(727.4 - [#727.4] GET+41
^TMP($J START+3!, START+10, START+13!, GET+20*, GET+27*
^XMB("NETNAME" MAIL+8
^XTMP("ECXMOV" START+11, CLEAN+3, CLEAN+4!, CLEAN+5*

Label References

Name Line Occurrences
CLEAN START+12
DISASIH START+10, START+11
FILE GET+63, DISASIH+26
GET START+9
MAIL GET+11
SETUP BEG+1, QUE+1

Naked Globals

Name Field # of Occurrence
^(0 GET+2, GET+17, DISASIH+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CNT CLEAN+1~, CLEAN+2*, CLEAN+3*, CLEAN+4
DA FILE+14~, FILE+28*!
DATE CLEAN+1~, CLEAN+2*, CLEAN+3*, CLEAN+4*
DIK FILE+14~, FILE+28*!
DT CLEAN+5
EC GET+2*, GET+3, GET+8, GET+11*, GET+17*, GET+24, GET+44, DISASIH+1~, DISASIH+3*, DISASIH+4
DISASIH+13, DISASIH+18
>> EC23 START+6, FILE+16
>> EC7 FILE+15*, FILE+16, FILE+27, FILE+28
ECA GET+11*, GET+23, GET+61, FILE+18, FILE+20, DISASIH+1~, DISASIH+9*, DISASIH+23
>> ECARG START+7*, START+8, START+9
>> ECCA GET+11*
ECCXLOS DISASIH+1~
ECD START+7*, START+8*, START+9, GET+3, GET+7, GET+15, GET+23, GET+43, GET+44, GET+49
FILE+17, DISASIH+1~, DISASIH+10*, DISASIH+11, DISASIH+14
>> ECDA START+8*, START+9*, START+10*, START+11*, GET+2, GET+11, GET+20, GET+27, GET+32, FILE+18
DISASIH+3, DISASIH+16
>> ECDAL GET+16*, GET+17
ECDAPRNP GET+51*, FILE+24, DISASIH+1~, DISASIH+15*
ECDI GET+43*, FILE+18, DISASIH+1~, DISASIH+11*
ECDIS START+1~
>> ECDL GET+15*, GET+16
ECDPRNPI GET+51*, FILE+24, DISASIH+1~, DISASIH+15*
>> ECED START+6*, START+8
>> ECFILE BEG+1, FILE+15, FILE+27, FILE+28, SETUP+2
>> ECGRP SETUP+2
>> ECHEAD GET+61, SETUP+1*, SETUP+2, DISASIH+23
ECM START+7*, START+10*, START+11*, GET+19, GET+20, GET+26, GET+27, GET+43, GET+48, GET+62
FILE+18, DISASIH+1~, DISASIH+12*
ECMT GET+3*, FILE+19, DISASIH+1~, DISASIH+4*, DISASIH+13*
>> ECODE FILE+16*, FILE+17*, FILE+18*, FILE+19*, FILE+20*, FILE+27
>> ECODE1 FILE+21*, FILE+22*, FILE+23*, FILE+24*, FILE+25*, FILE+26*, FILE+27
>> ECPACK SETUP+2
>> ECPIECE SETUP+2
>> ECPRO START+5*
>> ECRN FILE+27*
>> ECRTN SETUP+2
>> ECSD1 START+7
ECTM GET+7*, FILE+19, DISASIH+2~, DISASIH+14*
>> ECVER SETUP+2
ECXA GET+36*, GET+56, GET+61, FILE+16, DISASIH+2~, DISASIH+8*, DISASIH+21, DISASIH+23, DISASIH+24*
ECXDA MAIL~, MAIL+13
ECXDAPPC START+1~, GET+47*, GET+50*, FILE+23, DISASIH+1~, DISASIH+15*
ECXDAPR GET+47*, GET+50*, FILE+22, DISASIH+1~, DISASIH+15*
>> ECXDATE GET+3*, GET+4, GET+23*, GET+30*, GET+36, DISASIH+4*, DISASIH+5, DISASIH+7
ECXDD START+4!, START+5!
ECXDD("SPECIFIER" START+5
ECXDFN GET+3*, GET+4, GET+15, GET+16, GET+36, GET+49, GET+59, FILE+16, DISASIH+2~, DISASIH+4*
DISASIH+5, DISASIH+7, DISASIH+22
ECXDOM GET+36*, FILE+21, DISASIH+2~, DISASIH+8*
ECXDPCT GET+47*, GET+50*, FILE+22, DISASIH+1~, DISASIH+15*
ECXDPR GET+47*, GET+50*, FILE+21, DISASIH+1~, DISASIH+15*
ECXDPRPC START+1~, GET+47*, GET+50*, FILE+23, DISASIH+1~, DISASIH+15*
ECXDSC START+1~, GET+49*, GET+50, GET+51, DISASIH+1~, DISASIH+15*
ECXDSSD GET+38*, GET+41*, FILE+21, DISASIH+1~, DISASIH+15*
ECXENC GET+61*, GET+63, FILE+21, DISASIH+1~, DISASIH+23*, DISASIH+26
ECXFAC GET+38*, GET+40*, GET+42, GET+54, FILE+16, DISASIH+1~, DISASIH+15*, DISASIH+19*, DISASIH+20
>> ECXLOGIC FILE+18, FILE+23, FILE+24, FILE+25, FILE+26
ECXLOS GET+44*, FILE+19, DISASIH+2~, DISASIH+15*
ECXMPI GET+6*, FILE+21, DISASIH+2~, DISASIH+6*
ECXOBS GET+56*, GET+61, FILE+21, DISASIH+1~, DISASIH+21*, DISASIH+23
ECXPAT GET+4!, GET+5!, DISASIH+1~, DISASIH+5
ECXPAT("MPI" GET+6, DISASIH+6
ECXPAT("NAME" GET+6, DISASIH+6
ECXPAT("SSN" GET+6, DISASIH+6
ECXPATCAT GET+59*, FILE+25, DISASIH+1~, DISASIH+22*
ECXPDIV GET+54~*, FILE+22, DISASIH+1~, DISASIH+20*
ECXPNM GET+6*, FILE+16, DISASIH+2~, DISASIH+6*
ECXSSN GET+6*, GET+61, FILE+16, DISASIH+2~, DISASIH+6*, DISASIH+23
ECXSTANO START+2~, GET+38*, GET+42*, FILE+26, DISASIH+1~, DISASIH+15*
ECXTS GET+36*, GET+56, GET+61, GET+62*, FILE+18, DISASIH+2~, DISASIH+8*, DISASIH+21, DISASIH+23, DISASIH+25*
ECXWRD GET+38*, GET+40*, FILE+18, DISASIH+2~, DISASIH+15*, DISASIH+16*, DISASIH+17*, DISASIH+18*, DISASIH+19*
ECXWTO GET+8*, FILE+19, DISASIH+1~, DISASIH+15*
>> ECXYM GET+43, FILE+17, FILE+18, DISASIH+11
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+20*, GET+27*
NUM CLEAN+1~, CLEAN+4*
OK GET+4*, GET+5, DISASIH+1~, DISASIH+5*
>> QFLG START+6*, START+7, START+8, START+9, START+10, GET+11*, FILE+29*
REC START+1~, START+11*
U START+6, START+11, GET+3, GET+8, GET+11, GET+17, GET+20, GET+24, GET+27, GET+36
GET+40, GET+41, GET+44, GET+50, GET+51, FILE+16, FILE+17, FILE+18, FILE+19, FILE+20
FILE+21, FILE+22, FILE+23, FILE+24, FILE+25, FILE+26, DISASIH+4, DISASIH+8, DISASIH+9, DISASIH+10
DISASIH+13, DISASIH+18, DISASIH+19
VAL START+1~, START+11*
W START+1~, GET+24*, GET+33*, GET+39, GET+40, GET+41
WARD GET+32~*, GET+33, DISASIH+1~, DISASIH+15*
WTO START+1~, GET+8*, DISASIH+1~, DISASIH+15*
X START+1~, GET+36*, GET+44, DISASIH+1~, DISASIH+7*, DISASIH+8, DISASIH+9, DISASIH+10
X1 START+1~, GET+44*
X2 START+1~, GET+44*
XMSUB MAIL+4~, MAIL+6*
XMTEXT MAIL+4~, MAIL+7*
XMY MAIL+4~
XMY("G.DSS-MOVS@" MAIL+8*
YEARMON START+1~, START+6*, START+11
>> ZTQUEUED FILE+29
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All