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: ABME561

Package: Third Party Billing

Routine: ABME561


Information

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

Source Information

Source file <ABME561.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,$$RCID,S90,SET)^ABMERUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Third Party Billing 1 ABMEF13  

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+15
^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
$$RCID^ABMERUTL LOOP+1
S90^ABMERUTL START+9
SET^ABMERUTL START+5, EX+2

Label References

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM START+10!, EX+7!
ABM("ACTOT" LOOP+13*
ABM("NCTOT" LOOP+14*
ABME START+10!, EX+7!
ABME("RTYPE" START+2*
ABME("S#" START+2*, LOOP+9*, LOOP+16, ADD+1, 20+1
ABME("SPACE1" START+3*, LOOP+16
ABME("SPACE2" START+4*, LOOP+16
>> ABMP("BDFN" 30+1, EX+2*
>> ABMP("FLAT" START+6!
>> ABMP("FMT" EX+3*, EX+6*
>> ABMP("INS" LOOP+1
>> ABMP("NOFMT" LOOP+16, 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+16*, ADD+1*
ABMRV START+10!
ABMRV( LOOP+4, LOOP+5, LOOP+7, LOOP+13, LOOP+14, 40+1, 50+1, 60+1, 70+1, 80+1
, 100+1
ABMRV(9999 LOOP+2!
ABMX EX~, EX+4, EX+5, EX+7!
ABMY EX~, EX+2, EX+7!
ABMZ EX~, EX+7!
>> I LOOP+10*, LOOP+11*, ADD+1
>> J LOOP+4*, LOOP+5, LOOP+7, LOOP+12, LOOP+13, LOOP+14, 40+1, 50+1, 60+1, 70+1
, 80+1, 100+1
>> K LOOP+5*, LOOP+7, LOOP+13, LOOP+14, 40+1, 50+1, 60+1, 70+1, 80+1, 100+1
>> L START+9*, LOOP+3*, LOOP+8*, LOOP+16
>> M LOOP+6*, LOOP+7*, LOOP+13, LOOP+14, 40+1, 50+1, 60+1, 70+1, 80+1, 100+1
U LOOP+13, LOOP+14, 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