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 |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: DGYSPOST

Package: Registration

Routine: DGYSPOST


Information

DGYSPOST ;ALB/MLI - POST-INIT FOR PATCH DG*5.3*54 ; 10 APRIL 95

Source Information

Source file <DGYSPOST.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 2 ^%ZTLOAD  $$NOW^XLFDT  
MailMan 1 ^XMD  

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point
TEXT ; text to display
SSNXREF ; update SSN x-ref in ^DPT if not currently set
LINE(TEXT) ; add text to mail message
MAIL ; generate an e-mail bulletin when done
ARMCLN ; loop through ^DGPM("ARM" and make sure entries are valid
DQ ; called to begin processing

External References

Name Field # of Occurrence
^%ZTLOAD EN+4
$$NOW^XLFDT DQ+2, MAIL+5
^XMD MAIL+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,X
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"Task queued: ",ZTSK
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: "...RUNNING IMMEDIATELY"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,"Done!"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !,">> Resetting SSN cross-reference on PATIENT file (#2)..."
  • Line Location: SSNXREF+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: SSNXREF+4
Function Call: WRITE
  • Prompt: !,">> Checking ARM cross-reference on PATIENT MOVEMENT file (#405)..."
  • Line Location: ARMCLN+2
Function Call: WRITE
  • Prompt: "."
  • Line Location: ARMCLN+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] ARMCLN+6
^DGPM("ARM" ARMCLN+4, ARMCLN+7!
^DPT - [#2] SSNXREF+3, SSNXREF+5, ARMCLN+7
^DPT("SSN" SSNXREF+6

Label References

Name Line Occurrences
ARMCLN DQ+3
DQ EN+6
LINE MAIL+3, MAIL+4, MAIL+5, MAIL+6
MAIL DQ+3
SSNXREF DQ+3

Naked Globals

Name Field # of Occurrence
^( SSNXREF+6*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CT ARMCLN+1~, ARMCLN+3*, ARMCLN+5*, ARMCLN+8
DFN SSNXREF+1~, SSNXREF+3*, SSNXREF+4, SSNXREF+5, SSNXREF+6, ARMCLN+1~, ARMCLN+6*, ARMCLN+7
DGCOUNT MAIL+2*, MAIL+11!, LINE+1*
DGSTART DQ+1~, DQ+2*, MAIL+4
DGTEXT MAIL+11!
DGTEXT( LINE+1*
DIFROM MAIL+1~
DUZ MAIL+9
I EN+1~, EN+2*, ARMCLN+1~, ARMCLN+3*, ARMCLN+4*, ARMCLN+7
J ARMCLN+1~, ARMCLN+4*, ARMCLN+6, ARMCLN+7
TEXT LINE~, LINE+1
X EN+1~, EN+2*, SSNXREF+1~, SSNXREF+5*, SSNXREF+6
XMDUZ MAIL+9*, MAIL+11!
XMN MAIL+7*, MAIL+11!
XMSUB MAIL+7*, MAIL+11!
XMTEXT MAIL+8*, MAIL+11!
XMY MAIL+11!
XMY( MAIL+9*
ZTDESC EN+3*, EN+7!
ZTIO EN+3*, EN+7!
>> ZTQUEUED SSNXREF+2, SSNXREF+4, ARMCLN+2, ARMCLN+8
ZTRTN EN+3*, EN+7!
ZTSK EN+5, EN+7!

Marked Items

Name Field # of Occurrence
$T(TEXT+I EN+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All