Routine: DG53659

Package	Total	Call Graph
Kernel	3	(,$$S)^%ZTLOAD ($$FMADD,$$FMTE,$$NOW)^XLFDT ($$NEWCP,BMES)^XPDUTL
Registration	1	$$MAIL^DG53659M
VA Fileman	1	^DIE

Entry Points

Name	Comments	DBIA/ICR reference
STATUS	;display status of current run
STOP(NAMSPC)	;
CHKR
RUN	;entry point from taskman
CHPAT(DFN)	;
DFN
UPDATEX(NAMSPC,TOTREC,LASTREC,TOTPAT)	;
TESTID(MESS)	;
NAMSPC()	;
LOOP(NAMSPC,TESTING)	;
QUE	;
SETUPX(EXPDAYS)	; ; requires EXPDAYS - number of days to keep XTMP around
TESTIDG
TEST	;entry point for test mode
END	; Post-install done
POST	;
CHKSTAT(POST)	;check if job is running, stopped, or complete
EP	; Queue the conversion
KILIT	;

External References

Name	Field # of Occurrence
^%ZTLOAD	POST+5
$$S^%ZTLOAD	STOP+5
$$MAIL^DG53659M	QUE+17
^DIE	CHKR+11
$$FMADD^XLFDT	SETUPX+6
$$FMTE^XLFDT	STATUS+7, STATUS+9
$$NOW^XLFDT	POST+5, QUE+8, QUE+14, SETUPX+5, STOP+9
$$NEWCP^XPDUTL	EP+2, EP+3
BMES^XPDUTL	POST+3, POST+6, POST+7, POST+8, END+1, RUN+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?10,"Ending IEN can't be less than starting IEN" Line Location: TEST+8
Function Call: WRITE	Prompt: !!,MESS," DFN for Patient file? " Line Location: TESTIDG+1
Function Call: WRITE	Prompt: !,?10,"Must be numeric" Line Location: TESTIDG+3
Function Call: WRITE	Prompt: !!,"Task not started!!!" Line Location: STATUS+5
Function Call: WRITE	Prompt: !!," Current status: ",$P(X,U,6) Line Location: STATUS+6
Function Call: WRITE	Prompt: !," Starting time: ",$$FMTE^XLFDT($P(X,U,7)) Line Location: STATUS+7
Function Call: WRITE	Prompt: !," Ending time: ",$$FMTE^XLFDT($P(X,U,8)) Line Location: STATUS+9
Function Call: WRITE	Prompt: !!," Total patient records read: ",$P(X,U,2) Line Location: STATUS+11
Function Call: WRITE	Prompt: !," Last patient record processed: ",$P(X,U,1) Line Location: STATUS+12
Function Call: WRITE	Prompt: !," Total patient records changed: ",$P(X,U,10) Line Location: STATUS+13
Routine Call	DIE Line Location: CHKR+11

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	DFN+6, CHPAT+3, CHPAT+7, CHPAT+13
^TMP(	RUN+5!
^XTMP(	TEST+5!, TEST+9, QUE+6, QUE+9, QUE+12, QUE+15, QUE+19, SETUPX+7, SETUPX+8, LOOP+6 , LOOP+7, DFN+2, UPDATEX+2, UPDATEX+5, STATUS+4, STOP+6!, STOP+8, STOP+10*, CHKSTAT+3, KILIT+2!

Label References

Name	Line Occurrences
$$CHKSTAT	RUN+1, TEST+4
$$CHPAT	CHKR+6
$$LOOP	QUE+11
$$NAMSPC	RUN+5, TEST+2, QUE+4, SETUPX+4, STATUS+3, CHKSTAT+2, KILIT+1
$$SETUPX	QUE+5
$$STOP	CHKR+5
$$TESTID	TEST+6, TEST+7
$$UPDATEX	CHKR+14
CHKR	DFN+6
DFN	LOOP+14
KILIT	CHKSTAT+5
QUE	RUN+5, TEST+10
TESTIDG	TESTIDG+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EP+1~, EP+2, EP+3
BEGTIME	SETUPX+2~, SETUPX+5*, SETUPX+6, SETUPX+7
DA	CHKR+9~, CHKR+10*
DFN	DFN~, DFN+1, DFN+3, DFN+6*, CHKR+2, CHKR+3, CHKR+6, CHKR+10, CHPAT~, CHPAT+3 , CHPAT+7, CHPAT+13
DIE	CHKR+9~, CHKR+10*
DR	CHKR+9~, CHKR+10*
DUZ	QUE+17
END	DFN~, DFN+1, DFN+3, CHKR+2
ENDID	TEST+1~, TEST+7*, TEST+8, TEST+9
EXPDAYS	SETUPX~, SETUPX+6
LASTREC	LOOP+2~, LOOP+4, LOOP+9, CHKR+3*, CHKR+14, UPDATEX~, UPDATEX+3
MESS	TESTID~, TESTIDG+1
NAMSPC	TEST+1~, TEST+2, TEST+5, TEST+9, QUE+1~, QUE+4, QUE+6, QUE+9, QUE+11, QUE+12 , QUE+15, QUE+17, QUE+19, SETUPX+2~, SETUPX+4, SETUPX+7, SETUPX+8, LOOP~, LOOP+6, LOOP+7 , DFN+2, CHKR+5, CHKR+14, UPDATEX~, UPDATEX+2, UPDATEX+5, STATUS+1~, STATUS+3, STATUS+4, STOP~ , STOP+6, STOP+8, STOP+10, CHKSTAT+1~, CHKSTAT+2, CHKSTAT+3, KILIT+1, KILIT+2
NEW	CHKR~, CHKR+7*, CHKR+10
OLD	STATUS+1~
POST	CHKSTAT~, KILIT+2
PURGDT	SETUPX+2~, SETUPX+6*, SETUPX+7
RET	CHPAT+1~, CHPAT+2, CHPAT+5, CHPAT+7, CHPAT+9, CHPAT+14, CHPAT+16
REXP	LOOP+3~
STARTID	TEST+1~, TEST+6*, TEST+8, TEST+9
TESTING	RUN+4~, RUN+5, TEST+1~, TEST+3, QUE+3~*, QUE+11, QUE+17, QUE+18!, LOOP~, CHKR+8
TOTPAT	LOOP+2~, LOOP+12, CHKR+7, CHKR+14, UPDATEX~, UPDATEX+4
TOTREC	LOOP+2~, LOOP+5, LOOP+11, CHKR+4*, CHKR+5, CHKR+14, UPDATEX~, UPDATEX+3
U	POST+1~, POST+2, TEST+1~, TEST+3, TEST+9, QUE+1~, QUE+2, QUE+7, QUE+8, QUE+11 , QUE+13, QUE+14, SETUPX+2~, SETUPX+3, SETUPX+7, SETUPX+8, LOOP+3~, LOOP+4, LOOP+9, LOOP+11 , LOOP+12, DFN+3, CHKR~, CHKR+1, CHKR+6, CHKR+7, CHPAT+1~, CHPAT+2, CHPAT+4, CHPAT+7 , CHPAT+13, UPDATEX+1~, UPDATEX+2, UPDATEX+3, UPDATEX+4, STATUS+1~, STATUS+2, STATUS+6, STATUS+7, STATUS+8 , STATUS+9, STATUS+11, STATUS+12, STATUS+13, STOP+1~, STOP+2, STOP+9
VAL	CHPAT+1~, CHPAT+4*, CHPAT+5, CHPAT+6, CHPAT+7, CHPAT+13
X	TEST+1~, TEST+4, TESTIDG~, TESTIDG+1, TESTIDG+2, TESTIDG+3, TESTIDG+4, QUE+1~, QUE+5, QUE+6 , QUE+7, QUE+8, QUE+9, QUE+11, QUE+12, QUE+13, QUE+14, QUE+15, QUE+17, LOOP+2~ , DFN~, DFN+2, DFN+3, CHKR~, CHKR+6, CHKR+7, CHKR+9~, CHKR+14, CHPAT+1~, CHPAT+3* , CHPAT+4, UPDATEX+1~, UPDATEX+2, UPDATEX+3, UPDATEX+4, UPDATEX+5, STATUS+1~, STATUS+4, STATUS+5, STATUS+6 , STATUS+7, STATUS+8, STATUS+9, STATUS+11, STATUS+12, STATUS+13, STOP+1~, STOP+8, STOP+9, STOP+10
XREC	LOOP+2~, LOOP+7*, LOOP+9, LOOP+11, LOOP+12
ZSTSTOP	STOP+1~
ZTDESC	POST+1~, POST+4*
ZTDTH	POST+1~, POST+5*
ZTIO	POST+1~, POST+5*
ZTRTN	POST+1~, POST+4*
ZTSAVE	POST+1~
ZTSK	POST+1~, POST+6
ZTSTOP	QUE+1~, QUE+11, QUE+13, LOOP+3~, LOOP+4, LOOP+15, DFN+5, DFN+6, CHKR+2, CHKR+5* , STOP+4, STOP+5, STOP+6*, STOP+7, STOP+12

Marked Items

Name	Field # of Occurrence
$T(	NAMSPC+1

Customize PDF page

Package: Registration

Routine: DG53659

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items