Routine: BCHDLA

Package	Total	Call Graph
IHS RPMS CHR System	5	^BCHDLA1 DEL^BCHRL SELECT^BCHRL0 ADD1^BCHRL01 SHOW^BCHRLS
VA Fileman	4	^%DTC WAIT^DICD ^DIE ^DIR
IHS VA Utilities	1	^XBDBQUE
Kernel	1	($$FMTE,$$NOW)^XLFDT

Package	Total	Caller Graph
IHS RPMS CHR System	1	BCH MUTL DOWNLOAD NEW PTS

Entry Points

Name	Comments	DBIA/ICR reference
XIT1	;
CONT	;
ZIS	;call to xbdbque
CONFIRM	;
FACHRN	;
SCREEN	;EP
ADD	;
QUEUE	;EP
START	;EP
CHR	;
XIT	;clean up and exit
QUEUE1	;
SMENU	;EP

External References

Name	Field # of Occurrence
^%DTC	SCREEN+1
^BCHDLA1	QUEUE+5
DEL^BCHRL	ADD+4
SELECT^BCHRL0	SCREEN+8
ADD1^BCHRL01	ADD+1
SHOW^BCHRLS	SCREEN+9
WAIT^DICD	QUEUE+5
^DIE	CONFIRM+8
^DIR	CONT+1, CONFIRM+6, QUEUE+2, SCREEN+4, SCREEN+10
^XBDBQUE	QUEUE1+2
$$FMTE^XLFDT	START+16
$$NOW^XLFDT	SCREEN+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?9,"** DOWNLOAD NEW AND CHANGED PATIENT DEMOGRAPHIC DATA TO REMOTE **",!! Line Location: START+2
Function Call: WRITE	Prompt: !,"This option is used to download new and changed patient demographic" Line Location: START+3
Function Call: WRITE	Prompt: !,"data to the CHR remote computer. This routine is to be run" Line Location: START+4
Function Call: WRITE	Prompt: !,"periodically and in coordination with the CHR program." Line Location: START+5
Function Call: WRITE	Prompt: !,"This file will be placed in the same directory that all export" Line Location: START+6
Function Call: WRITE	Prompt: !,"files are placed. In most cases, that will be /usr/spool/uucppublic." Line Location: START+7
Function Call: WRITE	Prompt: !,"See your site manager for assistance in finding the file once it has" Line Location: START+8
Function Call: WRITE	Prompt: !,"been created.",!!,"Once you get the file it needs to be forwarded" Line Location: START+9
Function Call: WRITE	Prompt: !,"to the CHR." Line Location: START+10
Function Call: WRITE	Prompt: !!,"A first time patient download has never been done for" Line Location: START+13
Function Call: WRITE	Prompt: !!!,"Patients entered or changed after "_$$FMTE^XLFDT($P($G(^BCHSITE(DUZ(2),0)),U,15))," will be downloaded.",! Line Location: START+16
Function Call: WRITE	Prompt: !!,"The file(s) created will be placed in the ",$S($P(^AUTTSITE(1,0),U,21)=1:"/usr/spool/uucppublic",1:"C:\EXPORT")," directory." Line Location: CONFIRM+1
Function Call: WRITE	Prompt: !,"The file will be called: ",BCHFILE,! Line Location: CONFIRM+2
Function Call: WRITE	Prompt: !!,"It may be several hours (or overnight) before your flat file is finished.",! Line Location: CONFIRM+3
Function Call: WRITE	Prompt: !,"As a reminder, the records that are generated and placed in the file(s)" Line Location: CONFIRM+4
Function Call: WRITE	Prompt: !,"are in a standard, pre-defined record format. For a definition of the format",!,"please see your user manual.",! Line Location: CONFIRM+5
Function Call: WRITE	Prompt: !,"Okay .. you '^'ed or timed out ..Goodbye" Line Location: QUEUE+4
Function Call: WRITE	Prompt: !! Line Location: SCREEN+10
Function Call: WRITE	Prompt: !!,"The Patients downloaded can be selected based on any of the following criteria:",! Line Location: SMENU+3
Function Call: WRITE	Prompt: ?40,J,") ",$E($P(^BCHSORT(BCHSEL(J),0),U),1,30) Line Location: SMENU+8
Function Call: WRITE	Prompt: !!?9,"<Enter a list or a range. E.g. 1-4,5,20 or 10,12,20,30>" Line Location: SMENU+9
Function Call: WRITE	Prompt: !?9,"<<HIT RETURN to conclude selections or bypass screens>>" Line Location: SMENU+10
Routine Call	DIE Line Location: CONFIRM+8
Routine Call	DIR Line Location: CONT+1 CONFIRM+6 QUEUE+2 SCREEN+4 SCREEN+10

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BCHTRPT - [#90002.42]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTSITE(1	CONFIRM+1
^BCHSITE - [#90002.31]	START+12, START+16
^BCHSORT - [#90002.41]	SMENU+7, SMENU+8
^BCHSORT("AD"	SMENU+4
^DIC(4 - [#4]	START+14

Label References

Name	Line Occurrences
QUEUE1	QUEUE+3
SCREEN	ADD+3, SCREEN+14
SMENU	SCREEN+3
XIT	START+13, CONT+2, CONT+3, ADD+2, ADD+4, CONFIRM+7, ZIS+1, QUEUE+3, QUEUE+4, QUEUE+5 , QUEUE1+3, SCREEN+5, SCREEN+6
XIT1	QUEUE+3, QUEUE+4, QUEUE+5, QUEUE1+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AMQQTAX	XIT+2!
BCHANS	XIT+1!
BCHCHR	XIT1+1!
BCHCNT	XIT+1!
BCHCRIT	XIT+1!
BCHCUT	SMENU+5*, SMENU+8, XIT+1!
BCHDISP	SMENU+1!, XIT+1!
BCHDISP(	SMENU+6, SMENU+7, SMENU+8
>> BCHDLDT	START+12*, START+13
BCHFILE	CONFIRM+2, CONFIRM+8, SCREEN+2*, XIT1+1!
BCHFOUN	XIT+3!
BCHGBD	XIT+1!
BCHGDE	XIT+1!
BCHGDS	XIT+1!
BCHHIGH	SCREEN+4, SMENU+1!, SMENU+4*, SMENU+5, XIT+1!
BCHI	XIT+1!
BCHJD	SCREEN+1*, XIT+3!
BCHPCNT	XIT+3!
BCHPROC	XIT+3!
BCHPTVS	SCREEN+2*, SCREEN+10, XIT1+1!
BCHQUIT	ADD+2, ADD+4, CONFIRM+7, SCREEN+12, XIT+1!
BCHR	XIT+3!
BCHRAR	XIT+1!
BCHRPT	CONFIRM+8, XIT1+1!
BCHSEL	SMENU+1!, XIT+1!
BCHSEL(	SMENU+4*, SMENU+6, SMENU+7, SMENU+8
BCHSKIP	XIT+3!
BCHTEXT	XIT+1!
BCHTYPE	SCREEN+2*, XIT1+1!
BCHX	XIT+3!
BCHY	XIT+1!
D	XIT+4!
D0	XIT+4!
DA	CONT+1!, CONFIRM+6!, CONFIRM+8*, CONFIRM+9!
DFN	XIT+4!
DI	XIT+4!
DIC	XIT+4!
DIE	CONFIRM+8*, CONFIRM+9!
DIR	CONT+1!, CONFIRM+6!, QUEUE+2!, SCREEN+4!, SCREEN+10!
DIR("A"	CONT+1, CONFIRM+6, QUEUE+2, SCREEN+4, SCREEN+10*
DIR("B"	CONT+1, CONFIRM+6, QUEUE+2, SCREEN+10
DIR(0	CONT+1, CONFIRM+6, QUEUE+2, SCREEN+4, SCREEN+10*
>> DIRUT	CONT+2, CONFIRM+7, QUEUE+2, QUEUE+4, SCREEN+4, SCREEN+6, SCREEN+11*, SCREEN+12
DQ	XIT+4!
DR	CONFIRM+8*, CONFIRM+9!
DT	SCREEN+1
>> DUOUT	QUEUE+2, SCREEN+4, SCREEN+11
DUZ(2	START+12, START+14, START+16
>> I	SMENU+6*, SMENU+7, SMENU+8
IOF	START+1, SMENU+2
IOSL	SMENU+2
J	SMENU+6, SMENU+8, XIT+4!
U	START+12, START+14, START+16, CONFIRM+1, SMENU+7, SMENU+8
>> X	SCREEN+1, SMENU+4*
>> X1	SCREEN+1*
>> X2	SCREEN+1*
XBFLG	XIT+4!
>> XBFQ	QUEUE1+1*
>> XBIOP	QUEUE1+1*
>> XBNS	QUEUE1+1*
>> XBRC	QUEUE1+1*
>> XBRX	QUEUE1+1*
Y	CONT+3, CONFIRM+7, QUEUE+3, SCREEN+5, SCREEN+13, XIT+4!
ZTSK	QUEUE+1!

Customize PDF page

Package: IHS RPMS CHR System

Routine: BCHDLA

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: