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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGRUGTG

Package: Registration

Routine: DGRUGTG


Information

DGRUGTG ;ALB/MLI - TEST RUG-II GROUPER ; 29 DEC 87 9:00

Source Information

Source file <DGRUGTG.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Registration 2 CVD^DGRUG1  HM^DGRUGC1  
VA Fileman 2 ^%DT  YN^DICN  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DG RUG TEST GROUPER  DGRUG1  

Entry Points

Name Comments DBIA/ICR reference
QUIT
CH
YN
EDIT
RES
FYH
CHK
DB
FYH2
QR
MR
ASK
DT
MAIN
CV
RESYN

External References

Name Field # of Occurrence
^%DT DT
CVD^DGRUG1 CH+2
HM^DGRUGC1 CHK+3
YN^DICN ASK, MAIN+1, MR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"The information you are about to enter will be used to determine a TEST ",!,"RUG-II Grouper. The values you enter will not be saved and will not ",!," be able to be retrieved for later use."
  • Line Location: MAIN+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: DT+0
Function Call: WRITE
  • Prompt: !,"WWU values unavailable. Want most recent ones"
  • Line Location: MR+0
Function Call: WRITE
  • Prompt: !,"THERE ARE NO WWU VALUES IN YOUR RUG-II FILE"
  • Line Location: MR+1
Function Call: WRITE
  • Prompt: !," ANSWER 'Y'ES OR 'N'O"
  • Line Location: QR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: RES+0
Function Call: WRITE
  • Prompt: !
  • Line Location: RES+0
Function Call: WRITE
  • Prompt: I-2,">"
  • Condition for execution: (N=6)
  • Line Location: RES+0
Function Call: WRITE
  • Prompt: I-1,">"
  • Condition for execution: (N=3)
  • Line Location: RES+0
Function Call: WRITE
  • Prompt: $P($P($P(^DD(45.9,DGNO,0),U,3),":",I),";",1)
  • Line Location: RES+0
Function Call: WRITE
  • Prompt: !
  • Line Location: RES+1
Function Call: WRITE
  • Prompt: !,^(I,0)
  • Line Location: RESYN+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: CHK+0
Function Call: WRITE
  • Prompt: !,*7," INVALID RESPONSE--TRY AGAIN"
  • Line Location: CHK+4
Function Call: WRITE
  • Prompt: !,^DD(45.9,DGNO,3)
  • Line Location: CHK+7
Function Call: WRITE
  • Prompt: !,"Enter fiscal year of RUG-II WWU values you want to use. Must not precede 1987."
  • Line Location: FYH+0
Function Call: WRITE
  • Prompt: !,"Fiscal year RUG-II WWU values not available for the year requested",!,"Enter 'Y'es to accept most recent values in file or 'N'o",!,"to choose another year"
  • Line Location: FYH2+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(45.9 ASK, RES, RESYN, CHK, CHK+7
^DG(45.91 - [#45.91] MR

Label References

Name Line Occurrences
@( CH
ASK ASK, YN, MR+2, DB+1, CV
CH EDIT, EDIT+1
CHK EDIT, DB, DB+2, CV+1, CHK, CHK+3, CHK+4, CHK+5, CHK+6, CHK+7
, CHK+9, CHK+10
DT DT, MR, FYH
EDIT CH
FYH DT
FYH2 MR
MAIN MAIN+1
MR FYH2
QR ASK, YN
QUIT EDIT, MAIN+1, DT, MR, MR+1, MR+2, DB, DB+1, DB+2, CV
, CV+1
RES CHK+5
RESYN QR, CHK+6
YN YN, EDIT

Naked Globals

Name Field # of Occurrence
^( RESYN

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ASK*, ASK+1, YN, EDIT, MAIN+1*, MR*, MR+2, DB+1, CV, QUIT!
%DT DT*, QUIT!
%DT(0 DT*
%Y YN, MAIN+1, MR, QUIT!
A QUIT!
A( EDIT
D QUIT!
DGED ASK+1, EDIT*, MAIN*, QUIT!, CHK+9, CHK+10, CHK+11
DGFL QUIT!, CHK+1*
DGFLAG MAIN*, CH, QUIT!
DGFY MR*, QUIT!
DGHM QUIT!
DGI ASK+1*, CH*, QUIT!
DGINFO ASK+1*, YN*, MR+2*, DB*, DB+1*, CV*, CH+1, QUIT!, CHK+8*, CHK+9*
DGMAX QUIT!, CHK+1!, CHK+2*, CHK+4
DGMIN QUIT!, CHK+1!, CHK+2*, CHK+4
DGNO ASK, ASK+1*, YN, EDIT*, MR+2*, DB*, DB+1*, DB+2*, CV*, CV+1*
, QUIT!, RES, RESYN, CHK, CHK+1, CHK+7, CHK+8, CHK+9*, CHK+10*, CHK+11*
DGPAF MR+2*, QUIT!
DGRUG QUIT!
DGSUM CH+1*, QUIT!
DGYR MR*, QUIT!
DTIME DT, CHK
E CH+1*, QUIT!
G QUIT!, CHK+1!*, CHK+2, CHK+3, CHK+5, CHK+6, CHK+7, CHK+10
I MR!*, MR+1, QUIT!, RES*, RESYN*
J CH+1*, QUIT!
N QUIT!, RES, CHK+1!, CHK+2*, CHK+9
T CH+1*, QUIT!
U ASK, EDIT, MAIN*, DT, DB, DB+2, CV+1, RES, CHK
X EDIT, DT*, DB, DB+2, CV+1, QUIT!, CHK*, CHK+3, CHK+4, CHK+5
, CHK+6, CHK+7, CHK+8, CHK+9
Y DT, MR, QUIT!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All