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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DG53807P

Package: Registration

Routine: DG53807P


Information

DG53807P ;ALB/LBD - PATCH DG*5.3*807 POST-INSTALL ROUTINE ; 4/2/09 4:15pm

Source Information

Source file <DG53807P.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 3 ^%ZTLOAD  ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT  (BMES,MES)^XPDUTL  
MailMan 1 ^XMD  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
EN ;Entry point for DG*5.3*807 post-install
TST() ;If testing, quit if number of records = TST
TEST ;Entry point for testing
LN() ;Increment line counter
ENQ ;Entry point for tasked job
USZIP(ZIP) ;Check if valid US zip code
LOOP ; Loop through Patient file #2, starting with most recent DFNs.
FAIL ;Update ^XTMP with records that could not be locked
SENDMSG ;Send MailMan message when process completes

External References

Name Field # of Occurrence
^%ZTLOAD EN+4
^DIR TEST+4
$$DT^XLFDT ENQ+3
$$FMADD^XLFDT ENQ+3
$$FMTE^XLFDT ENQ+5, ENQ+8
$$NOW^XLFDT ENQ+5, ENQ+8
^XMD SENDMSG+25
BMES^XPDUTL EN+6, EN+8
MES^XPDUTL EN+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"ADDRESS UPDATE ROUTINE DG53807P"
  • Line Location: TEST+2
Routine Call
  • DIR
  • Line Location:
    • TEST+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(5 - [#5] USZIP+9
^DPT - [#2] LOOP+6, LOOP+9, LOOP+10, LOOP+11, LOOP+12, LOOP+13, LOOP+16*, LOOP+19*, LOOP+22*, LOOP+23
^HL(779.004 - [#779.004] LOOP+4
^XIP(5.12 - [#5.12] USZIP+5, USZIP+7
^XTMP( ENQ+3*, ENQ+4*, ENQ+5*!, ENQ+6*, ENQ+8*, LOOP+7*, LOOP+24*, SENDMSG+18, SENDMSG+19, SENDMSG+21
, SENDMSG+22, SENDMSG+23, SENDMSG+24, FAIL+1*, FAIL+2*, TST+2

Label References

Name Line Occurrences
$$LN SENDMSG+4, SENDMSG+5, SENDMSG+6, SENDMSG+7, SENDMSG+8, SENDMSG+9, SENDMSG+10, SENDMSG+11, SENDMSG+12, SENDMSG+13
, SENDMSG+15, SENDMSG+16, SENDMSG+17, SENDMSG+18, SENDMSG+19, SENDMSG+20, SENDMSG+21, SENDMSG+22, SENDMSG+24
$$TST LOOP+6
$$USZIP LOOP+16, LOOP+19, LOOP+22
ENQ TEST+6
FAIL LOOP+9
LOOP ENQ+7
SENDMSG ENQ+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN LOOP+1~, LOOP+2*, LOOP+6*, LOOP+9, LOOP+10, LOOP+11, LOOP+12, LOOP+13, LOOP+16, LOOP+19
, LOOP+22, LOOP+23, FAIL+2
DIR TEST+1~
DIR("A" TEST+3*
DIR(0 TEST+3*
DIROUT TEST+1~
DIRUT TEST+1~
DUZ SENDMSG+2
ERROR ENQ+1~, LOOP+5*, SENDMSG+14
LN SENDMSG+1~, LN+1*, LN+2
MSG SENDMSG+1~
MSG( SENDMSG+4*, SENDMSG+5*, SENDMSG+6*, SENDMSG+7*, SENDMSG+8*, SENDMSG+9*, SENDMSG+10*, SENDMSG+11*, SENDMSG+12*, SENDMSG+13*
, SENDMSG+15*, SENDMSG+16*, SENDMSG+17*, SENDMSG+18*, SENDMSG+19*, SENDMSG+20*, SENDMSG+21*, SENDMSG+22*, SENDMSG+24*
PAT LOOP+1~
PAT( LOOP+10*, LOOP+11*, LOOP+12*, LOOP+13*, LOOP+15, LOOP+16, LOOP+18, LOOP+19, LOOP+21, LOOP+22
PROG ENQ+1~, ENQ+2*, ENQ+3, ENQ+4, ENQ+5, ENQ+6, ENQ+8, LOOP+7, LOOP+24, SENDMSG+18
, SENDMSG+19, SENDMSG+21, SENDMSG+22, SENDMSG+23, SENDMSG+24, FAIL+1, FAIL+2, TST+2
ST USZIP+2~, USZIP+7*, USZIP+9
TST TEST+1~, TEST+5*, TST+1, TST+2
UPD LOOP+1~, LOOP+8*, LOOP+16*, LOOP+19*, LOOP+22*, LOOP+24
USA LOOP+1~, LOOP+4*, LOOP+5, LOOP+16, LOOP+19, LOOP+22
X TEST+1~
XMDUZ SENDMSG+1~, SENDMSG+3*
XMSUB SENDMSG+1~, SENDMSG+3*
XMTEXT SENDMSG+1~, SENDMSG+2*
XMY SENDMSG+1~
XMY( SENDMSG+2*
Y TEST+1~, TEST+4, TEST+5
Z USZIP+2~, USZIP+5*, USZIP+7
ZIP USZIP~, USZIP+3, USZIP+5
ZTDESC EN+1~, EN+2*
ZTDTH EN+1~, EN+3*
ZTIO EN+1~, EN+3*
ZTRTN EN+1~, EN+3*
ZTSK EN+1~, EN+5, EN+6, ENQ+4
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All