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

Package: Registration

Routine: DGREG0


Information

DGREG0 ;ALB/JDS,AEG,JAM - REGISTER A PATIENT, CONT. ;03 OCT 85

Source Information

Source file <DGREG0.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Registration 11 EN1^DGEN  EN^DGMTCOR  EDT^DGMTCOU  THRESH^DGMTCOU1  (AFTER,EN,PRIOR)^DGMTEVT  EN^DGMTR  ($$LST,$$MTS,EDT)^DGMTU  A^DGREG  
^DGREG00  HL7A08^VAFCDD01  $$SEND^VAFHUTL  
VA FileMan 2 ^DIE  ($$GET1,DT)^DIQ  

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

Package Total Caller Graph
Registration 1 DGREG  

Entry Points

Name Comments DBIA/ICR reference
REFILE
MOVE
W1
Q
Q1 ;If Send HL7 V2.3 messaging flag is set to SEND or SUSPEND and
QE
DT
SSD
SSDK
CP ;If not (autoexempt or MTested) & no CP test this year then
QTCP
MT ;Check if user requires a means test. Ask user if s/he wants to
MTDT ;Date of Test should be the same as the Registration Date
MTDTQ
COMMENTS ;DG*5.3*1111 comments moved here due to size limit of DGREG

External References

Name Field # of Occurrence
EN1^DGEN MOVE+8
EN^DGMTCOR CP+5
EDT^DGMTCOU CP+7
THRESH^DGMTCOU1 CP+7
AFTER^DGMTEVT MTDT+6
EN^DGMTEVT MTDT+6
PRIOR^DGMTEVT MTDT+4
EN^DGMTR MT+3
$$LST^DGMTU MTDT+2
$$MTS^DGMTU MT+4
EDT^DGMTU MT+4
A^DGREG QE+2
^DGREG00 W1+2
^DIE MTDT+5
$$GET1^DIQ REFILE+7
DT^DIQ DT
HL7A08^VAFCDD01 Q1+4
$$SEND^VAFHUTL Q1+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^DGMT(408.31 - [#408.31] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] REFILE+1, REFILE+3
^DG(43 - [#43] CP+3
^DIC(36 - [#36] REFILE+9
^DIC(5 - [#5] MOVE
^DPT - [#2] REFILEREFILE+6, MOVE+4*, SSD
^DPT("ASDPSD" SSD+2, SSDK

Label References

Name Line Occurrences
CP MOVE+7
MT MOVE+6
MTDT MT+4
MTDTQ MTDT+2
QTCP CP+3

Naked Globals

Name Field # of Occurrence
^( REFILEREFILE+6, SSD+2*, SSDK!
^("DEV" REFILE+3
^(0 REFILE+9, MOVE

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% QE!
%DT QE!
A QE!
A( REFILE*, MOVE
A(0 REFILE+1, REFILE+3, REFILE+7, REFILE+8
A(1 REFILE+9
A(2 REFILE+9
A(3 MOVE+3
ANS QE!
APD QE!, MT+4, MTDT+3
B MOVE+5!, QE!
B( REFILE+6*, REFILE+8*, REFILE+9*, MOVE+3*, MOVE+4
CURR QE!
D0 QE+1!
D1 QE+1!
DA QE!, SSD+2, SSDKMTDT+1~, MTDT+5*
DA(1 SSDSSD+2, SSDK
DB QE!
DE QE!
DEF MOVE+5!, QE!
DFMD QE!
>> DFN REFILEREFILE+6, MOVE+4, MOVE+8, CP+7, MT+4, MTDT+2
>> DFN1 REFILECP+4
>> DGASKDEV Q
DGCLPR QE!
DGDAY QE!
DGDFN QE!
DGE QE!
DGERR QE!
DGHIO W1+1!
DGHIO( REFILE+5*, W1
DGIB CP+2~
DGIBDT CP+2~, CP+4*, CP+7
DGIO Q!
DGIO( REFILE+3*, REFILE+5, W1*
DGIO("HS" REFILE+4*
DGIO("PRF" REFILE+4
DGL QE!
DGLL QE!
DGMT MTDT+1~, MTDT+2*, MTDT+3
DGMTA MTDT+1~
DGMTACT MTDT+1~, MTDT+4*
>> DGMTCOR CP+6*, CP+7
DGMTDT MTDT+1~, MTDT+3*, MTDT+5
DGMTI MTDT+1~, MTDT+3*, MTDT+5
DGMTINF MTDT+1~, MTDT+6*
DGMTP MTDT+1~
DGMTYPT MTDT+1~, MTDT+3*
DGNEW QE!
DGNOCOPF CP+6, CP+8!
DGO QE!
DGREQF MT+2~, MT+4
>> DGRPFEE QE+2
DGX CP+2~
DGZ1 SSD*, SSD+1!, SSD+3!
DIC QE!
DIE QE!, MTDT+1~, MTDT+5*
DINUM QE!
DIRUT CP+2~
DIV REFILE+1*, QE+1!, CP+2~, MT+2~
DLAYGO QE+1!
DOW QE!
DP QE!
DR MOVE+5!, QE!, MTDT+1~, MTDT+5*
DT CP+4, CP+7, MT+4, MTDT+2
DTOUT CP+2~
I REFILE*, REFILE+3*, REFILE+5*, REFILE+6*, REFILE+8*, REFILE+9*, MOVE+2*, MOVE+3*, MOVE+4*, MOVE+5!
, W1*, QE!, SSD*
I1 REFILE+9*, MOVE+2*, MOVE+3*, MOVE+5!, QE!
>> INTL REFILE+7*, REFILE+8
IOZBK QE!
IOZFO QE!
J QE+1!
L MOVE+5!, QE!
L1 MOVE+5!, QE!
L2 MOVE+5!, QE!
LL MOVE+5!, QE!
LL1 MOVE+5!, QE!
LL2 MOVE+5!, QE!
MDCARD QE!
PARA QE!
PGM QE+1!
PRF QE!
>> RGMPI QE+2
RT QE!
S MOVE+5!, QE!
S( MOVE*, MOVE+1*, MOVE+2
S(1 MOVE+2
SC QE!
>> SDIV SSD+2, SSDK
>> SDX SSD+2, SSDK
SEEN QE!
U REFILE+3, CP+3, MT+4
VAFHBEF QE+1!
VAFHFLG QE+1!
VAFHMRG QE+1!
VET QE+1!
X REFILE+3*, REFILE+10*, MOVEQE+1!, CP+2~
X1 REFILE+10*, MOVEMOVE+1, QE+1!
X2 REFILE+10*, MOVEQE+1!
Y QE+1!, DT
Y1 QE+1!
Z QE+1!
ZTSK QE+1!
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