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

Package: Third Party Billing

Routine: ABMER61


Information

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

Source Information

Source file <ABMER61.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Third Party Billing 5 FRATE^ABMDF11  $$EX^ABMER20  ADTT^ABMER60  ^ABMERGRV  ($$FMT,$$RCID,DFMT,S90,SET)^ABMERUTL  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Local Area Programs 1 AZAXSND  
Third Party Billing 1 ABMEF10  

Entry Points

Name Comments DBIA/ICR reference
10 ;Record type
20 ;Sequence
120 ;Form Locator 49 1 (SOURCE: FILE= FIELD=)
30 ;Patient Control Number, (SOURCE: FILE=9000001.41,FIELD=.02)
50 ;HCPCS Procedure Code 1
40 ;Outpatient Revenue Code 1 (SOURCE: FILE=, FIELD=)
EX(ABMX,ABMY,ABMZ) ;EXTRINSIC FUNCTION HERE
60 ;Modifier 1 (CPT-4 and HCPCS) 1 (SOURCE: FILE=, FIELD=)
START ;START HERE
ADD ;ADD TO RECORD
130 ;Filler (National Use)
110 ;Charges Non-Covered 1
70 ;Modifier 2 (CPT-4 and HCPCS) 1 (SOURCE: FILE=, FIELD=)
90 ;Date of Service 1
80 ;Units of Service 1 (SOURCE: FILE= FIELD=)
100 ;Charges Total 1 (SOURCE: FILE= FIELD=)
LOOP ;LOOP HERE

External References

Name Field # of Occurrence
FRATE^ABMDF11 START+6
$$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, 100+2, 110+2, 120+2
, 130+2
$$RCID^ABMERUTL START+9
DFMT^ABMERUTL 90+1
S90^ABMERUTL START+11
SET^ABMERUTL START+5, EX+2

Label References

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM START+12!, EX+7!
ABM("ACTOT" LOOP+11*
ABM("NCTOT" LOOP+12*
ABME START+12!, EX+7!
ABME("RTYPE" START+2*
ABME("S#" START+2*, LOOP+7*, LOOP+14, ADD+1, 20+1
ABME("SPACE1" START+3*, LOOP+14
ABME("SPACE2" START+4*, LOOP+14
>> ABMP("BDFN" 30+1, EX+2*
>> ABMP("FLAT" START+6!
>> ABMP("FMT" EX+3*, EX+6*
>> ABMP("INS" START+9
>> ABMP("NOFMT" LOOP+14, ADD+1, EX+3
>> ABMP("VDT" 90+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*, 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+11, LOOP+14*, ADD+1*
ABMRV START+12!
ABMRV( LOOP+2, LOOP+3, LOOP+5, LOOP+11, LOOP+12, 40+1, 50+1, 60+1, 70+1, 80+1
, 100+1
ABMRV(9999 START+9!
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+11*, LOOP+1*, LOOP+6*, LOOP+14
>> M LOOP+4*, LOOP+5*, LOOP+11, LOOP+12, 40+1, 50+1, 60+1, 70+1, 80+1, 100+1
U LOOP+11, LOOP+12, 40+1, 50+1, 60+1, 70+1, 80+1, 100+1
>> Y 90+1*, EX+5*, EX+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Label References |  Local Variables |  All