Routine: DGOINPT1

Information

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

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

Customize PDF page

Package: Registration

Routine: DGOINPT1

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: