Routine: BARRPAY

Information

BARRPAY ; IHS/SD/PKD - TOP PAYERS REPORT ; 07/2/2010

Source Information

Source file <BARRPAY.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
IHS Accounts Receivable	7	^BARDBQUE BILL^BARRCHK (,CHK,DX)^BARRHD (,DISP)^BARRSEL (LOOP,TRANS)^BARRUTL ($$FIND3PB,INIT)^BARUTL $$VALI^BARVPM
VA Fileman	1	^DIR

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
IHS Accounts Receivable	1	BAR RPT FRM PAY

Entry Points

External References

Name	Field # of Occurrence
^BARDBQUE	HD+15
BILL^BARRCHK	1+2
^BARRHD	HD+1
CHK^BARRHD	HDCLIN+3, HDAPPR+4, HDRADJ+3, HDRSORT+3
DX^BARRHD	HD+3
^BARRSEL	EN+5
DISP^BARRSEL	MOREQ+22
LOOP^BARRUTL	COMPUTE+5
TRANS^BARRUTL	COMPUTE+6
$$FIND3PB^BARUTL	3
INIT^BARUTL	EN+2
$$VALI^BARVPM	TRCHK+27
^DIR	MOREQ+17, NMBR+5, ASKCXL+6, ADJTYP+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"List of rejected entries from PAY report #1" Line Location: SHOWERR+4
Function Call: WRITE	Prompt: !,BARTMP," = ",$G(@BARTMP) Line Location: SHOWERR+7
Function Call: WRITE	Prompt: !,"List of rejected entries from PAY report #2" Line Location: SHOWERR+10
Function Call: WRITE	Prompt: !,BARTMP," = ",$G(@BARTMP) Line Location: SHOWERR+13
Function Call: WRITE	Prompt: " BILL NOT FND IN 3PB" Line Location: 3+2
Function Call: WRITE	Prompt: " THIS IS A CANECLLATION" Line Location: 2+1
Function Call: WRITE	Prompt: " NO TRANSACTION" Line Location: TRCHK+2
Function Call: WRITE	Prompt: !,"*** PROBLEM: ACCNT# in ^BARTR(",DUZ(2),",",TRIEN," ->(",BARPAYER Line Location: TRCHK+16
Function Call: WRITE	Prompt: ") is different from ACCNT# in ^BARBL(",DUZ(2),",",BAR," ->(",BAR("I"),") WILL USE ",BAR("I") Line Location: TRCHK+17
Function Call: WRITE	Prompt: !!,"SORT PARAMETER in Effect for Top Payer Report: " Line Location: MOREQ+23
Function Call: WRITE	Prompt: BARSORTR Line Location: MOREQ+24
Function Call: WRITE	Prompt: ! Line Location: NMBR+1
Function Call: WRITE	Prompt: ! Line Location: ASKCXL+1
Routine Call	DIR Line Location: MOREQ+17 NMBR+5 ASKCXL+6 ADJTYP+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	3+6, CSHR+5
^AUTNINS - [#9999999.18]	TRCHK+30
^BAR(90052.01 - [#90052.01]	HDRADJ+2
^BARAC(	TRCHK+21, TRCHK+23, TRCHK+24
^BARBL(	2+6
^BARCOL(	BATCHDT+2, BATCHDT+3
^BARTBL - [#90052.02]	ADJTY+4
^BARTR(	BATCHDT+4, BATCHDT+5, DATA+6, DATA+9, TRIEN+2, TRCHK+1, TRCHK+4, TRCHK+7, TRCHK+11, TRCHK+14 , TRCHK+31
^DIC(40.7 - [#40.7]	CLIN+4
^ICD9 - [#80]	DX+6
^ICD9("AB"	DX+5
^TMP($J	HD+14!, COMPUTE+3!, SHOWERR+3, SHOWERR+5, SHOWERR+9, SHOWERR+11, BATCHDT+4, TRCHK+20, TRCHK+22, TRCHK+35 , TRCHK+37, TRCHK+43, TRCHK+45*
^VA(200 - [#200]	PRV+4, CSHR+7

Name	Line Occurrences
@(	TRCHK+42
BATCHDT	COMPUTE+7
DATA	BATCHDT+6
HDAPPR	HD+6
HDCLIN	HD+5
HDRADJ	HD+7
HDRSORT	HD+8
MOREQ	EN+7
SETSORT	TRCHK+36, TRCHK+44
SHOWERR	COMPUTE+5, COMPUTE+6, COMPUTE+7
SORTEXT	MOREQ+24
TRCHK	TRIEN+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADJTYP	HD+9~, TRCHK+11*, TRCHK+12, ADJTY+3
ALL	MOREQ+10~, MOREQ+11*, MOREQ+12
BAR	EN+1!, DATA+9*, DATA+10, 3, 2+6, TRIEN+2, TRCHK+17
BAR("3P LOC"	3*, 3+1, 3+3, 3+4
BAR("ALL"	TRCHK+28*, TRCHK+29
BAR("CONJ"	HDCLIN+1, HDAPPR+2, HDRADJ+1, HDRSORT+1
BAR("DX"	DX+2, DX+3, DX+4, DX+6
BAR("HD"	HD*
BAR("I"	TRCHK+17, TRCHK+18
BAR("LOC"	EN+4*
BAR("NBR TO P	RINT" , NMBR+7*
BAR("SUBR"	COMPUTE+2*
BAR("TXT"	HDCLIN+2, HDAPPR+3, HDRADJ+2, HDRSORT+2
BAR(1	2+4, 2+5, PRV+2, CLIN+2
>> BAR3PDUZ	3+3*, 3+6, CSHR+5
>> BAR3PIEN	3+4*, 3+6, CSHR+5
>> BARAC	TRCHK+22, TRCHK+23*, TRCHK+30
BARALL	MOREQ+2!
BARALL(	ALLOWCAT+2, MOREQ+3, MOREQ+4, MOREQ+5, MOREQ+6, MOREQ+7*
>> BARB3PB0	3+6*, 3+7
>> BARBSTAT	3+7*, 2
>> BARDONE	MOREQ+19*
>> BARDONE2	MOREQ+21*
>> BARMENU	HD
>> BARP("BATCH"	BATCHDT+3*, BATCHDT+4, BATCHDT+5
>> BARP("DT"	BATCHDT+1, BATCHDT+2, BATCHDT+3
>> BARP("HIT"	DATA+4, DATA+5, DATA+11, 1, 4, 2+8
>> BARP("RTN"	EN+3*
>> BARPAYER	TRCHK+14, TRCHK+16, TRCHK+18, TRCHK+19, TRCHK+21, TRCHK+23, TRCHK+24, TRCHK+26, TRCHK+35, TRCHK+37 , TRCHK+43, TRCHK+45
>> BARPYALL	TRCHK+27*, TRCHK+28, ALLOWCAT+2
>> BARPYNM	TRCHK+30*
>> BARQ("NS"	HD+12*
>> BARQ("RC"	HD+10*
>> BARQ("RP"	HD+11*
>> BARQ("RX"	HD+13*
>> BARSORTR	MOREQ+24*, HDRSORT+2
>> BARTAG	TRCHK+40*, TRCHK+41, TRCHK+42, TRCHK+43, TRCHK+45
BARTEST	TRIEN~, TRCHK+7*, TRCHK+8, TRCHK+9
BARTMP	SHOWERR+2~, SHOWERR+5, SHOWERR+6, SHOWERR+7, SHOWERR+11, SHOWERR+12, SHOWERR+13
>> BARTR	BATCHDT+6*, DATA+6, DATA+8
BARTRANC	TRIEN~, TRCHK+4*, TRCHK+5, TRCHK+6, TRCHK+9, TRCHK+32, TRCHK+33, ADJTY+2
>> BARUSR	EN+2
BARY	EN+1!
BARY("ADJTYP"	HD+7, TRCHK+12, ADJTYP+5*, HDRADJ+2
BARY("ALL"	TRCHK+29, MOREQ+9, MOREQ+11, MOREQ+12*
BARY("APPR"	HD+6, HDAPPR+3
BARY("BARSORTX"	2+2, TRCHK+39, MOREQ+20*, MOREQ+24
BARY("CLIN"	HD+5, HDCLIN+2
BARY("CXL"	2, ASKCXL+9*
BARY("DT"	COMPUTE+5, COMPUTE+6, COMPUTE+7, BATCHDT+1, BATCHDT+2, DATA+5, TRIEN+1
BARY("DX"	HD+3
BARY("DX10"	HD+3
BARY("DX9"	HD+3
COUNT	HD+9~, COMPUTE+4, TRCHK+48
>> D0	TRCHK+26*
DIR	MOREQ+13!, MOREQ+18!, NMBR+1!, ASKCXL+2!, ASKCXL+7!
DIR("?"	MOREQ+16*
DIR("A"	MOREQ+15, NMBR+2, ASKCXL+3, ADJTYP+2
DIR("B"	NMBR+3, ASKCXL+4
DIR(0	MOREQ+14, NMBR+4, ASKCXL+5, ADJTYP+1
>> DIROUT	EN+6, EN+8
>> DIRUT	ADJTYP+4
>> DTOUT	EN+6, EN+8, MOREQ+21, NMBR+6, ASKCXL+8, ADJTYP+4
>> DUOUT	EN+6, EN+8, MOREQ+21, NMBR+6, ASKCXL+8, ADJTYP+4
DUZ(2	BATCHDT+2, BATCHDT+3, BATCHDT+4, BATCHDT+5, DATA+6, DATA+9, 3, 2+6, TRIEN+2, TRCHK+1 , TRCHK+4, TRCHK+7, TRCHK+11, TRCHK+14, TRCHK+16, TRCHK+17, TRCHK+21, TRCHK+23, TRCHK+24, TRCHK+31 , CLIN+3
HIT	TRIEN~, TRCHK+13*
PAIDAMT	TRIEN~, TRCHK, TRCHK+32, SETSORT+2
PKD	EN+1!
PMTCRD	TRIEN~, TRCHK, TRCHK+33, SETSORT+3
SORT	HD+9~, 2+2, 2+4, 2+5, 2+6, PRV+2, PRV+3, PRV+4, CLIN+2, CLIN+3 , CLIN+4, CSHR+5, CSHR+6, CSHR+7, DX+2, DX+5, DX+6, ADJTY+3, ADJTY+4, ALLOWCAT+2* , ALLOWCAT+3
SORT(1	2+2, 2+4, 2+5, 2+6, 2+7, TRCHK+38, TRCHK+41, TRCHK+43, TRCHK+45, PRV+3* , PRV+4, CLIN+4, CSHR+6, CSHR+7, DX+3, DX+4, DX+6, ADJTY+2, ADJTY+3, ADJTY+4 , ALLOWCAT+3, NOSORT+1
SORTNM	HD+9~, TRCHK+41*
SUBNM	HD+9~, PRV+1, CLIN+1, CSHR+1, DX+1, ADJTY+1, ALLOWCAT+1, NOSORT+1*
T	HD+9~, DATA+6~, DATA+7, TRCHK+31, TRCHK+32, TRCHK+33
TMP	HD+9~, TRCHK+35, TRCHK+37, TRCHK+43, TRCHK+45, SETSORT+1, SETSORT+2, SETSORT+3*
TRIEN	HD+9~, BATCHDT+5, BATCHDT+6, DATA+8, DATA+9, TRIEN+1, TRIEN+2, TRCHK+1, TRCHK+4, TRCHK+7 , TRCHK+11, TRCHK+14, TRCHK+16, TRCHK+20, TRCHK+22, TRCHK+31
TT	TRIEN~
U	DATA+6, DATA+9, 3+7, 2+4, 2+5, 2+6, TRCHK+4, TRCHK+7, TRCHK+11, TRCHK+14 , TRCHK+23, TRCHK+30, TRCHK+32, SETSORT+1, SETSORT+2, SETSORT+3, PRV+2, PRV+4, CLIN+2, CLIN+4 , CSHR+5, CSHR+7, DX+6, ADJTY+4, HDRADJ+2
VISITLOC	HD+9~, 3+3*, TRCHK+35, TRCHK+37, TRCHK+43, TRCHK+45
>> X	TRCHK+39, TRCHK+40, MOREQ+3, MOREQ+4, MOREQ+5, MOREQ+6, MOREQ+7, MOREQ+19
>> Y	MOREQ+17, MOREQ+20, NMBR+6, NMBR+7, ASKCXL+9, ADJTYP+4, ADJTYP+5

Customize PDF page

Package: IHS Accounts Receivable

Routine: BARRPAY

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Comments	DBIA/ICR reference
CSHR
BATCHDT
ALLOWCAT
HDAPPR	; ; Approving Official (ie cashier)
HDRADJ
DX
CLIN
SORTEXT	;;:No Sort Selected:PROVIDER:CLINIC:APPROVING OFFICIAL:PRIMARY DIAGNOSIS:ADJUSTMENT TYPE:ALLOWANCE CATEGORY
DATA	; EP ; "T" - transaction Date returns BARTR = BARTR IEN ; Called by BARRUTL if no parameters ; BAR - ^BARBL IEN
HD
ASKCXL
ADJTY
TRIEN
1
3
PRV
4
HDCLIN
EN	; EP
COMPUTE	;
SHOWERR
ADJTYP
2
SETSORT
MOREQ
HDRSORT
NMBR
TRCHK
NOSORT