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

Package: Registration

Routine: DGRUG16


Information

DGRUG16 ;ALB/BOK/MLI - RUG-II GROUPER ; 21 OCT 86 11:00

Source Information

Source file <DGRUG16.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 3 ^DIC  YN^DICN  ^DIE  
Registration 1 (GROUPR,QUIT,SPECIAL)^DGRUG1  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGRUGGR  

Entry Points

Name Comments DBIA/ICR reference
INCOMP
SET
HELP
ERR
EDIT
REHAB
EN
INPUT
ERR1

External References

Name Field # of Occurrence
GROUPR^DGRUG1 REHAB
QUIT^DGRUG1 INPUT, INPUT+2, EN, INCOMP
SPECIAL^DGRUG1 REHAB+1
^DIC INPUT, EN
YN^DICN ERR1
^DIE INPUT+1, EDIT, INCOMP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"The field ",$P(^DD(45.9,I,0),U,1)," is missing data."
  • Line Location: SET+0
Function Call: WRITE
  • Prompt: !,*7,"If 'NASAL OR ENTERIC FEEDING' ",!," is marked 'Y'es then question 'EATING' must be marked '5'.",!
  • Line Location: SET+2
Function Call: WRITE
  • Prompt: !,*7,"For each of the therapy questions,'DAYS PER WEEK' must be '0' if level is '1'.",!
  • Line Location: SET+6
Function Call: WRITE
  • Prompt: !,*7,"For each of the therapy questions,'DAYS PER WEEK' must be greater than '0'",!,"if level is greater than '1'.",!
  • Line Location: SET+8
Function Call: WRITE
  • Prompt: !,*7,"Service of ward must be the same as bedsection"
  • Line Location: SET+13
Function Call: WRITE
  • Prompt: !!,"A RUG-II GROUP CAN NOT BE DETERMINED ON THIS PATIENT ",!
  • Line Location: ERR+0
Function Call: WRITE
  • Prompt: !,"Do you wish to edit now"
  • Line Location: ERR1+0
Function Call: WRITE
  • Prompt: !,"There are fields missing data for this patient. The PAI will",!," not be complete until all data is entered. You can",!," complete the PAI at this time by responding 'Y'es.",!
  • Line Location: HELP+0
Routine Call
  • DIE
  • Line Location:
    • INPUT+1
    • EDIT
    • INCOMP
Routine Call
  • DIC
  • Line Location:
    • INPUT
    • EN

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DG(45.9 - [#45.9] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(45.9 SET
^DG(45.9 - [#45.9] INPUT+1, SET, SET+12, EDIT
^DIC(42 - [#42] SET+12

Label References

Name Line Occurrences
EDIT SET+3, SET+6, SET+8, SET+13, ERR1
ERR SET+1
ERR1 EDIT, HELP
HELP ERR1
INCOMP ERR1
SET EDIT+1, EN

Naked Globals

Name Field # of Occurrence
^("R" SET+12
^(0 SET+12, EDIT*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ERR1*
A SET!, SET+5!, SET+7!, SET+10!, EDIT+1!
A( SET*, SET+2*, SET+5*, SET+7*, EDIT
A(70 SET+12*
A(9 SET+12*
>> DA INPUT+1*, INPUT+2, SET, EDIT, EN*, INCOMP*
>> DGD INPUT+1*
DGFLAG SET!*, SET+1, SET+2*, SET+3, SET+5!*, SET+6, SET+7!*, SET+8, SET+10!, SET+12*
, SET+13, EDIT+1!
>> DGFY SET+4*
>> DGINFO SET*, SET+2, SET+4, SET+5, SET+7, SET+12, SET+14, REHAB
>> DGPT INPUT+1*, SET+12, EDIT, EN*, INCOMP
>> DGSER SET+12*
>> DGSUM SET+14*
DIC INPUT*!, EDIT*, EN*
DIC("S" INPUT*
DIC(0 INPUT*, EDIT*, EN*
>> DIE INPUT+1*, EDIT*, INCOMP*
>> DR INPUT+1*, EDIT*, INCOMP*
>> E SET+14*, REHAB*
I SET!*, SET+2*, SET+5*, SET+7*, EDIT*, EDIT+1!
>> J SET+14*
RIEN SET+11~, SET+12*
>> T SET+14*
U INPUT+1, SET, SET+2, SET+4, SET+5, SET+7, SET+12, SET+14, REHAB
>> X EDIT
>> Y INPUT, INPUT+1, EDIT, EN
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