DGREG0 ;ALB/JDS,AEG,JAM - REGISTER A PATIENT, CONT. ;03 OCT 85
Source file <DGREG0.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Registration | 1 | DGREG |
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
|
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 |
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^DGMT(408.31 - [#408.31] | Classic Fileman Calls |
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] | REFILE, REFILE+6, MOVE+4*, SSD |
^DPT("ASDPSD" | SSD+2, SSDK |
>> | 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, SSDK, MTDT+1~, MTDT+5* |
DA(1 | SSD, SSD+2, SSDK |
DB | QE! |
DE | QE! |
DEF | MOVE+5!, QE! |
DFMD | QE! |
>> DFN | REFILE, REFILE+6, MOVE+4, MOVE+8, CP+7, MT+4, MTDT+2 |
>> DFN1 | REFILE, CP+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*, MOVE, QE+1!, CP+2~ |
X1 | REFILE+10*, MOVE, MOVE+1, QE+1! |
X2 | REFILE+10*, MOVE, QE+1! |
Y | QE+1!, DT |
Y1 | QE+1! |
Z | QE+1! |
ZTSK | QE+1! |