Routine: ABMDFRA

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIE ^DIR
Third Party Billing	2	($$FLAT,$$MDT)^ABMDUTL $$FINDOPEN^ABMUCUTL
IHS Accounts Receivable	1	$$EN^BARFRAPI

Entry Points

Name	Comments	DBIA/ICR reference
START	;START
PRO	;PROCEED
FIND(DA)	;find bill in A/R
ONE	;EP - one bill

External References

Name	Field # of Occurrence
$$FLAT^ABMDUTL	START+22
$$MDT^ABMDUTL	START+19
$$FINDOPEN^ABMUCUTL	START+7
$$EN^BARFRAPI	ONE+26
^DIC	START+15, START+16
^DIE	ONE+24
^DIR	START+4, START+10, START+17, START+18, START+30, PRO+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This option will adjust the amount billed field for all claims" Line Location: START+11
Function Call: WRITE	Prompt: !,"for the insurer and visit type you select beginning with the date" Line Location: START+12
Function Call: WRITE	Prompt: !,"you select to reflect a new flat rate.",! Line Location: START+13
Function Call: WRITE	Prompt: !,"An adjustment will then be passed to the A/R system.",! Line Location: START+14
Function Call: WRITE	Prompt: !!,"I am going to adjust the amount billed field for all bills with visit date ",!,$$MDT^ABMDUTL(ABMDATE) Line Location: START+19
Function Call: WRITE	Prompt: "or later for insurer ",$P(^AUTNINS(ABMINS,0),U),", visit type ",ABMVTYP,", billed at" Line Location: START+20
Function Call: WRITE	Prompt: !,"the old rate of ",ABMORAT,"." Line Location: START+21
Function Call: WRITE	Prompt: !!,"NOTE: The flat rate for this insurer, visit type, and date is $",ABMFLAT,".",! Line Location: START+23
Function Call: WRITE	Prompt: !!,"Finished - ",ABMCOUNT," bills changed.",!! Line Location: START+29
Function Call: WRITE	Prompt: "." Line Location: ONE+15
Function Call: WRITE	Prompt: ! Line Location: PRO+1
Routine Call	DIE Line Location: ONE+24
Routine Call	DIC Line Location: START+15 START+16
Routine Call	DIR Line Location: START+4 START+10 START+17 START+18 START+30 PRO+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	START+26, START+27, ONE+2, ONE+5, ONE+7, ONE+12, ONE+13, ONE+14, ONE+19, FIND+2
^ABMDPARM(	START+2, START+6
^AUTNINS - [#9999999.18]	START+20
^BARBL(	FIND+5, FIND+7, FIND+9, FIND+10

Label References

Name	Line Occurrences
$$FIND	ONE+21
ONE	START+28
PRO	START+24

Naked Globals

Name	Field # of Occurrence
^(0	FIND+2
^(2	ONE+13*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABMAO	START+31!
>> ABMARLOC	FIND+1, FIND+6, FIND+10, FIND+11
ABMCOUNT	START+25, START+29, START+31!, ONE+16
ABMDATE	START+17*, START+19, START+22, START+26, START+31!
>> ABMDAYS	ONE+5, ONE+6, ONE+8, ONE+10
ABMFLAT	START+22*, START+23, START+31!, ONE+10
>> ABMFR	ONE+26
>> ABMFR("ADJ AM	T" , ONE+17*
>> ABMFR("ARLOC"	ONE+19, ONE+20, ONE+21, ONE+22, ONE+23
>> ABMFR("TRAN T	YPE" , ONE+25*
>> ABMFR("USER"	ONE+18*
ABMI	START+26*, START+27, START+31!
>> ABMIEN	FIND+9*, FIND+10
ABMINS	START+15*, START+20, START+22, START+31!, ONE+4
ABMJ	START+27*, START+31!, ONE+1
>> ABMLOC	FIND+2*
>> ABMNAME	FIND+2*, FIND+7, FIND+8
>> ABMNEW	ONE+10*, ONE+11, ONE+12, ONE+13, ONE+17
>> ABMNXT	FIND+7*, FIND+8, FIND+9
ABMOLD	START+31!, ONE+7*, ONE+9, ONE+11, ONE+13, ONE+14, ONE+17
>> ABMORAT	START+18*, START+21, ONE+8
>> ABMOTOT	ONE+8*, ONE+9
>> ABMTEST	ONE+26*
>> ABMUOPNS	START+6, START+7*, START+8
ABMVTYP	START+16*, START+20, START+22, START+31!, ONE+3
ABMZERO	START+31!, ONE+2*, ONE+3, ONE+4
DA	ONE+1*, ONE+2, ONE+5, ONE+7, ONE+12, ONE+13, ONE+14, ONE+19, ONE+21, FIND~ , FIND+2, FIND+10
>> DIC	START+15, START+16
>> DIC(0	START+15, START+16
>> DIE	ONE+23*
DIR	START+4!, START+10!, START+17!, START+18!, START+30!, PRO+2!
DIR("A"	START+4, START+10, START+18, PRO+2
DIR("B"	PRO+2*
DIR(0	START+4, START+10, START+17, START+18, START+30, PRO+2
>> DR	ONE+23*
DUZ	START+7, ONE+14, ONE+18
DUZ(2	START+2, START+6, START+26, START+27, ONE+2, ONE+5, ONE+7, ONE+12, ONE+13, ONE+14 , ONE+19, FIND+2
I	FIND+3~, FIND+4, FIND+5, FIND+7, FIND+9, FIND+10
U	START+2, START+6, START+20, ONE+7, ONE+12, FIND+2
>> Y	START+15, START+16, START+17, START+18, START+24

Customize PDF page

Package: Third Party Billing

Routine: ABMDFRA

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: