Routine: DGRPP

Package	Total	Call Graph
Registration	9	($$LOCK,UNLOCK)^DGENPTA1 ($$BEGUPLD,CKUPLOAD,ENDUPLD)^DGENUPL3 IN^DGHELP ^DGRPC ^DGRPCADD ^DGRPE ^DGRPH (JUMP,LT,MOREHLP,STR,WHICH)^DGRPP1 $$UPPER^DGUTL
VA Fileman	1	FILE^DICN

Package

Total

Call Graph

($$LOCK,UNLOCK)^DGENPTA1 ($$BEGUPLD,CKUPLOAD,ENDUPLD)^DGENUPL3 IN^DGHELP ^DGRPC ^DGRPCADD ^DGRPE ^DGRPH (JUMP,LT,MOREHLP,STR,WHICH)^DGRPP1
$$UPPER^DGUTL

VA Fileman

FILE^DICN

Package	Total	Caller Graph
Registration	18	DGADDUTL DGRP DGRP1 DGRP10 DGRP11 DGRP12 DGRP13 DGRP14 DGRP15 DGRP2 DGRP3 DGRP4 DGRP5 DGRP6 DGRP7 DGRP8 DGRP9 DGRPCADD

Package

Total

Caller Graph

Registration

DGADDUTL  DGRP  DGRP1  DGRP10  DGRP11  DGRP12  DGRP13  DGRP14
DGRP15  DGRP2  DGRP3  DGRP4  DGRP5  DGRP6  DGRP7  DGRP8
DGRP9  DGRPCADD

Entry Points

Name	Comments	DBIA/ICR reference
Q1
Q
EN	;
QQ
SCRX	;goto screen X
SCR9	; see if MT is completed. Allow only selective editing if so
CHOICE	;parse out which items were selected for edit
JUMP
SEC	;if patient type says make record sensitive, add to security log file
SENSCHK	; check whether patient record should be made sensitive
W	;write highlighted text on screen (if parameter on)
NEXT	;find next available screen...goto

External References

Name	Field # of Occurrence
$$LOCK^DGENPTA1	EN+4
UNLOCK^DGENPTA1	EN+2
$$BEGUPLD^DGENUPL3	EN+1
CKUPLOAD^DGENUPL3	EN+3
ENDUPLD^DGENUPL3	EN+5
IN^DGHELP	JUMP+2
^DGRPC	Q+4
^DGRPCADD	JUMP+4, SCRX+3
^DGRPE	JUMP+7
^DGRPH	JUMP+4, JUMP+6
JUMP^DGRPP1	JUMP
LT^DGRPP1	Q
MOREHLP^DGRPP1	EN+15
STR^DGRPP1	EN+7
WHICH^DGRPP1	EN+6
$$UPPER^DGUTL	JUMP+1
FILE^DICN	SEC+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN+6
Function Call: WRITE	Prompt: ! Line Location: EN+7
Function Call: WRITE	Prompt: W Line Location: EN+9
Function Call: WRITE	Prompt: "=ENTER new "_(DGISYR+1)_" data," Line Location: EN+9
Function Call: WRITE	Prompt: W Line Location: EN+10
Function Call: WRITE	Prompt: " to ",$S(DGRPS<DGRPLAST:"CONTINUE",1:"QUIT"),", " Line Location: EN+10
Function Call: WRITE	Prompt: D Line Location: EN+11
Function Call: WRITE	Prompt: " or " Line Location: EN+12
Function Call: WRITE	Prompt: ": " Line Location: EN+14
Function Call: READ	Timeout: DTIME Variable: DGRPANN Line Location: EN+17
Function Call: WRITE	Prompt: !!,"===> Record has been classified as sensitive." Line Location: SEC+2
Function Call: WRITE	Prompt: Z Line Location: W+1
Function Call: WRITE	Prompt: @DGVI,Z,@DGVO Line Location: W+2

FileNo	Call Tags
^DGSL(38.1 - [#38.1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DG(391 - [#391]	SENSCHK+5
^DGSL(38.1 - [#38.1]	SENSCHK+4, SEC+2
^DIC(8 - [#8]	SENSCHK+7
^DPT - [#2]	JUMP+7, Q1+2, SENSCHK+3, SENSCHK+5, SENSCHK+6

Name	Line Occurrences
@(	JUMP+4, SCRX+4
CHOICE	JUMP+5
NEXT	EN+16, EN+17
Q	JUMP, NEXT+1
Q1	EN+6
QQ	JUMP+7
SCR9	CHOICE+5
SCRX	JUMP+6, JUMP+7
SEC	SENSCHK+5, SENSCHK+8
SENSCHK	Q+3
W	EN+9, EN+10, EN+11, EN+12, EN+14

Name	Field # of Occurrence
^("TYPE"	SENSCHK+5
^(0	SENSCHK+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	JUMP+2
%DT	Q1!
C	Q1!
DA	Q1+2*, SEC+3!
DD	SEC+1!, SEC+3!
>> DFN	EN+1, EN+2, EN+3, EN+4, EN+5, JUMP+7, Q1+2, SENSCHK+3, SENSCHK+4, SENSCHK+5 , SENSCHK+6, SEC+1, SEC+2
DGA	Q1!
DGA1	Q1!
DGA2	Q1!
DGAAC	Q1!
DGAD	Q1!
DGCH	JUMP+5*, Q+2!, CHOICE+5, CHOICE+6
DGDEP	Q+1!
DGDR	JUMP+5, JUMP+6, Q1!, CHOICE+5, CHOICE+6*
DGEDCN	Q+4*!
>> DGEFDT	EN+9
DGELVER	Q, QQ!
DGFL	CHOICE+4~, CHOICE+5, SCR9+2, SCR9+5*
DGGTOT	Q+2!
>> DGIAINEW	EN+21*
DGINC	Q+1!
DGINR	Q+1!
DGIRI	Q+2!
>> DGISYR	EN+9
DGMTC	Q+1!, SCR9+1, SCR9+2
DGMTC("D"	SCR9+4
DGMTC("S"	SCR9+3
DGMTED	Q+1!
>> DGNOBUCK	EN+18
DGNOCOPY	EN+19*, Q+2!
DGPRI	Q+2!
DGREL	Q+1!
DGRP	EN+6!, Q1!
DGRPAG	Q1!
DGRPAN	EN+6*, EN+11, Q1!, CHOICE+5, CHOICE+6
DGRPANN	EN+17, EN+18, EN+21, JUMP, JUMP+1, JUMP+2, JUMP+3*, JUMP+4, JUMP+5, Q1!
DGRPANP	EN+11, JUMP+2, Q1!
DGRPCM	QQ!
DGRPD	Q1!
DGRPLAST	EN+10, QQ!, NEXT+1, NEXT+2
DGRPNA	QQ!
>> DGRPOUT	EN+14, EN+17, JUMP, Q
DGRPS	EN+6, EN+9, EN+10, EN+13, EN+18, EN+21, JUMP+4, JUMP+6, JUMP+7, QQ! , CHOICE+5, CHOICE+6, NEXT+1, NEXT+3, NEXT+4
DGRPSE1	Q+2!
DGRPSEL	EN+14, EN+15, JUMP+3, Q1!
DGRPSELT	JUMP+3*, Q1!, SCR9+2, SCR9+3, SCR9+4
DGRPTYPE	QQ!
DGRPU	QQ!
DGRPV	EN+6, EN+12, EN+13, EN+14, Q, Q+4, QQ!
DGRPVR	Q1!
DGRPVV	QQ!, NEXT+3
DGRPVV(	EN+6
DGRPVV(8	EN+21*
DGRPVV(9	EN+14, EN+21*
DGRPW	QQ!
DGRPX	Q1!
DGSP	Q+1!
DGTOT	Q+1!
DGVI	QQ!, W+1, W+2
DGVO	QQ!, W+2
DIC	Q1+2!, SEC+1*, SEC+3!
DIC("DR"	SEC+1*
DIC(0	SEC+1*
DINUM	SEC+1*, SEC+3!
DIRUT	Q1+1!
DO	SEC+1!, SEC+3!
DT	EN+9
DTIME	EN+17
DTOUT	Q1+1!
DUOUT	Q1+1!
DUZ	SEC+1
ELIG	SENSCHK+1~, SENSCHK+2, SENSCHK+6, SENSCHK+7
FLAG	SENSCHK+1~, SENSCHK+2, SENSCHK+5, SENSCHK+6, SEC+2
I	EN+6, EN+7, JUMP+5, Q1+2!, NEXT+3
I1	Q1+2!
I2	Q1+2!
I3	Q1+2!
IOST	EN+16, W+1
J	Q1+2!, CHOICE+5, NEXT+3
U	EN+21
X	JUMP+1, JUMP+2, JUMP+6, JUMP+7, Q1+2!, SENSCHK+1~, SENSCHK+5, SENSCHK+7, SENSCHK+8, SEC+1* , SEC+3!, NEXT+2, NEXT+3, NEXT+4, SCRX+2, SCRX+3, SCRX+4
X1	Q1+2!
X2	Q1+2!
X3	Q1+2!
Y	Q1+2!, SEC+3!
Z	EN+9, EN+10, EN+11, EN+12, EN+14, JUMP+2, Q1+2!, W+1, W+2
Z1	Q1+2!

Customize PDF page

Package: Registration

Routine: DGRPP

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 18

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: