Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ABMEE61

Package: Third Party Billing

Routine: ABMEE61


Information

ABMEE61 ; IHS/ASDST/DMJ - UB92 V5 EMC RECORD 61 (Outpatient Services) ;

Source Information

Source file <ABMEE61.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Third Party Billing 6 FRATE^ABMDF11  $$Y2KD2^ABMDUTL  $$EX^ABMER20  ADTT^ABMER60  ^ABMERGRV  ($$FMT,S90,SET)^ABMERUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Third Party Billing 1 ABMEF16  

Entry Points

Name Comments DBIA/ICR reference
10 ;Record type 1-2
20 ;Sequence 3-4
120 ;Date of Service, 71-78 (SOURCE: FILE= FIELD=)
30 ;Patient Control Number 5-24 (SOURCE: FILE=9000001.41,FIELD=.02)
50 ;HCPCS Procedure Code 1, 29-33
40 ;Revenue Code 1, 25-28 (SOURCE: FILE=, FIELD=)
EX(ABMX,ABMY,ABMZ) ;EXTRINSIC FUNCTION HERE
60 ;Modifier 1 (CPT-4 and HCPCS) 1, 34-35 (SOURCE: FILE=, FIELD=)
START ;START HERE
ADD ;ADD TO RECORD
130 ;Filler (National Use), 79-80
110 ;Charges Non-Covered 1, 61-70
70 ;Modifier 2 (CPT-4 and HCPCS) 1, 36-37 (SOURCE: FILE=, FIELD=)
90 ;Form Locator 49, 45-50
80 ;Units of Service 1, 38-44 (SOURCE: FILE= FIELD=)
100 ;Charges Total 1, 51-60 (SOURCE: FILE= FIELD=)
LOOP ;LOOP HERE

External References

Name Field # of Occurrence
FRATE^ABMDF11 START+6
$$Y2KD2^ABMDUTL 120+1
$$EX^ABMER20 30+1
ADTT^ABMER60 LOOP+13
^ABMERGRV START+7
$$FMT^ABMERUTL 20+2, 30+2, 40+2, 50+2, 60+2, 70+2, 80+2, 90+2, 100+2, 110+2
, 120+2, 130+2
S90^ABMERUTL START+9
SET^ABMERUTL START+5, EX+2

Label References

Name Line Occurrences
@( LOOP+8, LOOP+9, EX+4
ADD LOOP+8, LOOP+9
LOOP START+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM START+10!, EX+7!
ABM("ACTOT" LOOP+11*
ABM("NCTOT" LOOP+12*
ABME START+10!, EX+7!
ABME("RTYPE" START+2*
ABME("S#" START+2*, LOOP+7*, LOOP+14, ADD+1, 20+1
ABME("SPACE1" START+4*, LOOP+14
ABME("SPACE2" START+3*, START+4, LOOP+14
>> ABMP("BDFN" 30+1, EX+2*
>> ABMP("FLAT" START+6!
>> ABMP("FMT" EX+3*, EX+6*
>> ABMP("NOFMT" LOOP+14, ADD+1, EX+3
>> ABMP("VDT" 120+1
>> ABMR(61 START+1!, ADD+1, 10+1*, 20+1*, 20+2*, 30+1*, 30+2*, 40+1*, 40+2*, 50+1*
, 50+2*, 60+1*, 60+2*, 70+1*, 70+2*, 80+1*, 80+2*, 90+1*, 90+2*, 100+1*
, 100+2*, 110+1*, 110+2*, 120+1*, 120+2*, 130+1*, 130+2*, EX+5, EX+7!
>> ABMREC(61 START+1!, START+9, LOOP+14*, ADD+1*
ABMRV START+10!
ABMRV( LOOP+2, LOOP+3, LOOP+5, LOOP+11, LOOP+12, 40+1, 50+1, 60+1, 70+1, 80+1
, 100+1
ABMX EX~, EX+4, EX+5, EX+7!
ABMY EX~, EX+2, EX+7!
ABMZ EX~, EX+7!
>> I LOOP+8*, LOOP+9*, ADD+1
>> J LOOP+2*, LOOP+3, LOOP+5, LOOP+10, LOOP+11, LOOP+12, 40+1, 50+1, 60+1, 70+1
, 80+1, 100+1
>> K LOOP+3*, LOOP+5, LOOP+11, LOOP+12, 40+1, 50+1, 60+1, 70+1, 80+1, 100+1
>> L START+9*, LOOP+1*, LOOP+6*, LOOP+14
>> M LOOP+4*, LOOP+5*, 40+1, 50+1, 60+1, 70+1, 80+1, 100+1
U 40+1, 50+1, 60+1, 70+1, 80+1, 100+1
>> Y EX+5*, EX+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Label References |  Local Variables |  All