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

Package: Imaging

Routine: MAGIP138


Information

MAGIP138 ;WOIFO/PMK,NST,MAT - Install code for MAG*3.0*138 (DIX) ; 31 Jul 2013 12:20 PM

Source Information

Source file <MAGIP138.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Imaging 5 DELRTNS^MAGI138O  ($$CP,ABTMSG,DELFILE,MES)^MAGKIDS  ($$TRIM,INS)^MAGQBUT4  CLEAR^MAGUERR  DUMP^MAGUERR1  
VA FileMan 4 FILESEC^DDMOD  (,$$FIND1)^DIC  (FILE,UPDATE)^DIE  (,ENALL2,IXALL)^DIK  
Kernel 3 ($$FMTE,$$NOW)^XLFDT  $$ADD^XPDMENU  BMES^XPDUTL  

Entry Points

Name Comments DBIA/ICR reference
ERROR ;
PRE ;
POS ;
UPD110() ;
MAILUPDT ; Add the mail group and subject for MAGDHOW* processing errors
CONVERT1 ; convert file 2006.5831 to the new global format - don't build indices
CONVERT2 ; restore the new file 2006.5831 and build cross-references
NEW7792 ; create the MAGD SENDER entry in the HLO APPLICATION REGISTRY (file 779.2)
NEW7794 ; create the entries in the HLO SUBSCRIPTION REGISTRY (file 779.4)
NEW7794A(NAME,DESCRIPTION,OWNER) ; create the entry in file 779.4
ENTRYACT(PROTOCOL,ACTION) ; update the protocol's ENTRY ACTION
ADTSUBS ; add new subscribers to MAG CPACS A01 - A13 ADT event drives
ADTSUBS1(EVENT,TYPE) ; add one subscriber
ADDMS(INTERVAL) ; Add Message Subjects for Mail Management
ADDMG ; Add Mail Message groups to the Mail Group file (XMB(3.8))
ADD(NMSP) ;
ADDDUZ(NMSP) ;
DLKP ; Add Generic Mail groups to BP Message subfile
TEXT ; Message Subjects
RPCL110 ;
RPCL130 ;
RPCL079 ;
RPCL136V ;
RPCL137V ;
RPCL138V ;

External References

Name Field # of Occurrence
FILESEC^DDMOD CONVERT2+15
^DIC NEW7792+6, NEW7792+12, NEW7794A+4, ENTRYACT+2, ADTSUBS1+11, ADTSUBS1+19
$$FIND1^DIC DLKP+8
FILE^DIE ADD+10
UPDATE^DIE NEW7792+21, NEW7794A+13, ENTRYACT+8, ADTSUBS1+38, ADTSUBS1+50, ADDMS+8, ADD+6, ADDDUZ+5, DLKP+12
^DIK PRE+5, PRE+7
ENALL2^DIK CONVERT1+30
IXALL^DIK CONVERT2+21
DELRTNS^MAGI138O POS+62
$$CP^MAGKIDS POS+8, POS+12, POS+16, POS+20, POS+24, POS+28, POS+34, POS+38, POS+42, POS+45
POS+48, POS+51
ABTMSG^MAGKIDS ERROR+3
DELFILE^MAGKIDS CONVERT1+34
MES^MAGKIDS POS+56, POS+60, POS+69, CONVERT1+5, CONVERT1+10, CONVERT2+4, CONVERT2+22, NEW7792+8, NEW7792+14, NEW7792+23
NEW7792+25, NEW7794A+6, NEW7794A+15, NEW7794A+17, ENTRYACT+4, ENTRYACT+10, ENTRYACT+12, ADTSUBS1+13, ADTSUBS1+21, ADTSUBS1+40
, ADTSUBS1+42, ADTSUBS1+52, ADTSUBS1+54
$$TRIM^MAGQBUT4 ADD+3, ADD+4, ADD+5, ADDDUZ+3, DLKP+8
INS^MAGQBUT4 POS+73
CLEAR^MAGUERR POS+2
DUMP^MAGUERR1 ERROR+3
$$FMTE^XLFDT POS+72, MAILUPDT+1, MAILUPDT+3, MAILUPDT+5
$$NOW^XLFDT POS+72, POS+73, MAILUPDT+1, MAILUPDT+3, MAILUPDT+5
$$ADD^XPDMENU POS+55, POS+59
BMES^XPDUTL POS+72, MAILUPDT+1, MAILUPDT+3, MAILUPDT+5, ADDMS+9, ADD+7, ADDDUZ+6, DLKP+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MAG(2006.5831 - [#2006.5831] FILESEC^DDMOD
^XMB(3.8 - [#3.8] FIND1^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("DEL" POS+67
^MAG(2006.1 - [#2006.1] ADDMS+3, ADDMS+5, ADDMG+3, ADDMG+4, DLKP+3, DLKP+4, DLKP+6, DLKP+7, DLKP+9
^MAG(2006.5831 - [#2006.5831] CONVERT1+4, CONVERT1+8, CONVERT1+15, CONVERT1+17, CONVERT1+22, CONVERT1+23, CONVERT1+31, CONVERT2+3, CONVERT2+17, CONVERT2+18!
CONVERT2+19*, CONVERT2+23
^TMP("MAG" CONVERT1+12!, CONVERT1+21*, CONVERT1+24*, CONVERT1+26*, CONVERT1+28*, CONVERT2+19, CONVERT2+20!
^XMB(3.8 - [#3.8] ADD+3, ADD+4, ADDDUZ+3

Label References

Name Line Occurrences
ADD ADDMG+6
ADDDUZ ADDMG+7
ADDMG MAILUPDT+2
ADDMS MAILUPDT+4
ADTSUBS UPD110+7
ADTSUBS1 ADTSUBS+2, ADTSUBS+3, ADTSUBS+4, ADTSUBS+5, ADTSUBS+6, ADTSUBS+7
CONVERT1 PRE+2
CONVERT2 UPD110+2
DLKP MAILUPDT+6
ENTRYACT UPD110+5, UPD110+6
ERROR POS+8, POS+12, POS+16, POS+20, POS+24, POS+28, POS+34, POS+38, POS+42, POS+45
POS+48, POS+51
MAILUPDT UPD110+8
NEW7792 UPD110+3
NEW7794 UPD110+4
NEW7794A NEW7794+7, NEW7794+13

Naked Globals

Name Field # of Occurrence
^(0 CONVERT2+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACTION ENTRYACT~, ENTRYACT+7
CALLBACK POS+1~, POS+7*, POS+8, POS+11*, POS+12, POS+15*, POS+16, POS+19*, POS+20, POS+23*
POS+24, POS+27*, POS+28, POS+33*, POS+34, POS+37*, POS+38, POS+41*, POS+42
CLINCNT CONVERT1+1~, CONVERT1+22*, CONVERT1+23*, CONVERT1+24, CONVERT1+26
CLINIC CONVERT1+1~, CONVERT1+23*, CONVERT1+24
CLINIEN CONVERT1+1~, CONVERT1+22*, CONVERT1+23
CPTIEN CONVERT1+1~, CONVERT1+19*, CONVERT1+20
DA PRE+1~, PRE+5*, PRE+7*
DA(1 PRE+5*, PRE+7*
DEL POS+65~, POS+67*, POS+68
DESCRIPTION NEW7792+1~, NEW7794+1~, NEW7794+5*, NEW7794+7, NEW7794+11*, NEW7794+13, NEW7794A~, NEW7794A+12, ADTSUBS1+1~
DESCRIPTION(1 ADTSUBS1+6*
DESCRIPTION(2 ADTSUBS1+7*
DIC NEW7792+1~, NEW7792+6*, NEW7792+12*, NEW7794A+1~, NEW7794A+4*, ENTRYACT+1~, ENTRYACT+2*, ADTSUBS1+2~, ADTSUBS1+11*, ADTSUBS1+19*
DIC(0 NEW7792+6*, NEW7792+12*, NEW7794A+4*, ENTRYACT+2*, ADTSUBS1+11*, ADTSUBS1+19*
DIERR NEW7792+1~, NEW7792+22, NEW7794A+1~, NEW7794A+14, ENTRYACT+9, ADTSUBS1+39, ADTSUBS1+51, ADDMS+9!, ADD+7!, ADD+8!
, ADD+11!, ADDDUZ+6, ADDDUZ+7!, DLKP+1~, DLKP+13!
DIK PRE+1~, PRE+5*, PRE+7*, CONVERT1+1~, CONVERT1+29*, CONVERT2+1~, CONVERT2+21*
DUZ POS+73, ADTSUBS1+31, ADDDUZ+4
EVENT ADTSUBS1~, ADTSUBS1+4, ADTSUBS1+35
EVENTDRIVER ADTSUBS1+1~, ADTSUBS1+4*, ADTSUBS1+11
EVENTDRIVERIEN ADTSUBS1+1~, ADTSUBS1+15*, ADTSUBS1+48
HL7SUBLIST CONVERT1+1~, CONVERT1+19*, CONVERT1+20
I NEW7792+1~, NEW7792+24*, NEW7792+25, NEW7794A+1~, NEW7794A+16*, NEW7794A+17, ENTRYACT+11*, ENTRYACT+12, ADTSUBS1+41*, ADTSUBS1+42
, ADTSUBS1+53*, ADTSUBS1+54, ADDMS+1~, DLKP+1~, DLKP+4*, DLKP+6*, DLKP+7, DLKP+9, DLKP+11
IEN ADDMS+1~, ADDMS+2*, ADDMS+3*, ADDMS+5, ADDMS+6, ADDMS+7, ADD+1~, ADDDUZ+1~
IENS NEW7792+1~, NEW7792+18*, NEW7792+19, NEW7792+20, NEW7794A+1~, NEW7794A+9*, NEW7794A+10, NEW7794A+11, NEW7794A+12, ENTRYACT+1~
, ENTRYACT+6*, ENTRYACT+7, ADTSUBS1+2~, ADTSUBS1+26*, ADTSUBS1+27, ADTSUBS1+28, ADTSUBS1+29, ADTSUBS1+30, ADTSUBS1+31, ADTSUBS1+32
, ADTSUBS1+33, ADTSUBS1+34, ADTSUBS1+35, ADTSUBS1+36, ADTSUBS1+37, ADTSUBS1+48*, ADTSUBS1+49
INTERVAL ADDMS~, ADDMS+7
IPROCIDX CONVERT1+1~, CONVERT1+19*, CONVERT1+20
ISPECIDX CONVERT1+1~, CONVERT1+18*, CONVERT1+20
ITEMTEXT ADTSUBS1+1~, ADTSUBS1+5*, ADTSUBS1+28
J ADDMS+1~, ADDMS+4*, ADD+1~, ADD+2*, ADD+5, ADD+9, ADDDUZ+1~, ADDDUZ+2*, DLKP+1~, DLKP+8*
DLKP+9, DLKP+10, DLKP+11
K ADDMS+1~, ADDMS+4*, ADDMS+5, ADDMS+6, ADD+1~, ADD+2*, ADD+3, ADD+4, ADD+5, ADDDUZ+1~
, ADDDUZ+2*, ADDDUZ+3
L ADD+1~, ADD+4*, ADDDUZ+1~, ADDDUZ+3*, ADDDUZ+4
LOCATION CONVERT1+2~, CONVERT1+18*, CONVERT1+20
MAGERR NEW7792+1~, NEW7794A+1~, ENTRYACT+1~, ADTSUBS1+2~, ADDMS+1~, ADDMS+9!, ADD+1~, ADD+7!, ADD+8!, ADD+11!
, ADDDUZ+1~, ADDDUZ+7!, DLKP+1~, DLKP+13!
MAGERR("DIERR" NEW7792+24, NEW7792+25, NEW7794A+16, NEW7794A+17, ENTRYACT+11, ENTRYACT+12, ADTSUBS1+41, ADTSUBS1+42, ADTSUBS1+53, ADTSUBS1+54
, ADDMS+9, ADD+7, ADDDUZ+6, DLKP+13
MAGFDA NEW7792+1~, NEW7794A+1~, ENTRYACT+1~, ADTSUBS1+2~, ADDMS+1~, ADD+1~, ADD+7!, ADD+8!, ADD+11!, ADDDUZ+1~
, ADDDUZ+7!, DLKP+1~, DLKP+17!
MAGFDA( NEW7792+19*, NEW7792+20*, NEW7794A+10*, NEW7794A+11*, NEW7794A+12*, ADTSUBS1+49*, ADDMS+6*, ADDMS+7*, ADD+5*, ADD+9*
, ADDDUZ+4*, DLKP+11*
MAGFDA(101 ENTRYACT+7*, ADTSUBS1+27*, ADTSUBS1+28*, ADTSUBS1+29*, ADTSUBS1+30*, ADTSUBS1+31*, ADTSUBS1+32*, ADTSUBS1+33*, ADTSUBS1+34*, ADTSUBS1+35*
, ADTSUBS1+36*, ADTSUBS1+37*
MAGIEN ADD+1~, ADD+11!, ADDDUZ+1~, ADDDUZ+7!, DLKP+1~, DLKP+17!
MAGIEN( ADD+9
MAGIENS NEW7792+1~, NEW7794A+1~, ENTRYACT+1~, ADTSUBS1+2~
MAGIENS(1 ADTSUBS1+45
>> MAGKIDS1("RPCL079^" POS+7
>> MAGKIDS1("RPCL110^" POS+11
>> MAGKIDS1("RPCL130^" POS+15
>> MAGKIDS1("RPCL136V^" POS+19
>> MAGKIDS1("RPCL137V^" POS+23
>> MAGKIDS1("RPCL138V^" POS+27
MENU POS+1~, POS+55*, POS+56, POS+59*, POS+60
MG DLKP+1~, DLKP+7*, DLKP+8
MSG ADDMS+1~, ADD+1~, ADDDUZ+1~
MSGROOT DLKP+1~, DLKP+17!
NAME NEW7792+1~, NEW7792+3*, NEW7792+6, NEW7792+8, NEW7792+19, NEW7792+23, NEW7794+1~, NEW7794+4*, NEW7794+7, NEW7794+10*
NEW7794+13, NEW7794A~, NEW7794A+4, NEW7794A+6, NEW7794A+10, NEW7794A+15
NEWIEN CONVERT1+2~, CONVERT1+14*, CONVERT1+16*, CONVERT1+21, CONVERT1+24, CONVERT1+26, CONVERT1+28
NMSP ADDMG+1~, ADDMG+4*, ADDMG+5, ADDMG+6, ADDMG+7, ADD~, ADD+3, ADD+4, ADD+5, ADDDUZ~
, ADDDUZ+3, DLKP+1~, DLKP+4*, DLKP+5, DLKP+8
OLDIEN CONVERT1+2~, CONVERT1+14*, CONVERT1+15*, CONVERT1+17
OWNER NEW7792+1~, NEW7794+1~, NEW7794+6*, NEW7794+7, NEW7794+12*, NEW7794+13, NEW7794A~, NEW7794A+11
PACKAGE NEW7792+1~, NEW7792+16*, NEW7792+20
PL ADDMG+1~, ADDMG+2*, ADDMG+3*, ADDMG+4, DLKP+1~, DLKP+2*, DLKP+3*, DLKP+4, DLKP+6, DLKP+7
DLKP+9, DLKP+11
PROCEDURE CONVERT1+2~, CONVERT1+19*, CONVERT1+20
PROTOCOL ENTRYACT~, ENTRYACT+2
SECURITY CONVERT2+8~, CONVERT2+15
SECURITY("AUDIT" CONVERT2+9*
SECURITY("DD" CONVERT2+10*
SECURITY("DEL" CONVERT2+11*
SECURITY("LAYGO" CONVERT2+12*
SECURITY("RD" CONVERT2+13*
SECURITY("WR" CONVERT2+14*
SERVICE CONVERT1+2~, CONVERT1+18*, CONVERT1+20, CONVERT1+22, CONVERT1+23
SUBSCRIBER ADTSUBS1+1~, ADTSUBS1+4*, ADTSUBS1+19, ADTSUBS1+27
SUBSCRIBERIEN ADTSUBS1+1~, ADTSUBS1+45*, ADTSUBS1+49
TYPE ADTSUBS1~, ADTSUBS1+5, ADTSUBS1+6
U ADDMG+4, DLKP+4
X POS+65~, POS+66*, POS+69, CONVERT1+2~, CONVERT1+17*, CONVERT1+18, NEW7792+1~, NEW7792+6*, NEW7792+12*, NEW7794A+1~
, NEW7794A+4*, ENTRYACT+1~, ENTRYACT+2*, ENTRYACT+4, ENTRYACT+10, ADTSUBS1+2~, ADTSUBS1+11*, ADTSUBS1+13, ADTSUBS1+19*, ADTSUBS1+21
, ADTSUBS1+40, ADTSUBS1+52
>> XPDA POS+73
>> XPDABORT ERROR+1*
>> XPDNM ERROR+1, POS+73
Y CONVERT1+2~, CONVERT1+20*, CONVERT1+21, NEW7792+1~, NEW7792+7, NEW7792+13, NEW7792+16, NEW7794A+1~, NEW7794A+5, ENTRYACT+1~
, ENTRYACT+3, ENTRYACT+6, ADTSUBS1+2~, ADTSUBS1+12, ADTSUBS1+15, ADTSUBS1+20

Marked Items

Name Field # of Occurrence
$T( POS+7, POS+11, POS+15, POS+19, POS+23, POS+27, POS+45
$T(TEXT+J ADDMS+4, ADD+2, ADDDUZ+2
Info |  Source |  Call Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All