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

Package: Registration

Routine: DGRUGDS


Information

DGRUGDS ;ALB/GRR - RAI/MDS DATA COLLECTION

Source Information

Source file <DGRUGDS.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Registration 4 BLDMSG^DGRUADT1  $$CHKWARD^DGRUUTL  IN5^VADPT  $$SITE^VASITE  
Kernel 2 (,$$S)^%ZTLOAD  $$NOW^XLFDT  
VA FileMan 2 $$GET1^DIQ  ^DIR  
Health Level Seven 1 INIT^HLFNC2  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DGRU DATA SEED  DGRU PATIENT DATA SEED  

Entry Points

Name Comments DBIA/ICR reference
EN ;
TEXT3 ;;This option will do the data seeding of patient data in the RAI/MDS COTS system.
TEXT ;;This option will do the data seeding of patient data in the RAI/MDS COTS system.
EN1 ;
EN3 ;
EN4 ;
INPAT ;
ACTIVE ;
EXIT ;
DIV ;

External References

Name Field # of Occurrence
^%ZTLOAD DIV+25
$$S^%ZTLOAD EN1+18, EN1+35, EN1+37, EN1+38
BLDMSG^DGRUADT1 EN1+32, ACTIVE+8
$$CHKWARD^DGRUUTL ACTIVE+5, ACTIVE+7
$$GET1^DIQ EN1+21, EN1+22, EN1+29, EN1+30, INPAT+8, ACTIVE+6
^DIR EN+6, DIV+6, DIV+17, EN3+6, INPAT+6, INPAT+20, INPAT+26
INIT^HLFNC2 EN1+3, EN4+3
IN5^VADPT ACTIVE+4
$$SITE^VASITE DIV+8
$$NOW^XLFDT DIV+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !,DGX
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DIV+1
Function Call: WRITE
  • Prompt: !!,?4,"You have selected: ",$P(DGDIV,"^",2)
  • Line Location: DIV+9
Function Call: WRITE
  • Prompt: !,?4,"Station Number : ",$S(+DGSTN>0:$P(DGSTN,"^",3),1:"Undefined Station Number"),!
  • Line Location: DIV+10
Function Call: WRITE
  • Prompt: !
  • Line Location: DIV+19
Function Call: WRITE
  • Prompt: !,"** The data seed process was not tasked **"
  • Line Location: DIV+26
Function Call: WRITE
  • Prompt: !,"The data seed process has been tasked (#",ZTSK,")"
  • Line Location: DIV+27
Function Call: WRITE
  • Prompt: !
  • Line Location: DIV+28
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: EN3+1
Function Call: WRITE
  • Prompt: !,DGX
  • Line Location: EN3+3
Function Call: WRITE
  • Prompt: !
  • Line Location: INPAT+1
Function Call: WRITE
  • Prompt: !!,?4,"You have selected: ",DGPTNM
  • Line Location: INPAT+12
Function Call: WRITE
  • Prompt: !
  • Line Location: INPAT+13
Function Call: WRITE
  • Prompt: !
  • Line Location: INPAT+23
Function Call: WRITE
  • Prompt: !
  • Line Location: INPAT+28
Function Call: WRITE
  • Prompt: !!?4,DGPTNM_" is not in an RAI ward."
  • Line Location: ACTIVE+5
Function Call: WRITE
  • Prompt: !!?4,DGPTNM_" is not an active patient in an RAI ward."
  • Line Location: ACTIVE+6
Function Call: WRITE
  • Prompt: !!?4,"Sending message..."
  • Line Location: ACTIVE+9
Routine Call
  • DIR
  • Line Location:
    • EN+6
    • DIV+6
    • DIV+17
    • EN3+6
    • INPAT+6
    • INPAT+20
    • INPAT+26

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] GET1^DIQ
^DGPM - [#405] GET1^DIQ
^DIC(42 - [#42] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM("CN" EN1+15, EN1+27
^DIC(42 - [#42] EN1+19
^ORD(101 - [#101] EN1+2, EN4+2

Label References

Name Line Occurrences
DIV DIV+11, DIV+18
EN4 INPAT+21
EXIT ACTIVE+5, ACTIVE+6, ACTIVE+10
INPAT INPAT+14, INPAT+21, INPAT+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN EN1+29*, EN1+32, EN1+34, INPAT+2~, ACTIVE+1*, ACTIVE+6, ACTIVE+8, EXIT+1!
DGDIV EN+2~, DIV+7*, DIV+8, DIV+9, DIV+21, DIV+23*, EN1+24
DGFNM EN3+2~, INPAT+9*, INPAT+11
DGIEN EN1+1~, EN1+26*, EN1+27*, EN1+29, EN1+30, EN1+32, INPAT+2~, EN4+1~, ACTIVE+7*, ACTIVE+8
, EXIT+1!
DGINPT EN3+2~, INPAT+7*, INPAT+8, INPAT+14, ACTIVE+1, EXIT+1!
DGLNM EN3+2~, INPAT+10*, INPAT+11
DGMDT EN1+1~, EN1+30*, EN1+32, INPAT+2~, EN4+1~, ACTIVE+7*, ACTIVE+8, EXIT+1!
DGPTNM EN3+2~, INPAT+8*, INPAT+9, INPAT+10, INPAT+11*, INPAT+12, ACTIVE+5, ACTIVE+6
DGRSIED EN1+1~, EN1+2*, EN4+1~, EN4+2*
DGRUGDS EN1+1~, EN1+12*, EN1+15, EN1+18*, EN1+27, EN1+35*, EN1+37, EN1+38, EN4+1~, ACTIVE+2*
DGSEED EN1+1~, EN1+32*, EN4+1~, ACTIVE+8*
DGSENM EN1+1~, EN1+2*, EN1+3, EN4+1~, EN4+2*, EN4+3
DGSTN EN+2~, DIV+8*, DIV+10, DIV+11
DGWARD EN1+1~, EN1+13*, EN1+15*, EN1+17, EN1+19, EN1+27, EN1+34, EN4+1~
DGWDIV EN1+1~, EN1+22*, EN1+24, EN4+1~
DGWIEN EN1+1~, EN1+19*, EN1+21, EN1+22, EN1+32, INPAT+2~, EN4+1~, ACTIVE+7*, ACTIVE+8, EXIT+1!
DGX EN+2~, EN+3*, EN3+3*
DIR EN+6!, DIV+2~, DIV+6!, DIV+14~, DIV+17!, EN3+6!, INPAT+2~, INPAT+6!, INPAT+17~, INPAT+20!
, INPAT+26!
DIR("?" EN+5*, DIV+5*, DIV+16*, EN3+5*, INPAT+5*, INPAT+19*, INPAT+25*
DIR("A" EN+4*, DIV+4*, DIV+15*, EN3+4*, INPAT+4*, INPAT+18*, INPAT+24*
DIR("B" EN+4*, DIV+15*, EN3+4*, INPAT+18*, INPAT+24*
DIR(0 EN+4*, DIV+3*, DIV+15*, EN3+4*, INPAT+3*, INPAT+18*, INPAT+24*
DIRUT EN+7, DIV+2~, DIV+6, EN3+7, INPAT+2~, INPAT+6
DTOUT DIV+14~, DIV+17, INPAT+17~, INPAT+20, INPAT+26
DUOUT DIV+14~, DIV+17, INPAT+17~, INPAT+20, INPAT+26
>> HL EN1+3, EN1+5, EN4+3, EN4+5
>> HL("" EN1+4, EN4+4
>> HLERR(1 EN1+5*, EN4+5*
>> I EN+3*, EN3+3*
IOF EN+1, EN3+1
U EN1+2*, EN4+2*
VAIP EXIT+1!
VAIP("D" ACTIVE+3*
VAIP(1 ACTIVE+7
VAIP(3 ACTIVE+7
VAIP(5 ACTIVE+5, ACTIVE+7
X DIV+20~, EN1+17*, EN1+18, EN1+34*, EN1+35, EN1+37*, EN1+38*
>> Y EN+7, DIV+6, DIV+7, DIV+18, EN3+7, INPAT+6, INPAT+7, INPAT+21, INPAT+26, INPAT+27
ZTDESC DIV+20~, DIV+21*
ZTDTH DIV+20~
ZTIO DIV+20~, DIV+22*
ZTQUEUED DIV+20~
ZTREQ DIV+20~
ZTRTN DIV+20~, DIV+22*
ZTSAVE DIV+20~
ZTSAVE("DGDIV" DIV+24*
ZTSAVE("DGSTN" DIV+24*
>> ZTSK DIV+26, DIV+27

Marked Items

Name Field # of Occurrence
$T(TEXT+I EN+3
$T(TEXT3+I EN3+3
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 |  Local Variables |  Marked Items |  All