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

Package: Registration

Routine: DGRUGSA


Information

DGRUGSA ;ALB/MLI/BOK - RUG-II BACK GROUND TRIGGER FOR SEMI-ANNUAL CENSUS ; 21 JAN 88

Source Information

Source file <DGRUGSA.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 5 ^%DT  C^%DTC  FILE^DICN  ^DIE  DT^DIQ  
Kernel 1 ^%ZIS  
Registration 1 (CLOSE,ZIS)^DGUTQ  

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 DG RUG SEMI ANNUAL  DG RUG SEMI ANNUAL BGJ  

Entry Points

Name Comments DBIA/ICR reference
1
PRT
QUIT
CK
HEAD
FILE
BUL
DATES ;;0401
EN

External References

Name Field # of Occurrence
^%DT 1
C^%DTC 1+1
^%ZIS EN
CLOSE^DGUTQ QUIT
ZIS^DGUTQ DGRUGSA+2
FILE^DICN FILE+3
^DIE FILE+5
DT^DIQ PRTHEAD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Semi-annual assessments can only be run for April 1 and September 30.",!,"Can not complete now."
  • Line Location: 1+2
Function Call: WRITE
  • Prompt: !,I,?30,$P(^(S),"^",2),?55
  • Line Location: PRT+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: QUIT+0
Function Call: WRITE
  • Prompt: @IOF,!,?3,$P(^DIC(42,+W,0),U),?60,"DATE: "
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !!,"PATIENT ASSESSMENT INSTRUMENTS HAVE BEEN CREATED FOR THE FOLLOWING PATIENTS ",!?5,"RESIDING ON INTERMEDIATE MEDICINE WARDS OR NURSING HOME CARE UNITS"
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: !?25,"DUE TO SEMI-ANNUAL CENSUS",!!,?5,"NAME",?33,"SSN",?46,"DATE OF ADMISSION/TRANSFER IN"
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !,"There was an attempt to set up a PAI record on ",$P(^DPT(DFN,0),U)," ",$P(^(0),U,9),!,"Please verify that this patient's data is accurate and create a PAI record."
  • Line Location: BUL+0
Routine Call
  • DIE
  • Line Location:
    • FILE+5
Routine Call
  • %ZIS
  • Line Location:
    • 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)
^DG(45.9 - [#45.9] FILE
^DGPM - [#405] 1+5, CK
^DGPM("ATID2" CK
^DIC(42 - [#42] 1+4, HEAD
^DPT - [#2] FILE+2, BUL
^DPT("CN" 1+5
^UTILITY($J PRT, QUIT!, FILE+6*

Label References

Name Line Occurrences
1 DGRUGSA+2, EN
BUL FILE+3
CK 1+5
FILE 1+5
HEAD PRT
QUIT DGRUGSA+2, 1+2

Naked Globals

Name Field # of Occurrence
^( 1+4, 1+5, PRT
^(0 1+4, CKFILE+2, BUL

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT 1*, QUIT!
A QUIT!
DA QUIT!, FILE+4*
DFN 1+5*, QUIT!, CKFILEFILE+2, BUL
DGA1 QUIT!
DGAD 1+1*, 1+3, QUIT!
DGB 1+1*, QUIT!
DGCA 1+5*, QUIT!, CK*
DGD 1+5*, QUIT!, FILE+5, FILE+6
DGDT 1+3*, QUIT!, HEADFILEFILE+5
DGE 1+1*, QUIT!
DGFL 1+1*, 1+2, QUIT!, CK*
DGH 1*, 1+1, QUIT!
DGMD 1+1*, QUIT!
DGN QUIT!, FILE+2*, FILE+6
DGPGM DGRUGSA+2*, QUIT!
DGSEMI 1*, QUIT!
DGSSN QUIT!, FILE+2*, FILE+5, FILE+6
DGT QUIT!
DGVAR DGRUGSA+2*, QUIT!
DGW 1+5*, QUIT!
DGWARD FILE+1~, FILE+4*
DGWD QUIT!
DGWD( 1+4*, 1+5
DGX QUIT!
DGY 1+1*, 1+3, QUIT!
DIC QUIT!, FILE+3*
DIC(0 FILE+3*
DIE QUIT!, FILE+4*
DLAYGO QUIT!, FILE+2*
DR QUIT!, FILE+5*
I 1+1*, PRT!*, QUIT!, CK*
I1 PRT*, QUIT!
IO DGRUGSA+2
IOF QUITHEAD
ION EN
>> IOP EN*
J QUIT!, CK*
>> POP DGRUGSA+2
R 1+4*, QUIT!
S 1+4*, 1+5*, PRT*, QUIT!, FILE+5
S1 PRT*, QUIT!
U 1*, 1+4, 1+5, HEADFILE+2, BUL
W PRT!*, QUIT!, HEAD
W0 1+4*, 1+5*, QUIT!, FILE+4, FILE+6
W1 PRT!*, QUIT!
X 1*, 1+1, QUIT!, FILE+2*
X1 1+1*, QUIT!
X2 1+1*, QUIT!
Y 1, PRT*, QUIT!, HEAD*, FILE+3, FILE+4

Marked Items

Name Field # of Occurrence
$T(DATES+I 1+1
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 |  Marked Items  | All