Routine: BCHEXD

Information

BCHEXD ; IHS/CMI/LAB - MAIN DRIVER FOR CHR EXPORT TX GEN ;

Call Graph

Call Graph Total: 11

Package	Total	Call Graph
IHS RPMS CHR System	8	(DELETES,RECORD)^BCHEXD2 ^BCHEXDI ERRBULL^BCHEXDI3 (,RUNTIME)^BCHEXEOJ ^BCHEXERR ^BCHEXLOG TAPE^BCHEXTAP CALLDIE^BCHUTIL
VA Fileman	2	NOW^%DTC ^DIR
IHS VA Utilities	1	^XBFMK

Caller Graph

Caller Graph Total: 2

Package	Total	Caller Graph
IHS RPMS CHR System	2	BCH EXPORT GENERATE TXS BCHEXD2

Entry Points

Name	Comments	DBIA/ICR reference
RESET	; kill CHR xref and set flag if tx 23 or 24 generated
CNTBUILD	;EP count and build tx
PROCESS	;
EOJ	; EOJ
PURGE2	;
DRIVER	;called from TSKMN+2
PURGE	; PURGE 'AEX' XREF FOR CHR RECORDS JUST DONE
START	;
ABORT	; ABNORMAL TERMINATION
DEL	;update delete file
PROCESS3	;
PROCESS2	;
CHKLOG	; CHECK LOG FILE
TAPE	; COPY TRANSACTIONS TO TAPE
DELETES	;

External References

Name	Field # of Occurrence
NOW^%DTC	DRIVER+2
DELETES^BCHEXD2	DELETES+1
RECORD^BCHEXD2	PROCESS3+16
^BCHEXDI	START+3
ERRBULL^BCHEXDI3	ABORT+2
^BCHEXEOJ	EOJ+1
RUNTIME^BCHEXEOJ	DRIVER+11
^BCHEXERR	CNTBUILD+1
^BCHEXLOG	DRIVER+8
TAPE^BCHEXTAP	TAPE+1
CALLDIE^BCHUTIL	DRIVER+3, PROCESS3+20, DEL+4, RESET+2
^DIR	DRIVER+15, ABORT+4
^XBFMK	PROCESS3+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Okay, your request is queued! Bye",! Line Location: START+4
Function Call: WRITE	Prompt: !!,"Bye",!! Line Location: START+5
Function Call: WRITE	Prompt: !! Line Location: DRIVER+15
Function Call: WRITE	Prompt: !,"-->There are more than twelve generations of CHR RECORDs stored in the LOG file.",!,"-->Time to do a purge." Line Location: CHKLOG+2
Function Call: WRITE	Prompt: !!,"Abnormal termination!! QFLG=",BCH("QFLG") Line Location: ABORT+3
Routine Call	DIR Line Location: DRIVER+15 ABORT+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BCHR - [#90002]	Classic Fileman Calls
^BCHXLOG - [#90002.91]	Classic Fileman Calls
^BCHEXDEL - [#90002.95]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BCHDTER("B"	ABORT+1
^BCHR - [#90002]	PROCESS3+1, PROCESS3+8
^BCHR("AEX"	PROCESS+6, PROCESS2+1, PROCESS3+1!, RESET+1!
^BCHRDATA(	CNTBUILD+6, CNTBUILD+7
^BCHRPROB - [#90002.01]	PROCESS3+10
^BCHRPROB("AD"	PROCESS3+7, PROCESS3+9
^BCHXLOG - [#90002.91]	PROCESS3+3
^TMP("BCH"	CNTBUILD+4*
^TMP("BCHDR"	PROCESS3+4*, PURGE+3, DEL+2, DEL+3, DEL+5!, PURGE2+1, RESET+2

Label References

Name	Line Occurrences
ABORT	START+6, DRIVER+4, DRIVER+7, DRIVER+9, DRIVER+13
CHKLOG	DRIVER+14
CNTBUILD	PROCESS3+7, PROCESS3+13, PROCESS3+17
DELETES	PROCESS+7
EOJ	START+4, START+5, DRIVER+16, ABORT+2, ABORT+5
PROCESS	DRIVER+6
PROCESS2	PROCESS+6
PROCESS3	PROCESS2+1
PURGE	DRIVER+10
PURGE2	PURGE+3
RESET	PURGE2+1
TAPE	DRIVER+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	DRIVER+2!
%H	DRIVER+2!
%I	DRIVER+2!
>> BCH(	CNTBUILD+3*
>> BCH("BT"	DRIVER+1*
>> BCH("CONTROL	DATE" , PROCESS+4, PROCESS+6, PROCESS2+1, PROCESS3+1, PROCESS3+4
>> BCH("COUNT"	CNTBUILD+2, CNTBUILD+6, CNTBUILD+7
>> BCH("ERROR CO	UNT" , CNTBUILD+1*
>> BCH("MAIN TX	DATE" , DRIVER+2*, DEL+4, CNTBUILD+4
>> BCH("POSTING	DATE" , PROCESS+4*
>> BCH("POVS"	PROCESS3+15!, CNTBUILD+7
>> BCH("QFLG"	START+5, START+6, DRIVER+7, DRIVER+9, DRIVER+13, PROCESS+6, PROCESS2+1, ABORT+1, ABORT+3
>> BCH("QFLG1"	ABORT+1*
>> BCH("RUN BEGI	N" , PROCESS+4
>> BCH("RUN END"	, PROCESS+6
>> BCH("RUN LOG"	, DRIVER+3, PROCESS3+3, PROCESS3+18, ABORT+1
>> BCH("RUN STAR	T" , DRIVER+2*, DRIVER+3
>> BCH("VISIT CO	UNT" , PROCESS3+5*
>> BCHCNT	DRIVER+5*, PROCESS3+6, RESET+3
>> BCHCNT1	DRIVER+5*
>> BCHCNT2	DRIVER+5*
>> BCHCNTR	PROCESS+4, PURGE+2
BCHCPOV	PROCESS3+2!, PROCESS3+9*
BCHE	PROCESS3+2!, PROCESS3+7, PROCESS3+9!, PROCESS3+10, PROCESS3+13, PROCESS3+15!, CNTBUILD+1
>> BCHO("QUEUE"	START+4
>> BCHO("RUN"	START+2*, CNTBUILD+4
>> BCHO("SCHEDULED"	START+1*
>> BCHPOVD	PROCESS3+9*, PROCESS3+10
>> BCHR	PROCESS2+1, PROCESS3+1, PROCESS3+3, PROCESS3+4, PROCESS3+7, PROCESS3+8, PROCESS3+9, PROCESS3+18, DEL+3, DEL+4 , PURGE2+1*, RESET+1, RESET+2, CNTBUILD+4
>> BCHREC	PROCESS3+8*
>> BCHRTYPE	PROCESS+5, PROCESS+7, PROCESS3+19, CNTBUILD+3
BCHTX	PROCESS3+9!, PROCESS3+15!, CNTBUILD+6
>> BCHV("R DATE"	, PURGE+2, PURGE+3, DEL+1, DEL+2, DEL+3, PURGE2+1, RESET+1
>> BCHV("TX GENE	RATED" , PROCESS3+4, PROCESS3+19, CNTBUILD+4
>> DA	DRIVER+3, PROCESS3+18, DEL+4, RESET+2, ABORT+1*
>> DIE	DRIVER+3, PROCESS3+18, DEL+4, RESET+2, ABORT+1*
DIR	DRIVER+15!, ABORT+4!
DIR("A"	DRIVER+15, ABORT+4
DIR(0	DRIVER+15, ABORT+4
>> DIRUT	DRIVER+15, ABORT+4
>> DR	DRIVER+3, PROCESS3+18, DEL+4, RESET+2, ABORT+1*
>> DR(2	PROCESS3+19*
>> DUOUT	DRIVER+15, ABORT+4
U	PROCESS3+10
>> X	CNTBUILD+7*
>> Y	DRIVER+4
>> ZTQUEUED	START+1, DRIVER+5, DRIVER+14, DRIVER+15, PROCESS+3, PURGE+1, ABORT+2

Customize PDF page

Package: IHS RPMS CHR System

Routine: BCHEXD

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: