Routine: ABMDBLK

Package	Total	Call Graph
Third Party Billing	2	$$F54^ABMDFUTL ($$HDT,$$SDT,PAT)^ABMDUTL
VA Fileman	2	^DIC ^DIR
Kernel	1	$$NPI^XUSNPI

Package	Total	Caller Graph
Third Party Billing	3	ABMDF14D ABMDF3D ABMDIPS

Entry Points

Name	Comments	DBIA/ICR reference
SELO
PAT	;PATIENT LOOKUP
BENT	;EP - for doing Bill File lookup with DIC variables
54	;EP - get prov number
BILL	;SELECT BILL
NUM	;NUMBER LOOKUP
XIT
DICW	;EP - for displaying bill identifiers
SEL	;SELECT
ID	;BILL IDENTIFIERS
MULT	;EP for Selecting Multiple Bills

External References

Name	Field # of Occurrence
$$F54^ABMDFUTL	54+1
$$HDT^ABMDUTL	DICW+4, DICW+8
$$SDT^ABMDUTL	ID+9
PAT^ABMDUTL	PAT+6, ID+1
^DIC	BILL+10, BILL+15, PAT+2, BENT+4, SELO
^DIR	BILL+5, BILL+18, SEL+2
$$NPI^XUSNPI	54+30

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: BILL+4
Function Call: WRITE	Prompt: !!,"(",ABM("CNT"),")" Line Location: ID+4
Function Call: WRITE	Prompt: ?5,"Bill# ",ABM(1) Line Location: ID+8
Function Call: WRITE	Prompt: ?20,$$SDT^ABMDUTL(ABM(7,1)) Line Location: ID+9
Function Call: WRITE	Prompt: ?30,$P($G(^ABMDVTYP(+ABM(7),0)),"^",1) Line Location: ID+10
Function Call: WRITE	Prompt: ?51,$P($G(^DIC(40.7,+ABM(10),0)),"^",1) Line Location: ID+11
Function Call: WRITE	Prompt: ?67,$P($G(^AUTTLOC(+ABM(3),0)),"^",2) Line Location: ID+12
Function Call: WRITE	Prompt: !,?6,$P($G(^ABMDEXP(+ABM(6),0)),"^",1) Line Location: ID+13
Function Call: WRITE	Prompt: ?18,$E(ABM(4),1,15) Line Location: ID+14
Function Call: WRITE	Prompt: ?37,$P($G(^AUTNINS(+ABM(8),0)),"^",1) Line Location: ID+15
Function Call: WRITE	Prompt: ?70,$J($FN(ABM(2,1),",",2),10) Line Location: ID+16
Function Call: WRITE	Prompt: ! Line Location: SEL+1
Function Call: WRITE	Prompt: !!,"Enter either the Bill Number or a Patient Identifier (Name, HRN, SSN, DOB)" Line Location: BENT+6
Function Call: WRITE	Prompt: ?68,$P($G(^AUTTLOC(DUZ(2),0)),U,7)," ",$P(^AUPNPAT($P(ABM(0),U,5),41,DUZ(2),0),U,2) Line Location: DICW+6
Function Call: WRITE	Prompt: ! Line Location: DICW+7
Function Call: WRITE	Prompt: ?17,"Visit: ",$$HDT^ABMDUTL(ABM(7))," " Line Location: DICW+8
Function Call: WRITE	Prompt: $E($P($G(^ABMDVTYP($P(ABM(0),U,7),0)),U),1,14) Line Location: DICW+9
Function Call: WRITE	Prompt: ?49,$E($P($G(^DIC(40.7,$P(ABM(0),U,10),0)),U),1,17),?68,$E($P($G(^AUTTLOC($P(ABM(0),U,3),0)),U,2),1,12) Line Location: DICW+10
Function Call: WRITE	Prompt: !?20,"Bill: ",$P(^AUTNINS($P(ABM(0),U,8),0),U) Line Location: DICW+11
Function Call: WRITE	Prompt: ?57,$P($G(^ABMDEXP($P(ABM(0),U,6),0)),U) Line Location: DICW+12
Function Call: WRITE	Prompt: ?68,$J($FN(ABM(2),",",2),10) Line Location: DICW+13
Function Call: WRITE	Prompt: ! Line Location: DICW+15
Function Call: WRITE	Prompt: ! Line Location: MULT+1
Function Call: WRITE	Prompt: ! Line Location: MULT+2
Routine Call	DIC Line Location: BILL+10 BILL+15 PAT+2 BENT+4 SELO
Routine Call	DIR Line Location: BILL+5 BILL+18 SEL+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AUPNPAT - [#9000001]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	BILL+8, BILL+13, NUM+3, NUM+4, NUM+5, PAT+8, PAT+9, PAT+10, ID+5, ID+6
^ABMDEXP - [#9002274.08]	ID+13, DICW+12
^ABMDVTYP - [#9002274.8]	ID+10, DICW+9
^ABMNINS(	54+6, 54+12, 54+13
^AUPNPAT - [#9000001]	DICW+6
^AUTNINS - [#9999999.18]	ID+15, DICW+11, 54+7
^AUTTLOC - [#9999999.06]	ID+12, DICW+6, DICW+10
^DD(9002274.4	BILL+21
^DIC(40.7 - [#40.7]	ID+11, DICW+10
^DPT - [#2]	PAT+4, DICW+1
^VA(200 - [#200]	54+4, 54+16

Label References

Name	Line Occurrences
BENT	BENT+7
BILL	PAT+3, PAT+14
ID	NUM+6, PAT+11
SEL	NUM+7, PAT+12, PAT+13
SELO	SELO+2
XIT	BENT+5, BENT+8, SELO+5

Naked Globals

Name	Field # of Occurrence
^(0	DICW+1
^(2	ID+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%P	BILL+1!
ABM	BILL+1!, BILL+12!, BILL+20!, NUM+8!, PAT+15!, XIT!, MULT+2*, SELO
ABM(	ID+5*
ABM("="	PAT+5*
ABM("A"	54+2
ABM("C"	MULT+1*
ABM("CNT"	NUM+3, NUM+7, PAT+7, PAT+12, ID+1, ID+2, ID+3, ID+4, SEL+2, SEL+3
ABM("E"	SELO*
ABM("INPUT"	BILL+7*, NUM+1, PAT+1
ABM("P0"	PAT+4*
ABM("STATUS"	BILL+21*, ID+7
ABM("ZERO"	ID+5*
ABM(0	DICW+1, DICW+6, DICW+7, DICW+9, DICW+10, DICW+11, DICW+12, DICW+16!
ABM(1	ID+8
ABM(10	ID+11
ABM(2	ID+6*, ID+16, DICW+13
ABM(3	ID+12
ABM(4	ID+7*, ID+14
ABM(6	ID+13
ABM(7	ID+6*, ID+9, ID+10, DICW+8, DICW+16!
ABM(8	ID+15
>> ABMDPT	DICW+1*, DICW+2, DICW+3, DICW+4, DICW+5
>> ABMF(54	54+12, 54+13, 54+21, 54+22, 54+24, 54+29, 54+30
>> ABMINS	PAT+10
>> ABMM(	SELO+3*
>> ABMP("BDFN"	BILL+1!, BILL+11, BILL+12, BILL+17, BILL+19!, BILL+20, NUM+3, NUM+8, PAT+8, PAT+13 , PAT+14, SEL+3, BENT+1!, BENT+7
>> ABMP("EXP"	54+12, 54+13, 54+21, 54+22, 54+29, 54+30
>> ABMP("INS"	54+4, 54+6, 54+7, 54+12, 54+13
>> ABMP("ITYPE"	54+5, 54+15
>> ABMP("PDFN"	NUM+5, PAT+4, PAT+6, PAT+8, ID+1
>> ABMP("VTYP"	54+7
>> ABMPNUM	54+4, 54+5, 54+6, 54+15, 54+16*, 54+29
>> ABMPROV	54+2*, 54+3, 54+4, 54+6, 54+12, 54+16, 54+30
>> AUPNLK("ALL"	PAT+1, BENT+2
DIC	BILL+1!, BILL+10, BILL+15, PAT+1, BENT+4!, MULT+1!, SELO+4!
DIC("A"	SELO*
DIC("W"	BENT+3*
DIC(0	BILL+10, BILL+15, PAT+1, MULT+1, SELO*
DIR	BILL+5!, BILL+18!, SEL+2!
DIR("?"	BILL+3*
DIR("A"	BILL+2, BILL+18, SEL+2*
DIR("B"	BILL+18*
DIR(0	BILL+5, BILL+18, SEL+2*
DIRUT	BILL+6, PAT+8, SEL+4!
>> DIW	DICW+14*
>> DTOUT	SEL+4, BENT+5, MULT+2, SELO+1
>> DUOUT	BENT+5, MULT+2, SELO+1
DUZ(2	BILL+8, BILL+13, NUM+3, NUM+4, NUM+5, PAT+8, PAT+9, PAT+10, ID+5, ID+6 , DICW+6, 54+6, 54+12, 54+13
>> DZ	DICW+1, DICW+7, DICW+15
>> I	NUM+4, NUM+5, PAT+7, PAT+8*, PAT+9, PAT+10, ID+3, ID+5, ID+6
IOSL	SEL+1
J	NUM+3, NUM+4, ID+5~
U	DICW+1, DICW+2, DICW+3, DICW+5, DICW+6, DICW+7, DICW+9, DICW+10, DICW+11, DICW+12 , 54+6, 54+7, 54+12, 54+13, 54+21, 54+22, 54+24, 54+29, 54+30
>> X	BILL+9, BILL+14, PAT+1*, BENT+5, BENT+6, DICW+7, MULT+2, SELO+1
>> Y	BILL+7, BILL+8, BILL+9, BILL+11, BILL+13, BILL+14, BILL+16, BILL+17, BILL+19, NUM+1* , NUM+2, NUM+3, PAT+3, PAT+4, SEL+3, SEL+4, BENT+7, SELO+2, SELO+3

Customize PDF page

Package: Third Party Billing

Routine: ABMDBLK

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: