Routine: ABMEH40

Package	Total	Call Graph
Third Party Billing	3	$$DX^ABMCVAPI $$Y2KD2^ABMDUTL ($$FMT,$$RCID,S90,SET)^ABMERUTL

Package

Total

Call Graph

Third Party Billing

$$DX^ABMCVAPI $$Y2KD2^ABMDUTL ($$FMT,$$RCID,S90,SET)^ABMERUTL

Package	Total	Caller Graph
Third Party Billing	2	ABMEF15 ABMEF19

Package

Total

Caller Graph

Third Party Billing

ABMEF15 ABMEF19

Entry Points

Name	Comments	DBIA/ICR reference
150	;54-54 Same/Similar Symp Ind
210	;95-119 Reserved
450	;252-266 Resub Reference #
EX(ABMX,ABMY)
310	;184-188 Diagnosis Code 2
380	;242-242 Documentation Ind
190	;72-79 Disability To Date
60	;25-25 Symptom Ind
430	;249-249 Supv Prov Ind
130	;45-45 Release if Info Ind
110	;42-43 Accident Hour
80	;34-38 Ext Cause OF Accident
230	;140-151 Refer Prov First
250	;153-154 Refer Prov State
170	;63-63 Disability Type
20	;4-5 Reserved
490	;284-293 Filler (National)
320	;189-193 Diagnosis Code 3
40	;23-23 Empl Related Ind
180	;64-71 Disability From Date
500	;294-320 Filler (Local)
340	;199-199 Prov Assign Ind
400	;244-245 Functnl Status Code
280	;171-171 Lab Ind
480	;283-283 Homebound Ind
360	;201-208 Prov Signature Date
200	;80-94 Refer Prov ID #
140	;46-53 Release of Info Date
300	;179-183 Diagnosis Code 1
440	;250-251 Resubmission Code
460	;267-274 Date Last Seen
330	;194-198 Diagnosis Code 4
120	;44-44 Abuse Ind
START	;start here
260	;155-162 Admission Date
240	;152-152 Refer Prov MI
70	;26-33 Accident/Symptom Date
90	;39-39 Responsibility Ind
100	;40-41 Accident State
160	;55-62 Same/Similar Symp Date
220	;120-139 Refer Prov Last
10	;1-3 Record ID
GET17	;GET DIAGNOSES CODES FROM BILL FILE
420	;248-248 Champus Nonavail Ind
270	;163-170 Discharge Date
30	;6-22 Patient Control Number
50	;24-24 Accident Ind
470	;275-282 Date Document Sent
390	;243-243 Type of Documentation
410	;246-247 Special Program Ind
290	;172-178 Lab Charges
350	;200-200 Prov Signature Ind
370	;209-241 Facility/Lab Name
LOOP	;LOOP HERE

External References

Name	Field # of Occurrence
$$DX^ABMCVAPI	80+3, GET17+8
$$Y2KD2^ABMDUTL	70+2, 70+4, 140+2, 160+2, 260+2, 270+2, 360+3
$$FMT^ABMERUTL	20+2, 30+2, 70+5, 80+5, 90+2, 100+2, 110+2, 120+2, 130+3, 140+3 , 150+4, 160+3, 170+2, 180+2, 190+2, 200+2, 210+2, 220+15, 230+2, 240+2 , 250+2, 260+3, 270+3, 280+4, 290+2, 300+3, 310+2, 320+2, 330+2, 340+2 , 350+2, 360+4, 370+2, 380+2, 390+2, 400+2, 410+2, 420+2, 430+2, 440+6 , 450+2, 460+2, 470+2, 480+2, 490+2, 500+2
$$RCID^ABMERUTL	440+5
S90^ABMERUTL	START+5
SET^ABMERUTL	START+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ABMDBILL(	40+1, 50+1, 60+2, 70+1, 70+3, 80+1, 110+1, 130+1, 160+1, 200+1 , 220+3, 260+1, 270+1, 290+1, 360+1, 450+1, GET17+3, GET17+5, GET17+7
^ABMDEXP - [#9002274.08]	GET17+9
^ABMEXLM("AA"	LOOP+3
^AUPNPAT - [#9000001]	140+1
^DIC(4 - [#4]	370+1

Name	Line Occurrences
160	150+2
290	280+2
450	440+2
@(	LOOP+2, LOOP+3, EX+8
GET17	300+1
LOOP	START+4

Name	Field # of Occurrence
^(	LOOP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ABM	START+1!, START+6!
ABM(17	300+2, 310+1, 320+1, 330+1, GET17+7, GET17+8, GET17+10, GET17+11
ABME	START+1!, START+6!
ABME("RTYPE"	START+2*
>> ABMP("BDFN"	40+1, 50+1, 60+2, 70+1, 70+3, 80+1, 110+1, 130+1, 160+1, 200+1 , 220+3, 260+1, 270+1, 290+1, 360+1, 450+1, GET17+3, GET17+5, GET17+7
>> ABMP("EXP"	LOOP+3, GET17+9
>> ABMP("FMT"	EX+7, EX+10
>> ABMP("INS"	LOOP+3, 440+5
>> ABMP("NOFMT"	LOOP+4, EX+7
>> ABMP("PCN"	30+1
>> ABMP("PDFN"	140+1
>> ABMP("VDT"	80+3, GET17+8
>> ABMR(40	START+1!, LOOP+4, 10+1, 20+1, 20+2, 30+1, 30+2, 40+1, 40+2, 50+1 , 50+2, 50+3, 50+4, 60+1, 60+2, 70+1, 70+2, 70+3, 70+4, 70+5 , 80+1, 80+3, 80+4, 80+5, 90+1, 90+2, 100+1, 100+2, 110+1, 110+2 , 120+1, 120+2, 130+1, 130+2, 130+3, 140+1, 140+2, 140+3, 150+1, 150+3 , 150+4, 160+1, 160+2, 160+3, 170+1, 170+2, 180+1, 180+2, 190+1, 190+2 , 200+1, 200+2, 210+1, 210+2, 220+1, 220+5, 220+14, 220+15, 230+1, 230+2 , 240+1, 240+2, 250+1, 250+2, 260+1, 260+2, 260+3, 270+1, 270+2, 270+3 , 280+1, 280+3, 280+4, 290+1, 290+2, 300+2, 300+3, 310+1, 310+2, 320+1 , 320+2, 330+1, 330+2, 340+1, 340+2, 350+1, 350+2, 360+1, 360+2, 360+3 , 360+4, 370+1, 370+2, 380+1, 380+2, 390+1, 390+2, 400+1, 400+2, 410+1 , 410+2, 420+1, 420+2, 430+1, 430+2, 440+1, 440+3, 440+4, 440+5, 440+6* , 450+1, 450+2, 460+1, 460+2, 470+1, 470+2, 480+1, 480+2, 490+1, 490+2 , 500+1, 500+2, EX+9, EX+11!
>> ABMREC(40	START+1!, LOOP+4*
>> ABMRP	220+3, 220+4, 220+5, 220+6, 220+10, 220+11, 220+12, 220+13, 220+14
ABMRPF	220+2!, 220+6, 220+7, 220+9, 220+10, 220+12*, 230+1
ABMRPM	220+2!, 220+7, 220+8, 220+13*, 240+1
ABMX	EX~, EX+8, EX+9, EX+11!
ABMY	EX~, EX+11!
>> CNT	GET17+2, GET17+6, GET17+7, GET17+8, GET17+10
DUZ(2	40+1, 50+1, 60+2, 70+1, 70+3, 80+1, 110+1, 130+1, 160+1, 200+1 , 220+3, 260+1, 270+1, 290+1, 360+1, 370+1, 450+1, GET17+3, GET17+5, GET17+7
I	LOOP+1, LOOP+2, LOOP+3, LOOP+4, GET17+1~, GET17+2, GET17+3, GET17+5, GET17+11
J	GET17+1~, GET17+4, GET17+5, GET17+7
U	40+1, 80+1, 80+3, 260+1, 290+1, 370+1, GET17+7, GET17+8
>> Y	EX+9*, EX+12

Customize PDF page

Package: Third Party Billing

Routine: ABMEH40

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: