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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ABMEH31

Package: Third Party Billing

Routine: ABMEH31


Information

ABMEH31 ; IHS/ASDST/DMJ - HCFA-1500 EMC RECORD DA1 (Insurance Information) ;

Source Information

Source file <ABMEH31.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Third Party Billing 2 ISET^ABMERINS  ($$FMT,PAYED,S90,SET)^ABMERUTL  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Third Party Billing 1 ABMEH30  

Entry Points

Name Comments DBIA/ICR reference
150 ;156-156 Zero Pay Indicator
210 ;166-166 Champus Spnsr Status
190 ;163-163 Champus Spnsr Branch
60 ;83-102 Payor City
130 ;142-148 Coinsurance Amount
110 ;128-134 Allowed Amount
80 ;103-113 Payor Zip
230 ;175-182 Ins Card Term Date
250 ;190-252 Filler (National)
170 ;159-160 Adjudication Ind 2
20 ;4-5 Sequence #
40 ;23-52 Payor Address Line 1
180 ;161-162 Adjudication Ind 3
200 ;164-165 Champus Spnsr Grade
140 ;149-155 Payor Amount Payed
120 ;135-141 Deductible Amount
START ;START HERE
260 ;301-320 Filler (Local)
240 ;183-189 Balance Due
70 ;103-104 Payor State
90 ;114-120 Dissallowed Cost Cont
100 ;121-127 Disallowed Other
160 ;157-158 Adjucation Ind 1
220 ;167-174 Ins Card Effect Date
10 ;1-3 Record ID
ADDR ;Payor Address Info
30 ;6-22 Patient Control Number
50 ;53-82 Payor Address Line 2
EX(ABMX,ABMY,ABMZ) ;EXTRINSIC FUNCTION HERE
LOOP ;LOOP HERE

External References

Name Field # of Occurrence
ISET^ABMERINS EX+12
$$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, 140+2, 150+2, 160+2, 170+2, 180+2, 190+2, 200+2, 210+2
, 220+2, 230+2, 240+2, 250+2, 260+2
PAYED^ABMERUTL START+4
S90^ABMERUTL START+7
SET^ABMERUTL START+3, EX+9

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( EX+11
^ABMEXLM("AA" LOOP+3
^AUTNINS - [#9999999.18] ADDR+2
^DIC(5 - [#5] ADDR+3

Label References

Name Line Occurrences
@( LOOP+2, LOOP+3, EX+14
ADDR START+5
LOOP START+6

Naked Globals

Name Field # of Occurrence
^( LOOP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM EX+17!
ABMADR START+8!, ADDR+1!
ABMADR( ADDR+2*
ABMADR(2 40+1
ABMADR(3 60+1
ABMADR(4 70+1, ADDR+3*
ABMADR(5 80+1
ABME EX+17!
ABME("INS" 140+1, ADDR+2, EX+10*, EX+11
ABME("RTYPE" START+2*
ABME("S#" START+1, LOOP+4, 20+1
>> ABMP("BDFN" EX+8*, EX+11
>> ABMP("EXP" LOOP+3
>> ABMP("FMT" EX+13*, EX+16*
>> ABMP("INS" LOOP+3
>> ABMP("NOFMT" LOOP+4, EX+13
>> ABMP("PAYED" START+8!, 140+1
>> ABMP("PCN" 30+1
>> ABMR(31 START+1!, LOOP+4, 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*, 140+1*, 140+2*, 150+1*
, 150+2*, 160+1*, 160+2*, 170+1*, 170+2*, 180+1*, 180+2*, 190+1*, 190+2*, 200+1*
, 200+2*, 210+1*, 210+2*, 220+1*, 220+2*, 230+1*, 230+2*, 240+1*, 240+2*, 250+1*
, 250+2*, 260+1*, 260+2*, EX+15, EX+17!
>> ABMREC(31 START+1!, LOOP+4*
ABMX EX~, EX+14, EX+15, EX+17!
ABMY EX~, EX+8, EX+17!
ABMZ EX~, EX+10, EX+17!
DUZ(2 EX+11
I LOOP+1*, LOOP+2, LOOP+3, LOOP+4, ADDR+2~*
>> Y EX+11*, EX+15*, EX+18
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All