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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGRPP

Package: Registration

Routine: DGRPP


Information

DGRPP ;ALB/MRL,AEG,LBD - REGISTRATION SCREEN PROCESSOR ; 10/21/10 3:55pm

Source Information

Source file <DGRPP.m>

Call Graph

Call Graph Total: 10

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  

Caller Graph

Caller Graph Total: 18

Package Total Caller Graph
Registration 18 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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

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

Naked Globals

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!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All