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 |  All
Print Page as PDF
Routine: DGRUGPRP

Package: Registration

Routine: DGRUGPRP


Information

DGRUGPRP ;ALB/GRR/SCK - RAI/MDS DATA COLECTION

Source Information

Source file <DGRUGPRP.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
Kernel 5 HOME^%ZIS  ($$PWD,CLOSE,OPEN)^%ZISH  (,$$S)^%ZTLOAD  $$NOW^XLFDT  EN^XUTMDEVQ  
VA Fileman 4 DD^%DT  NOW^%DTC  $$GET1^DIQ  ^DIR  
Registration 2 (ADD,DEM,IN5)^VADPT  ($$PRIM,$$SITE)^VASITE  
Health Level Seven 1 $$HLNAME^HLFNC  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Registration 2 DGRUG RAI/MDS BUILD ASCII FILE  DGRUG RAI/MDS PRINT W/R/B INFO  

Entry Points

Name Comments DBIA/ICR reference
EN ; Main entry point
RPT
TASK(DGFILE,DGPATH,DGDIV) ; Task off job
HED ;FORM FEED AND PRINT HEADER
EN1 ; Build HFS file
WARD ;Print Ward/Room/Bed for RAI/MDS wards

External References

Name Field # of Occurrence
DD^%DT RPT+2
NOW^%DTC RPT+2
HOME^%ZIS WARD+2
$$PWD^%ZISH EN+4, TASK+4, EN1+5
CLOSE^%ZISH EN1+27
OPEN^%ZISH EN1+6
^%ZTLOAD TASK+11
$$S^%ZTLOAD EN1+3
$$GET1^DIQ EN1+10, EN1+11, EN1+14, EN1+16, EN1+17, RPT+4, RPT+5, RPT+8
^DIR EN+15
$$HLNAME^HLFNC EN1+23
ADD^VADPT EN1+15
DEM^VADPT EN1+15
IN5^VADPT EN1+15
$$PRIM^VASITE EN+20
$$SITE^VASITE EN+21, EN+30
$$NOW^XLFDT EN+21, EN+30
EN^XUTMDEVQ WARD+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?3,"Building Tasks"
  • Line Location: EN+27
Function Call: WRITE
  • Prompt: !!?5,"Tasking ",DGFILE,"..."
  • Line Location: TASK+10
Function Call: WRITE
  • Prompt: " Task was not queued!",!
  • Line Location: TASK+12
Function Call: WRITE
  • Prompt: !?10,"Task queued: ",ZTSK,!
  • Line Location: TASK+13
Function Call: WRITE
  • Prompt: DGWREC,!
  • Line Location: EN1+26
Function Call: WRITE
  • Prompt: !!,"Total Beds for all wards: ",DGTCNT
  • Line Location: RPT+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HED+1
Function Call: WRITE
  • Prompt: !,"RAI/MDS Ward/Room/Beds"
  • Line Location: HED+3
Function Call: WRITE
  • Prompt: ?40,DGCDT
  • Line Location: HED+4
Function Call: WRITE
  • Prompt: !,"WARD: ",DGWNAME,!
  • Line Location: HED+5
Routine Call
  • %ZIS
  • Line Location:
    • WARD+2
Routine Call
  • DIR
  • Line Location:
    • EN+15

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGEN(27.11 - [#27.11] GET1^DIQ
^DGPM - [#405] GET1^DIQ
^DG(405.4 - [#405.4] GET1^DIQ
^DIC(42 - [#42] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] EN+19, EN+26, EN+29
^DG(405.4 - [#405.4] RPT+4, RPT+7
^DGEN(27.11 - [#27.11] EN1+13
^DGPM("CN" EN1+9
^DIC(5 - [#5] EN1+19

Label References

Name Line Occurrences
HED RPT+6, RPT+10
TASK EN+24, EN+33

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % RPT+2
DFN EN1+1~, EN1+10*, EN1+13
DGADAT EN1+1~, EN1+21*, EN1+24
DGADATE RPT~
DGADT RPT~
DGATIME EN1+1~, EN1+22*, EN1+24, RPT~
DGCDT RPT~, RPT+2*, HED+4
DGCNT RPT~, RPT+3*, HED+1, HED+2*
DGDIV EN+1~, EN+20*, EN+21, EN+24, EN+28*, EN+29*, EN+30, EN+33, TASK~, EN1+18
DGDNAM EN+1~, EN+28*, EN+29*
DGEN EN1+1~, EN1+13*, EN1+14
DGENP EN1+1~, EN1+13*, EN1+14*, EN1+25
DGFILE EN+1~, EN+23*, EN+24, EN+32*, EN+33, TASK~, TASK+10, EN1+6
DGHLNM EN1+1~, EN1+23*, EN1+24
DGIEN EN1+1~, EN1+9*, EN1+10, EN1+11
DGMS EN1+1~, EN1+19*, EN1+24
DGNAME EN1+1~, EN1+19*, EN1+23
DGPATH EN+1~, EN+17*, EN+24, EN+33, TASK~, TASK+3*, TASK+4*, EN1+4*, EN1+5*, EN1+6
DGRACE EN1+1~, EN1+19*, EN1+24
DGRB EN1+1~, EN1+19*, EN1+24, RPT~, RPT+7*, RPT+8
DGRBNM RPT~, RPT+8*, RPT+11
DGREC EN1+1~, EN1+20*, EN1+21, EN1+22
DGRFA EN1+1~, EN1+11*, EN1+12*, EN1+25
DGSTAB EN1+1~, EN1+19*, EN1+25
DGSTN EN+1~, EN+21*, EN+22, EN+30*, EN+31
DGSTNUM EN+1~, EN+22*, EN+23, EN+31*, EN+32
DGTCNT RPT~, RPT+1*, RPT+12*, RPT+13
DGWARD EN1+1~, EN1+9*, EN1+24, RPT~, RPT+4*, RPT+5, RPT+7
DGWCNT RPT~, RPT+1*, RPT+5*, RPT+9*, RPT+12
DGWDIV EN1+1~, EN1+16*, EN1+18
DGWIEN EN1+1~, EN1+16*, EN1+17
DGWNAME RPT~, RPT+5*, RPT+12, HED+5
DGWREC EN1+1~, EN1+24*, EN1+25*, EN1+26
DIR EN+1~, EN+15!
DIR("?" EN+9*, EN+10*, EN+11*, EN+12*, EN+13*, EN+14*
DIR("A" EN+5*, EN+6*, EN+7*, EN+8*
DIR("B" EN+4*
DIR(0 EN+4*
>> DIRUT EN+16
DOB EN1+1~, EN1+19*, EN1+24
IO EN1+8
IOF HED+1
IOSL RPT+10
POP EN1+1~, EN1+7
SEX EN1+1~, EN1+19*, EN1+24
SSN EN1+1~, EN1+19*, EN1+24
VADM EN1+1~
VADM(1 EN1+19
VADM(10 EN1+19
VADM(2 EN1+19
VADM(3 EN1+19
VADM(5 EN1+19
VADM(8 EN1+19
VAERR EN1+1~
VAIP EN1+1~
VAIP(13 EN1+20
VAIP(5 EN1+16
VAIP(6 EN1+19
VAPA EN1+1~
VAPA(1 EN1+25
VAPA(2 EN1+25
VAPA(4 EN1+25
VAPA(5 EN1+19
VAPA(6 EN1+25
>> Y EN+17, RPT+2*
ZTDESC TASK+1~, TASK+8*
ZTIO TASK+1~, TASK+9*
ZTRTN TASK+1~, TASK+7*
ZTSAVE TASK+1~
ZTSAVE( TASK+6*
ZTSK TASK+1~, TASK+12, TASK+13
ZX TASK+1~, TASK+5*, TASK+6*
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 |  All