Routine: ABMAROLL

Package	Total	Call Graph
VA Fileman	4	^DIC FILE^DICN ^DIE ^DIR
Third Party Billing	2	ADDCHK^ABMDE2E ELG^ABMDLCK

Package	Total	Caller Graph
IHS Accounts Receivable	2	BARMAWO1 BARMAWO7
Tucson	1	BZSMAWO2

Entry Points

Name	Comments	DBIA/ICR reference
START(X,ABM,Z,ZZ)	;EP - FROM A/R
SET	; ; set up needed variables for Eligibility Checker
UNBILL	; ; Look for additional sources that have not yet been billed
REST	; ; Quit if billed manually. . . no other sources to find
CBIL	; ; EP for Closing Bill ; OK for both 1.0 and 1.1
ADD	; ; Add bill not currently in 3P BILL ; MAYBE WILL DO LATER
FILE	; PEP - FILE PAYMENT INFORMATION ; OK for both 1.0 and 1.1 ; The payment multiple will contain cumulative data about that bill ; ; 3PB field = A/R field ; ; Payment Amount = Payments + 3P Previous Payments + Payment ; Adjustments - Refunds ; Deductible = Deductible ; Co-Insurance = Co-pay ; Write Offs = Write Offs ; Non-covered = Non payments ; Penalties = Penalties
OCLM	; ; Open claim for editing
LKUP	; PEP - LOOK UP ABMP("BDFN")
CCLM	; ; Complete a claim

External References

Name	Field # of Occurrence
ADDCHK^ABMDE2E	UNBILL+17
ELG^ABMDLCK	UNBILL+5
^DIC	OCLM+14
FILE^DICN	FILE+23
^DIE	FILE+28, FILE+32, FILE+33, FILE+34, FILE+35, FILE+36, FILE+37, FILE+38, FILE+39, FILE+40 , FILE+41, FILE+42, CBIL+8, REST+19, UNBILL+58, UNBILL+64, OCLM+5, CCLM+5
^DIR	UNBILL+49

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"CLAIM #",ABMP("CDFN")," HAS BEEN CANCELLED.",! Line Location: REST+5
Function Call: WRITE	Prompt: !,"Claim is already in edit status.",! Line Location: REST+23
Function Call: WRITE	Prompt: !!,"CHECKING FOR UNBILLED SOURCES.",! Line Location: UNBILL+2
Function Call: WRITE	Prompt: !!,"Claim Number: ",+ABMP("BILL")," is now Open for Editing!",! Line Location: OCLM+15
Routine Call	DIE Line Location: FILE+28 FILE+32 FILE+33 FILE+34 FILE+35 FILE+36 FILE+37 FILE+38 FILE+39 FILE+40 FILE+41 FILE+42 CBIL+8 REST+19 UNBILL+58 UNBILL+64 OCLM+5 CCLM+5
Routine Call	DIC Line Location: OCLM+14
Routine Call	DIR Line Location: UNBILL+49

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	START+21, LKUP+1, LKUP+3, FILE+15, FILE+17!, FILE+18*, CBIL+3, SET+2, SET+3, SET+4 , REST+2, REST+11, REST+12, REST+13
^ABMDCLM - [#9002274.3]	REST+5, REST+16, REST+22, UNBILL+25, UNBILL+26, UNBILL+27!, UNBILL+28, UNBILL+29, OCLM+4
^ABMNINS(	OCLM+7
^AUTNINS - [#9999999.18]	UNBILL+30, UNBILL+31, UNBILL+34, OCLM+7
^DD(9002274.3	OCLM+12
^XUSEC("ABMDZ EDIT CLAIM AND EXPORT"	UNBILL+45

Label References

Name	Line Occurrences
CBIL	FILE+43
CCLM	UNBILL+39, UNBILL+53
FILE	START+30
LKUP	START+27
OCLM	UNBILL+59
REST	START+32
SET	START+31

Naked Globals

Name	Field # of Occurrence
^(0	REST+12, REST+13
^(3	FILE+15*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	START~, START+24, START+25!, START+33!, UNBILL+24, UNBILL+25, UNBILL+26, UNBILL+27, UNBILL+38!, UNBILL+53! , UNBILL+65!
ABM(	UNBILL+35*
ABM("3P"	FILE+31, FILE+39
ABM("AMT"	START+26*, FILE+28
ABM("CNT"	UNBILL+3, UNBILL+32, UNBILL+33, UNBILL+34, UNBILL+35, UNBILL+38
ABM("COP"	FILE+34
ABM("DED"	FILE+33
ABM("GRP"	FILE+40
ABM("HIT"	UNBILL+3, UNBILL+41, UNBILL+62, OCLM+4
ABM("I"	UNBILL+25*
ABM("INS"	UNBILL+16*
ABM("INSCO"	UNBILL+29*, UNBILL+30, UNBILL+31, UNBILL+34
ABM("NP"	FILE+36
ABM("NPAY"	FILE+31*, FILE+32
ABM("PAY"	FILE+31, FILE+38
ABM("PCR"	FILE+31, FILE+42
ABM("PEN"	FILE+37
ABM("PRI"	UNBILL+15*
ABM("RF"	FILE+31, FILE+41
ABM("WO"	FILE+35
ABM("X"	UNBILL+26*, UNBILL+27, UNBILL+28, UNBILL+29, UNBILL+35
ABM(1	UNBILL+41, OCLM+7
ABMA	START+33!
>> ABML	UNBILL+5
>> ABML(	UNBILL+11, UNBILL+14
ABMP	START+33!, UNBILL+38!, UNBILL+53!, UNBILL+65!
ABMP("AR1.0"	START+23*, FILE+14, FILE+26, FILE+29
ABMP("BDFN"	START+20, START+21, START+28, LKUP+1, LKUP+2, LKUP+3, FILE+15, FILE+17, FILE+18, FILE+19 , CBIL+3, CBIL+6, SET+2, SET+3, SET+4, REST+2, REST+11, REST+12, REST+13, UNBILL+56
ABMP("BILL"	START+21, START+27, LKUP+3, REST+2, REST+4, OCLM+15
ABMP("CDFN"	REST+4*, REST+5, REST+15, REST+22, UNBILL+25, UNBILL+26, UNBILL+27, UNBILL+28, UNBILL+29, UNBILL+60 , OCLM+2, OCLM+4, OCLM+9, CCLM+2
ABMP("INS"	SET+3*, OCLM+7
ABMP("PDFN"	SET+2*, UNBILL+5
ABMP("VDT"	SET+4*, UNBILL+5
DA	FILE+24, CBIL+6, REST+7, REST+12, REST+13, REST+14, REST+16, UNBILL+56, UNBILL+62, OCLM+2 , OCLM+8!, CCLM+2*
DA(1	FILE+19, REST+15, REST+16, REST+17, UNBILL+60, UNBILL+61, OCLM+9, OCLM+10
DD	FILE+23!
DIC	FILE+21, FILE+25, OCLM+8!, OCLM+10
DIC("P"	OCLM+12*
DIC(0	FILE+22, OCLM+11
DIE	FILE+25, CBIL+5, REST+17, UNBILL+55, UNBILL+61, OCLM+3, OCLM+8!, CCLM+3*
DIR	UNBILL+50!
DIR("A"	UNBILL+48*
DIR(0	UNBILL+47*
>> DIRUT	UNBILL+51
DO	FILE+23!
DR	FILE+28, FILE+32, FILE+33, FILE+34, FILE+35, FILE+36, FILE+37, FILE+38, FILE+39, FILE+40 , FILE+41, FILE+42, CBIL+7, CBIL+9!, REST+18, REST+20!, UNBILL+57, UNBILL+63, OCLM+4, CCLM+4
DT	FILE+20
DUZ	UNBILL+45
DUZ(2	START+21, LKUP+1, LKUP+3, FILE+15, FILE+17, FILE+18, CBIL+3, SET+2, SET+3, SET+4 , REST+2, REST+5, REST+11, REST+12, REST+13, REST+16, REST+17, REST+22, UNBILL+25, UNBILL+26 , UNBILL+27, UNBILL+28, UNBILL+29, UNBILL+61, OCLM+3, OCLM+4, OCLM+7, OCLM+10, CCLM+3
I	REST+6~, REST+7, REST+11, REST+12, REST+13, UNBILL+6~, UNBILL+7, UNBILL+11, UNBILL+14, UNBILL+15
J	UNBILL+12~, UNBILL+13, UNBILL+14, UNBILL+16
U	CBIL+3, REST+2, UNBILL+28, UNBILL+30, UNBILL+31, UNBILL+34, OCLM+4, OCLM+7, OCLM+12
X	START~, START+20, FILE+20, OCLM+8!, OCLM+13
Y	START+24, START+26, FILE+24, FILE+27, FILE+30, UNBILL+42, UNBILL+53, UNBILL+57, OCLM+8!
Z	START~, START+22, START+27, START+29, LKUP+1
ZZ	START~

Customize PDF page

Package: Third Party Billing

Routine: ABMAROLL

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: