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

Package: Registration

Routine: DGABUL


Information

DGABUL ;ALB/MRL/MJK - TRANSMIT OVERDUE ABSENCE BULLETIN; 23 OCT 1990

Source Information

Source file <DGABUL.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Registration 5 ^DGBUL  ^DGINPW  (,KILL)^DGPATV  H^DGUTL  (CLOSE,Q1)^DGUTQ  
VA Fileman 2 C^%DTC  YN^DICN  
Kernel 1 ^%ZIS  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGPMGL1  

Entry Points

Name Comments DBIA/ICR reference
Q1
1 ; -- process xfr
EN ;
BULLQ
ST ;
Q ; -- clean up
EN1
S ; -- set util w/pt data for bull
QUE ; -- que search
BULL ; -- send bulletin

External References

Name Field # of Occurrence
C^%DTC ST+2, ST+3, ST+4
^%ZIS Q+2
^DGBUL BULL+2
^DGINPW ST+8
^DGPATV S+1
KILL^DGPATV Q+1
H^DGUTL ST+1
CLOSE^DGUTQ Q+2
Q1^DGUTQ QUE+1
YN^DICN EN1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: "OVERDUE ABSENCE SEARCH WAS LAST RUN ",Y,!
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: "TRANSMIT OVERDUE ABSENCE BULLETIN"
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: !!?4,"Y - To search for inpatients overdue from AA, UA and PASS and transmit",!?9,"bulletin to select mailgroup.",!?4,"N - If you don't wish to search for overdue absences.",!
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: " ...BACKGROUND SEARCH QUEUED!!"
  • Line Location: QUE+2
Routine Call
  • %ZIS
  • Line Location:
    • Q+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" EN+2, S+1, BULL+2
^DG(43 - [#43] EN+2, ST+5*
^DGPM - [#405] ST+8
^DGPM("APMV" ST+8
^DIC(42 - [#42] 1+5
^DPT("CN" ST+8
^UTILITY($J ST+1!, ST+9, ST+13*, ST+14!, Q+1!, S+2*, BULL+1

Label References

Name Line Occurrences
1 ST+8
BULL ST+15
BULLQ BULL+1
EN1 EN1+1
Q EN1+2, ST+9
Q1 1+2, 1+4, 1+5, 1+6
QUE EN1+2
S 1+4, 1+5, 1+6, 1+7

Naked Globals

Name Field # of Occurrence
^( ST+8
^("CON" EN+2
^(0 ST+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % EN1*, EN1+1, EN1+2, ST+8*
>> C ST+12*, ST+13*
DFN ST+8*, Q+1!
DG1 ST+8, Q+1!, 1+5
DGA1 ST+8, Q+1!
>> DGB BULL+2*
DGD ST+8*, Q+1!, 1+1, 1+3
DGD1 Q+1!, 1+1*, 1+3*, 1+4, 1+5, 1+6, 1+7, S+1
DGD2 Q+1!, 1+1*, 1+2, 1+4, 1+5, 1+6, 1+7, S+2
DGDATE Q+1!
DGDAY14 ST+3*, Q+1!, 1+6
DGDAY30 ST+4*, Q+1!, 1+5, 1+7
DGDAY4 ST+2*, ST+8, Q+1!, 1+4
>> DGNAME ST+13*, S+1, S+2
>> DGPGM QUE+1*
DGPMX Q+1!
DGT ST+5*, Q+1!
DGTIME ST+2, ST+3, ST+4, ST+5, Q+1!, BULL+2
>> DGVAR QUE+1*
DGW ST+1~, ST+5*, ST+8*, ST+12*, ST+13*, S+1, S+2
DGXFR0 Q+1!
DUZ EN+1
I ST+8*, ST+13*, Q+1!
I1 Q+1!
ION QUE+1*
IOP Q+2*!
J ST+13*, Q+1!
J1 Q+1!
>> SSN S+1
U EN+2*, ST+8, 1+1
X ST+2, ST+3, ST+4, Q+1!, S+1*, S+2*!, QUE+1*
X1 ST+2*, ST+3*, ST+4*, Q+1!, S+1*, S+2!
X2 ST+2*, ST+3*, ST+4*, Q+1!, S+1*, S+2*!
>> XMSUB BULL+2*
>> XMTEXT BULL+2*
Y EN+2*, EN+3, Q+1!, S+1*, S+2, BULL+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All