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 |  Marked Items  | All
Print Page as PDF
Routine: DGRP6EF

Package: Registration

Routine: DGRP6EF


Information

DGRP6EF ;ALB/TMK,EG,BAJ,JLS,ARF,JAM,ARF,JMM - REGISTRATION SCREEN 6 FIELDS FOR EXPOSURE FACTORS ;05 Feb 2015 11:06 AM

Source Information

Source file <DGRP6EF.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
Registration 7 AUTOUPD^DGENA2  $$CLE^DGENCLEA  $$GETCUR^DGNTAPI  $$GETSTAT^DGNTAPI1  SETLNEX^DGRP6  ($$DAT,$$YN)^DGRP6CL  $$SSNNM^DGRPU  
VA FileMan 3 ^DIE  $$GET1^DIQ  ^DIR  
Kernel 2 ($$DT,$$FMTE)^XLFDT  $$UP^XLFSTR  
List Manager 1 CLEAR^VALM1  

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

Package Total Caller Graph
Registration 2 DGRP6  DGRPE  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,QUIT) ; Display Environmental exposure factors/allow to edit
EN1
QUIT
EF(DFN,LIN) ;
CHKAOEL(DGY) ;DG*5.3*1018;jam; - Screen logic for .3213 (AGENT ORANGE EXPOSURE LOCATION) field in PATIENT file
; Returns: TRUE if the entry DGY is valid
SELTBL ;;
60301 ;;.32102//NO;S:X'="Y" Y="@65";.3213;.32107;.32109;@65;
; DG*5.3*1075 - Add "R" to field .3212, making it Required
60302 ;;.32103//NO;S:X'="Y" Y="@66";.3212R;.32111;@66;
60303 ;;.322013//NO;S:X'="Y" Y="@612";.322014;Q;.322015;@612;
60304 ;;D REG^DGNTQ(DFN)
60305 ;;D ADDEDTCL^DGENCLEA(DFN)

External References

Name Field # of Occurrence
AUTOUPD^DGENA2 EN1+108
$$CLE^DGENCLEA EN1+45
$$GETCUR^DGNTAPI EN1+41, EF+22
$$GETSTAT^DGNTAPI1 EN1+39
SETLNEX^DGRP6 EF+8, EF+13, EF+20, EF+25, EF+32
$$DAT^DGRP6CL EN1+31, EN1+34, EN1+38
$$YN^DGRP6CL EN1+31, EN1+34, EN1+38, EN1+50
$$SSNNM^DGRPU EN1+6
^DIE EN1+107, EN1+117, EN1+128
$$GET1^DIQ EN1+8, EN1+10, EN1+12, EN1+22, EN1+57, EN1+63, EN1+100, EN1+104, EN1+113, EN1+124
, CHKAOEL+8
^DIR EN1+93
CLEAR^VALM1 EN1
$$DT^XLFDT CHKAOEL+12
$$FMTE^XLFDT EN1+9
$$UP^XLFSTR EN1+9

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DG(391 - [#391] GET1^DIQ
^DG(43 - [#43] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] EN1+2, EN1+44, EN1+46, EN1+86, EF+3, EF+28
^XUSEC("DGNT VERIFY" EN1+39

Label References

Name Line Occurrences
EN1 EN1+131
QUIT EN1+94

Naked Globals

Name Field # of Occurrence
^( EF+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA EN+1~, EN1+96*, EN1+118!, EN1+129!
DFN EN~, EN1+2, EN1+6, EN1+8, EN1+10, EN1+12, EN1+22, EN1+39, EN1+41, EN1+44
, EN1+45, EN1+46, EN1+57, EN1+63, EN1+86, EN1+96, EN1+100, EN1+104, EN1+108, EN1+113
, EN1+124, EF~, EF+3, EF+22, EF+28
DG321 EN+1~, EN1+2*, EN1+27, EN1+31, EN1+34, EN1+35*, EF+1~, EF+3*, EF+4, EF+7
, EF+10, EF+12
DG3217CL EN1+44~*, EN1+50, EF+27~, EF+28*, EF+29
DG322 EN+1~, EN1+2*, EN1+38, EF+1~, EF+3*, EF+15, EF+19
DGANSWER EN1+93!
DGAO EN1+99~, EN1+100*, EN1+124, EN1+126*, EN1+129!
DGBWNDT CHKAOEL+5~, CHKAOEL+8*, CHKAOEL+10, CHKAOEL+12
DGCLE EN1+45~*, EN1+46*, EN1+47, EN1+77, EN1+82, EN1+84, EN1+86
DGCT EN+1~, EN1+4*, EN1+12*, EN1+13*, EN1+15*, EN1+16*, EN1+18*, EN1+31, EN1+34*, EN1+35
, EN1+38*, EN1+41*, EN1+49*, EN1+50, EN1+58*, EN1+64*, EN1+71*, EN1+72*, EN1+73*, EN1+74*
, EN1+76*
DGDOB EN1+5~, EN1+8*, EN1+9*, EN1+12
DGELV EN1+1~, EN1+21*, EN1+22*, EN1+24, EN1+33, EN1+70, EN1+80, EN1+84
DGENDTXT EN1+77~*, EN1+78, EN1+80
DGHECMSG EN1+93!
DGHECMSG(1 EN1+87*, EN1+88*
DGHECMSG(2 EN1+89*
DGHECMSG(3 EN1+90*
DGNONT EN+1~, EN1+39*, EN1+40*, EN1+41, EN1+77, EN1+82, EN1+84
DGNT EN1+41~, EF+22~
DGNT("INTRP" EN1+41, EF+23, EF+25
DGPGI EN1+62~, EN1+63*, EN1+64
DGPTYPE EN1+5~, EN1+10*, EN1+11*, EN1+13
DGRAD EN1+103~, EN1+104*, EN1+113, EN1+115*, EN1+119!
>> DGRPV EN1+17, EN1+40, EN1+78, EN1+80, EN1+82, EN1+84, EN1+85, EN1+94
DGRPX EN1+41*, EF+22~*
DGSSN EN1+5~, EN1+7*, EN1+13
DGSSNSTR EN1+5~, EN1+6*, EN1+7, EN1+12, EN1+13
DGTERA EN1+56~, EN1+57*, EN1+58
DGY CHKAOEL~, CHKAOEL+4
DIE EN+1~, EN1+96*, EN1+118!, EN1+129!
DIR EN+1~, EN1+93!
DIR("A" EN1+12*, EN1+13*, EN1+15*, EN1+16*, EN1+31*, EN1+34*, EN1+35*, EN1+38*, EN1+41*, EN1+49*
, EN1+50*, EN1+58*, EN1+64*, EN1+71*, EN1+72*, EN1+73*, EN1+74*, EN1+76*, EN1+78*, EN1+80*
DIR("B" EN1+85*
DIR("PRE" EN1+91*, EN1+92*
DIR(0 EN1+4*, EN1+82*, EN1+84*
DR EN+1~, EN1+96*, EN1+107, EN1+108, EN1+116*, EN1+118!, EN1+127*, EN1+129!
DTOUT EN1+1~, EN1+94
DUOUT EN1+1~, EN1+94
DUZ EN1+39
I EN+1~
IND EN+1~, EN1+17*, EN1+19, EN1+32, EN1+36, EN1+47*, EN1+48
L EN1+1~
L1 EN1+1~, EN1+27*, EN1+31
L2 EN1+1~, EN1+27*, EN1+31
L3 EN1+1~, EN1+27*, EN1+31
LENGTH EF+1~, EF+2*, EF+8, EF+13, EF+20, EF+25, EF+32
LIN EF~, EF+2!*, EF+8, EF+13, EF+16*, EF+20, EF+24*, EF+25, EF+30*, EF+32
LIN( EF+16*, EF+24*, EF+30*
QUIT EN~, EN1+94*
S EN1+1~, EN1+27*
SEL EN1+1~, EN1+27*, EN1+30
SEQ EF+1~, EF+5*, EF+8, EF+11*, EF+13, EF+18*, EF+20, EF+25*, EF+31*, EF+32
TYPE EN1+1~, EN1+30*, EN1+31
U EN1+27, EN1+35, EN1+86, EF+4, EF+7, EF+10, EF+12, EF+15, EF+19, EF+29
X EN+1~
>> XQY0 EN1+86
Y EN+1~, EN1+94, EN1+95, EN1+100, EN1+104, EN1+107
Z EN+1~, EN1+19*, EN1+24*, EN1+31, EN1+32*, EN1+33*, EN1+34, EN1+36*, EN1+38, EN1+48*
, EN1+49, EN1+53*, EN1+58, EN1+61*, EN1+64, EN1+95*, EF+1~, EF+5*, EF+7*, EF+8
, EF+11*, EF+12*, EF+13, EF+18*, EF+19*, EF+20, EF+31*, EF+32

Marked Items

Name Field # of Occurrence
$T(@Z EN1+96
$T(SELTBL+$PIECE^2;4(5) EN1+35
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 |  Marked Items  | All