Routine: BDWREDO

Package	Total	Call Graph
Data Warehouse Export System	8	GIS^BDW1VBLI RUNTIME^BDWRDR (,ALPMR)^BDWRDR2 (,QUEUE)^BDWRDRI ERRBULL^BDWRDRI3 INIT^BDWRED1 ^BDWRERR $$ORF^BDWUTIL1
VA Fileman	4	NOW^%DTC ^DIE IX1^DIK ^DIR
IHS VA Utilities	2	^XBFMK EN^XBVK
IHS Patient	1	KILL^AUPNPAT
IHS Support HL7 Interfaces	1	($$DW1HDR,$$DW1MRG,$$DW1REG,$$DW1TRLR)^BHLEVENT
Kernel	1	$$FMADD^XLFDT

Package

Total

Call Graph

Data Warehouse Export System

GIS^BDW1VBLI RUNTIME^BDWRDR (,ALPMR)^BDWRDR2 (,QUEUE)^BDWRDRI ERRBULL^BDWRDRI3 INIT^BDWRED1 ^BDWRERR $$ORF^BDWUTIL1

VA Fileman

NOW^%DTC ^DIE IX1^DIK ^DIR

IHS VA Utilities

^XBFMK EN^XBVK

IHS Patient

KILL^AUPNPAT

IHS Support HL7 Interfaces

($$DW1HDR,$$DW1MRG,$$DW1REG,$$DW1TRLR)^BHLEVENT

Kernel

$$FMADD^XLFDT

Name	Comments	DBIA/ICR reference
EN	;EP FROM TASKMAN
LOG	; UPDATE LOG
PROCESS	;
EOJ	;
ABORT	; ABNORMAL TERMINATION
START	;
INIT	;
SETUTIL
PROCESS2	;
CHKLOG	; CHECK LOG FILE
RESETV	; RESET VISIT DATA IN LOG

External References

Name	Field # of Occurrence
NOW^%DTC	EN+3, LOG+3
KILL^AUPNPAT	EOJ+2
GIS^BDW1VBLI	PROCESS+1
RUNTIME^BDWRDR	EN+12
^BDWRDR2	PROCESS2+10
ALPMR^BDWRDR2	EN+8
^BDWRDRI	START+5
QUEUE^BDWRDRI	START+11
ERRBULL^BDWRDRI3	ABORT+2
INIT^BDWRED1	INIT+1
^BDWRERR	PROCESS2+9
$$ORF^BDWUTIL1	PROCESS+12
$$DW1HDR^BHLEVENT	PROCESS+2
$$DW1MRG^BHLEVENT	PROCESS+18
$$DW1REG^BHLEVENT	PROCESS+20
$$DW1TRLR^BHLEVENT	EN+13
^DIE	EN+4, EN+15, PROCESS+4, RESETV+5, LOG+4, LOG+6, LOG+9
IX1^DIK	LOG+10
^DIR	START+7, EN+18, ABORT+4
^XBFMK	EN+4, PROCESS+4, LOG+11
EN^XBVK	START+1, EOJ+2
$$FMADD^XLFDT	PROCESS+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Previous run not completed." Line Location: START+2
Function Call: WRITE	Prompt: !!,"Bye",!! Line Location: START+8
Function Call: WRITE	Prompt: !!,"Bye",!! Line Location: START+10
Function Call: WRITE	Prompt: !!,"Bye",!! Line Location: START+12
Function Call: WRITE	Prompt: !!,"Okay your request is queued!",!! Line Location: START+13
Function Call: WRITE	Prompt: !!,"-->There are more than three generations of VISITs stored in the LOG file.",!,"-->Time to do a purge." Line Location: CHKLOG+2
Function Call: WRITE	Prompt: !!,"Abnormal termination!! QFLG=",BDW("QFLG") Line Location: ABORT+3
Routine Call	DIE Line Location: EN+4 EN+15 PROCESS+4 RESETV+5 LOG+4 LOG+6 LOG+9
Routine Call	DIR Line Location: START+7 EN+18 ABORT+4

FileNo	Call Tags
^AUPNVSIT - [#9000010]	Classic Fileman Calls
^BDWXLOG - [#90213]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	PROCESS+9
^AUPNVSIT - [#9000010]	PROCESS2+4, PROCESS2+6, PROCESS2+8
^BDWERRC("B"	ABORT+1
^BDWTMP(	START+2, EN+14, PROCESS+3, PROCESS+21*
^BDWXLOG - [#90213]	PROCESS+7, PROCESS+11, PROCESS+13, PROCESS+22, PROCESS+24!, PROCESS+25, CHKLOG+1, RESETV+2
^DPT - [#2]	PROCESS+10, PROCESS+11
^XTMP("BDWREDO"	PROCESS+5, PROCESS2+3, SETUTIL*, RESETV+2, RESETV+4, RESETV+5, RESETV+7!

Name	Line Occurrences
ABORT	EN+7, EN+9, EN+11
CHKLOG	EN+16
EOJ	START+6, START+8, START+10, START+12, START+13, EN+7, EN+9, EN+11, EN+19, ABORT+2
INIT	START+9
LOG	EN+10
PROCESS	EN+6
PROCESS2	PROCESS+25
RESETV	EN+17
SETUTIL	PROCESS2+8

Name	Field # of Occurrence
^(	RESETV+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EN+3!, LOG+3
%H	EN+3!
%I	EN+3!
AUPNVSIT	EOJ+1!
>> BDW("BT"	EN+5*
>> BDW("COUNT"	LOG+1*, LOG+4
>> BDW("DEL"	LOG+8
>> BDW("DEMO"	LOG+8
>> BDW("I"	CHKLOG+1*
>> BDW("MAIN TX	DATE" , EN+3*
>> BDW("MFI"	LOG+8
>> BDW("NO CAT"	LOG+8
>> BDW("NO LOC"	LOG+8
>> BDW("NO PAT"	LOG+8
>> BDW("NO TYPE"	, LOG+8
>> BDW("QFLG"	START+6, START+8, START+10, START+12, EN+7, EN+9, EN+11, PROCESS+25, LOG+4, LOG+6 , LOG+9*, ABORT+1, ABORT+3
>> BDW("QFLG1"	ABORT+1*
>> BDW("REG"	PROCESS+21*, LOG+1, LOG+6
>> BDW("RUN LOG"	, EN+1, EN+13, EN+15, PROCESS+2, PROCESS+7, PROCESS+11, PROCESS+13, PROCESS+22, PROCESS+24 , PROCESS+25, CHKLOG+1, RESETV+2, LOG+4, LOG+6, LOG+8, LOG+10, ABORT+1
>> BDW("RUN STAR	T" , EN+3*, EN+4
>> BDW("RUN STOP	" , LOG+3*, LOG+4
>> BDW("SKIP"	LOG+4
>> BDW("V DFN"	PROCESS+25*, PROCESS2+3, PROCESS2+4, PROCESS2+6, PROCESS2+8, SETUTIL
>> BDW("VISITS"	LOG+1, LOG+6
>> BDW("VPROC"	PROCESS2+5*, LOG+4
>> BDW("X"	CHKLOG+1, CHKLOG+2, RESETV+2, RESETV+4*, RESETV+5
>> BDW("Y"	RESETV+2*
>> BDW("ZERO"	LOG+8
>> BDWCNT	EN+2*, PROCESS2+2, RESETV+2, RESETV+5
>> BDWCNT1	EN+2*
>> BDWCNT2	EN+2*
>> BDWCNTR	PROCESS+6, RESETV+1, RESETV+3*
BDWDELF	PROCESS+8!, PROCESS+11*, PROCESS+12, PROCESS+14, PROCESS+16, PROCESS+19, PROCESS+23!
BDWDELT	PROCESS+8!, PROCESS+11*, PROCESS+14, PROCESS+18, PROCESS+23!
>> BDWDFN	PROCESS+7*, PROCESS+9, PROCESS+10, PROCESS+11, PROCESS+12, PROCESS+13, PROCESS+17, PROCESS+20, PROCESS+22
BDWE	PROCESS2+1!
BDWE("ERROR"	PROCESS2+9*
>> BDWIEDST	EN+14, PROCESS+3, PROCESS+21
>> BDWLOG	EN+1*, EN+4, PROCESS+4
>> BDWM	PROCESS+18, PROCESS+20, PROCESS+21, PROCESS+22
>> BDWMSGH	PROCESS+2*, PROCESS+3, PROCESS+4, LOG+6
>> BDWMSGT	EN+13*, EN+14, EN+15
>> BDWO("QUEUE"	START+13
>> BDWO("RUN TYP	E" , START+4*
>> BDWO("RUN"	START+3*
BDWR	PROCESS+13!
BDWR("ALIAS"	PROCESS+13*
BDWR("BASE"	PROCESS+13*
BDWR("CHART"	PROCESS+13*
BDWR("DEMO"	PROCESS+13*
BDWR("ELIG"	PROCESS+13*
>> BDWRUN	EN+15
BDWV	PROCESS2+1!
BDWV("TX GENE	RATED" , PROCESS2+3*, SETUTIL
BDWV("V DATE"	, PROCESS2+7*
BDWV("V REC"	PROCESS2+6*, PROCESS2+7, PROCESS2+8
BDWVMSG	PROCESS2+10!, SETUTIL
DA	START+7!, EN+4, EN+15, EN+18!, PROCESS+4, RESETV+5!, LOG+4, LOG+5!, LOG+6, LOG+7! , LOG+8, LOG+10!, ABORT+1*, ABORT+4!
DIE	EN+4, EN+15, PROCESS+4, RESETV+5, LOG+4, LOG+5!, LOG+6, LOG+7!, LOG+8, ABORT+1
DIK	LOG+10*!
DIR	START+7!, EN+18!, ABORT+4!
DIR("A"	START+7, EN+18, ABORT+4*
DIR(0	START+7, EN+18, ABORT+4*
DIU	LOG+7!
DIV	LOG+7!
DR	EN+4, EN+15, PROCESS+4, RESETV+5!, LOG+4, LOG+5!, LOG+6, LOG+7!, LOG+8, ABORT+1
DT	PROCESS+5
>> INA	PROCESS+15*, PROCESS+18, PROCESS+20
>> INA("DELETE"	PROCESS+8!, PROCESS+14, PROCESS+17, PROCESS+23!
U	PROCESS+5, PROCESS+11, PROCESS+13, PROCESS+22, PROCESS2+8, SETUTIL
>> Y	PROCESS+13*, LOG+4, LOG+6, LOG+9
>> ZTQUEUED	START+6, EN+2, EN+7, EN+9, EN+11, EN+16, EN+18, PROCESS+6, RESETV+1, RESETV+3 , LOG+1, LOG+2, ABORT+2, EOJ+3
>> ZTREQ	EOJ+3*

Customize PDF page

Package: Data Warehouse Export System

Routine: BDWREDO

Information

Source Information

Call Graph

Call Graph Total: 17

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: