Routine: BARBLCN

Package	Total	Call Graph
IHS Accounts Receivable	3	TR^BARTDO ($$NEW,MSG)^BARTR $$EN^BARVDF
IHS VA Utilities	1	$$DIC^XBDIQ1
VA Fileman	1	^DIE

Package	Total	Caller Graph
IHS Accounts Receivable	1	BARUP

Entry Points

Name	Comments	DBIA/ICR reference
ENP	; EP ; EN point for cancelling a bill from 3P
SRCHTRNS	; ; Search the ^BARTR global for 49 type of transaction record for this A/R bill
TXT	;
EXIT
REVERSE	; ; Create transaction records to reverse out the transaction records when 3P cancels a bill

Name	Line Occurrences
Function Call: WRITE	Prompt: $$EN^BARVDF("IOF"),X_" Not in A/R System!" Line Location: ENP+3
Routine Call	DIE Line Location: SRCHTRNS+18 REVERSE+29

Name	Line Occurrences (* Changed, ! Killed)
^BARBL(	ENP+2, SRCHTRNS+5
^BARTR(	SRCHTRNS+6, SRCHTRNS+7, SRCHTRNS+8, SRCHTRNS+9, REVERSE+9

Name	Line Occurrences
REVERSE	SRCHTRNS+10

Name	Field # of Occurrence
BARAC	REVERSE+2~, REVERSE+18*
BARASFAC	REVERSE+3~, REVERSE+20*
BARATYP	REVERSE+2~, REVERSE+15*
BARBDFN	REVERSE+2~, REVERSE+16*
BARBIL	SRCHTRNS+4!
>> BARBLDA	SRCHTRNS+2, SRCHTRNS+5, SRCHTRNS+6, SRCHTRNS+14, REVERSE+5
>> BARBLST	SRCHTRNS+13*
BARCAT	REVERSE+2~, REVERSE+14*
BARCR	REVERSE+2~, REVERSE+10, REVERSE+11
BARDB	REVERSE+2~, REVERSE+10, REVERSE+12
>> BARDTTM	SRCHTRNS+2, SRCHTRNS+6, SRCHTRNS+7, SRCHTRNS+8, SRCHTRNS+9, REVERSE+9
BARPAR	REVERSE+2~, REVERSE+19*
BARPT	REVERSE+2~, REVERSE+17*
BARSECT	REVERSE+3~, REVERSE+21*
BARSITE	REVERSE+3~, REVERSE+22*
>> BARTRDA	REVERSE+7*, REVERSE+31
>> BARTRIEN	SRCHTRNS+12, REVERSE+4*, REVERSE+5
BARTT	REVERSE+2~, REVERSE+13*
BARTYPE	REVERSE+3~, REVERSE+23*
>> BARUNDO	SRCHTRNS+3*, REVERSE+31
BARX	REVERSE+2~, REVERSE+9*, REVERSE+11, REVERSE+12, REVERSE+16, REVERSE+17, REVERSE+18, REVERSE+19, REVERSE+20, REVERSE+21 , REVERSE+22, REVERSE+23
DA	SRCHTRNS+14, REVERSE+6!, REVERSE+7
DIC	SRCHTRNS+15*, REVERSE+6!
DIDEL	SRCHTRNS+17, SRCHTRNS+19!, REVERSE+28, REVERSE+30!
DIE	SRCHTRNS+15, REVERSE+6!, REVERSE+8
DR	SRCHTRNS+16, REVERSE+6!, REVERSE+24, REVERSE+26*
DUZ(2	ENP+2, SRCHTRNS+5, SRCHTRNS+6, SRCHTRNS+7, SRCHTRNS+8, SRCHTRNS+9, REVERSE+9
>> I	REVERSE+25*
>> J	REVERSE+25*, REVERSE+26
U	REVERSE+16, REVERSE+17, REVERSE+18, REVERSE+19, REVERSE+20, REVERSE+21, REVERSE+22, REVERSE+23
>> X	ENP+2, ENP+3, SRCHTRNS+5, REVERSE+7

Name	Field # of Occurrence
$T(TXT+I	REVERSE+25