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

Package: Registration

Routine: DGOINPT1


Information

DGOINPT1 ;ALB/REW - BUILDS,PRINTS INPATIENT ROSTER ; 8/8/03 11:45am

Source Information

Source file <DGOINPT1.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Registration 7 $$MTS^DGMTU  ^DGPMLOS  ENDREP^DGUTL  CLOSE^DGUTQ  KVAR^VADATE  KVAR^VADPT  PID^VADPT6  
VA Fileman 2 NOW^%DTC  ^DIR  
Kernel 1 $$FMTE^XLFDT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGOINPT  

Entry Points

Name Comments DBIA/ICR reference
QTOUT
QUIT
HEAD
ROSTER ;
PRINT ;
MT
RM(ROOMB) ;
QTDOL
DEM
DOLIST ;
LEGEND
FIXTOT ;
ADMDT ;
ROST ;
OUT ;
CHECK ;
QKVADPT ;QUICK SUBSTITUTE FOR VADPT:REQUIRES DFN
WAIT

External References

Name Field # of Occurrence
NOW^%DTC ROSTER+2
$$MTS^DGMTU MT
^DGPMLOS ADMDT+3
ENDREP^DGUTL QUIT+3
CLOSE^DGUTQ QUIT+3
^DIR WAIT
KVAR^VADATE QUIT+3
KVAR^VADPT QUIT+3
PID^VADPT6 DEM+5
$$FMTE^XLFDT ROSTER+2, ADMDT+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: QUIT+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: IOF]""
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !!?4,"INPATIENT ROSTER",?(61-($L(X)/2)),X,?99
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: DGADMT
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !!?33,"ADMISSION",?78,"PRIMARY",?95,"ATTENDING",?112,"TREATING",?126,"MEANS"
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !,"PATIENT NAME",?21,"ID",?28,"AGE",?33,"DATE",?46,"DAYS",?52,"WARD",?67,"ROOM-BED",?78,"PHYSICIAN",?95,"PHYSICIAN",?112,"SPECIALTY",?126,"TEST"
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !,X,!
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !,$S($P(DGADM,U,12):"!",1:""),$E($P(DGADM,U,1),1,19),?21,$P(DGADM,U,2),?28,$J($P(DGADM,U,3),3)
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: ?33,$P(DGADM,U,4),?46,$J($P(DGADM,U,5),4),?52,$E($P(DGADM,U,6),1,14),?67,$E($P(DGADM,U,7),1,9),?78,$E($P(DGADM,U,8),1,15)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: ?95,$E($P(DGADM,U,9),1,15),?112,$E($P(DGADM,U,10),1,13),?128,$P(DGADM,U,11)
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: DGDS
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: LEGEND+0
Function Call: WRITE
  • Prompt: !,"'!' Before the Patient name indicates the patient chose not to be listed in the Facility Directory"
  • Line Location: LEGEND+1
Routine Call
  • DIR
  • Line Location:
    • WAIT

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RM" ROSTER+1
^DG(40.8 - [#40.8] CHECK+4
^DGPM - [#405] QKVADPT+5, DEM+1
^DIC(42 - [#42] CHECK+4
^DIC(42.4 - [#42.4] QKVADPT+9
^DIC(45.7 - [#45.7] QKVADPT+7
^DPT - [#2] ROST+1, QKVADPT+3, QKVADPT+4, DEM, DEM+3
^TMP($J QUIT+1!, FIXTOT+2, FIXTOT+5*, ROST+1*, ADMDT+6*, DOLIST+2, HEAD
^VA(200 - [#200] CHECK+2, QKVADPT+6

Label References

Name Line Occurrences
$$RM ADMDT+6
ADMDT ROST+1
CHECK ROST+1
DOLIST ROSTER+8
FIXTOT ROSTER+7
HEAD DOLIST+2, OUT+2
LEGEND OUT+2, OUT+3
OUT DOLIST+2
PRINT OUT+2
QKVADPT ADMDT+2
QTDOL DOLIST+2
QTOUT OUT+2
ROST ROSTER+4, ROSTER+5, ROSTER+6
WAIT DOLIST+2, OUT+2

Naked Globals

Name Field # of Occurrence
^(0 CHECK+4, QKVADPT+6, QKVADPT+7, QKVADPT+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ROSTER+2
BEG RM+7~, RM+9*, RM+10
CPS QUIT+1!, DOLIST+2*
DFN QUIT+1!, ROST+1*, QKVADPT+3, QKVADPT+4, DEM, DEM+3, MT
DGADM QUIT+1!, OUT+2*, PRINT+1, PRINT+2, PRINT+3
DGADMT ROSTER+2*, QUIT+1!, HEAD+1
DGBID QUIT+2!, ADMDT+2*, ADMDT+4, ADMDT+6
DGCPYS QUIT+1!, DOLIST+2
DGDAYS QUIT+1!, ADMDT+3*, ADMDT+4
DGDS QUIT+1!, PRINT+3
DGDV QUIT+1!, CHECK+4*, CHECK+5
DGFL QUIT+2!, ROST+1, CHECK+1*, CHECK+5*
DGHOW ROSTER+4, ROSTER+5, ROSTER+6, ROSTER+7, QUIT+2!, CHECK+2, CHECK+3, HEAD
DGI QUIT+1!, FIXTOT+2*, ROST+1*
DGJ QUIT+1!, ROST+1*
DGLIST QUIT+1!
DGPGM QUIT+1!
>> DGPMDD("DA" QUIT+1!
DGPMIFN QUIT+2!, ADMDT+3*
DGPVAR ROSTER+5, ROSTER+6, ROSTER+7, QUIT+2!, HEAD
DGS ROSTER+3*, QUIT+1!, FIXTOT+1*, FIXTOT+2*, FIXTOT+3, FIXTOT+4, FIXTOT+5, ROST+1*, CHECK+2, CHECK+3
, CHECK+4, CHECK+6, DOLIST+2*, HEAD, OUT+1, OUT+2
DGS1 ROSTER+3*, QUIT+2!, ROST+1, ADMDT+6, CHECK+2*, CHECK+3*, CHECK+6*
DGS2 QUIT+2!, ROST+1, CHECK+2*, CHECK+3*, CHECK+6*
DGSUBS QUIT+2!, ADMDT+6
DGTM QUIT+2!
DGTMPV QUIT+2!
DGUTV QUIT+2!, FIXTOT+3*, FIXTOT+4*, OUT+1*, OUT+2*
DGVAIN7 ADMDT+1~, ADMDT+2*, ADMDT+4
DGVAR QUIT+1!
DGWD QUIT+1!, CHECK+4*
DGX QUIT+1!, WAIT*, DOLIST+1*, DOLIST+2, OUT+2, QKVADPT+1~, DEM+3*, DEM+4
DGXREF ROSTER+4*, ROSTER+5*, ROSTER+6*, QUIT+2!, ROST+1
DIC QUIT+2!
DIR QUIT+2!
DIR(0 WAIT*
DT DEM+4
I QUIT+1!, DOLIST+2*, QKVADPT+1~, QKVADPT+3*, QKVADPT+6*
IOF HEAD+1
IOSL OUT+2, OUT+3, LEGEND
IOST WAIT
J QUIT+1!
K QUIT+1!, QKVADPT+1~, QKVADPT+2*, QKVADPT+3*
NM QUIT+1!
ROOM1 RM+7~, RM+8*, RM+9
ROOMB QUIT+1!, RM~, RM+8, RM+10*, RM+11*, RM+12
TOT ROSTER+3*, QUIT+1!, ROST+1*, ADMDT+2*
U ADMDT+4, ADMDT+5, CHECK+2, PRINT+1, PRINT+2, PRINT+3, QKVADPT+6, QKVADPT+7, QKVADPT+9, DEM
, DEM+3, MT
>> VA("BID" ADMDT+2
VADAT QUIT+2!
VADATE QUIT+2!
VADM QUIT+2!
VADM(1 ADMDT+4, ADMDT+6, DEM*
VADM(4 ADMDT+4, DEM+4*
VAEL QUIT+2!
VAEL(9 ADMDT+5, MT*
VAIN QUIT+2!
VAIN( QKVADPT+3*, QKVADPT+6*
VAIN(1 ADMDT+3, QKVADPT+5, DEM+1
VAIN(11 ADMDT+5, QKVADPT+4*
VAIN(2 ADMDT+4
VAIN(3 ADMDT+5, QKVADPT+7*, QKVADPT+9*
VAIN(4 ADMDT+4
VAIN(5 ADMDT+4, ADMDT+6
VAIN(7 ADMDT+2, QKVADPT+5*
>> VAIP(19 ADMDT+5, DEM+1*, DEM+2*
VAL ADMDT+1~, ADMDT+4*, ADMDT+5*, ADMDT+6
VAUTD QUIT+1!, CHECK+5
VAUTD( CHECK+5
VAUTW QUIT+1!, ROST+1, CHECK+2, CHECK+3
VAUTW( ROST+1, CHECK+3
WD QUIT+1!
X ROSTER+1*, QUIT+1!, ADMDT+2*, ADMDT+3, HEAD*, HEAD+1, HEAD+3!*
X1 QUIT+2!
XMDT QUIT+2!
XMM QUIT+2!
Y ROSTER+2*, QUIT+1!, WAIT
Z QUIT+2!
ZZ QUIT+2!, FIXTOT+4*, FIXTOT+5, OUT+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All