Routine: BAREUTL

Package	Total	Call Graph
IHS Accounts Receivable	2	EOP^BARUTL $$EN^BARVDF
VA Fileman	2	$$GET1^DIQ ^DIR

Package	Total	Caller Graph
IHS Accounts Receivable	2	BAR50P00 BAREDP00

Entry Points

Name	Comments	DBIA/ICR reference
ASK	; ; Ask user to select check to post
GETCHK
DISPLAY	; ; Loop checks to choose from (A/R EDI CHECKS File)
CHKSEL(IMPDA,BARACTN)	; EP ; List checks for file and allow user to choose
LINE	; ; Display each check for ERA file

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"I'm sorry. You must first REVIEW checks before they can be posted." Line Location: CHKSEL+7
Function Call: WRITE	Prompt: !!,"I'm sorry, there are no checks to review." Line Location: CHKSEL+8
Function Call: WRITE	Prompt: !!,"I'm sorry, there are no checks available for reporting" Line Location: CHKSEL+9
Function Call: WRITE	Prompt: ! Line Location: GETCHK+6
Function Call: WRITE	Prompt: $$EN^BARVDF("IOF") Line Location: DISPLAY+4
Function Call: WRITE	Prompt: !,"CHECK ",BARXCHK," --- IS NOT A PART OF THE ERA FILE!" Line Location: LINE+9
Function Call: WRITE	Prompt: !!,$J(BARCNT,2),")" Line Location: LINE+21
Function Call: WRITE	Prompt: " CHECK #: ",$E($P(BARTMP2,U),1,16) Line Location: LINE+22
Function Call: WRITE	Prompt: ?31,"BATCH:",?38,$E($G(BARBTCHN),1,31) Line Location: LINE+23
Function Call: WRITE	Prompt: ?71,"ITEM: ",$J($P(BARTMP2,U,4),3) Line Location: LINE+24
Function Call: WRITE	Prompt: !?7,"A/R ACCOUNT: ",$E($G(BARACCT),1,15) Line Location: LINE+25
Function Call: WRITE	Prompt: ?36,"BATCHED AMT: ",$J($FN($G(BARBDOL),",",2),10) Line Location: LINE+26
Function Call: WRITE	Prompt: ?61,"BALANCE: ",$J($FN($G(BARBBAL),",",2),10) Line Location: LINE+27
Function Call: WRITE	Prompt: ! Line Location: ASK+2
Routine Call	DIR Line Location: ASK+9

Name	Line Occurrences (* Changed, ! Killed)
^BARECHK - [#90056.22]	LINE+3, LINE+4, LINE+7
^BARECHK("C"	DISPLAY+7
^BAREDI("I"	GETCHK+2

Name	Field # of Occurrence
>> BARACCT	LINE+16*, LINE+25
BARACTN	CHKSEL~, CHKSEL+7, CHKSEL+8, CHKSEL+9, DISPLAY+4, LINE+6, ASK+6
BARANS	DISPLAY+2~
BARBATCH	DISPLAY+2~
>> BARBBAL	LINE+18*, LINE+27
>> BARBDOL	LINE+17*, LINE+26
>> BARBTCH	LINE+11*, LINE+14, LINE+15
>> BARBTCHN	LINE+14, LINE+19, LINE+23
BARCHECK	DISPLAY+2~
BARCHK	DISPLAY+2~
>> BARCKIEN	CHKSEL+5, CHKSEL+6, CHKSEL+12, DISPLAY+6, DISPLAY+7, LINE+3, LINE+4, LINE+7, LINE+20, ASK+3 , ASK+10*
BARCNT	CHKSEL+5, DISPLAY+3!, DISPLAY+5, LINE+10, LINE+20, LINE+21, ASK+5, ASK+7, ASK+8
>> BARDTREV	LINE+4*, LINE+6
BARI	GETCHK~, GETCHK+4*, GETCHK+5
>> BARIENS	LINE+15*, LINE+16, LINE+17, LINE+18
BARITEM	DISPLAY+2~
BARRAY	CHKSEL+2~, GETCHK+1!
BARRAY(	GETCHK+5*, LINE+9
BARTMP	DISPLAY+3!
BARTMP(	LINE+20*, ASK+10
BARTMP2	LINE+2!, LINE+7*, LINE+8, LINE+11, LINE+15, LINE+22, LINE+24
>> BARXCHK	LINE+8*, LINE+9
DIR	ASK+4!
DIR("?"	ASK+8*
DIR("A"	ASK+6*
DIR("B"	ASK+7*
DIR(0	ASK+5*
DUZ(2	GETCHK+2
I	GETCHK~, GETCHK+2*, GETCHK+3
IENS	GETCHK~, GETCHK+3*, GETCHK+4
IMPDA	CHKSEL~, GETCHK+2, GETCHK+3, DISPLAY+7
U	LINE+4, LINE+8, LINE+11, LINE+15, LINE+22, LINE+24
>> Y	ASK+10