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

Package: Third Party Billing

Routine: ABMER50


Information

ABMER50 ; IHS/ASDST/DMJ - UB92 EMC RECORD 50 (INPATIENT ACCOMMODATIONS) ;

Source Information

Source file <ABMER50.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Third Party Billing 3 FRATE^ABMDF11  $$EX^ABMER20  ($$FMT,$$RCID,S90,SET)^ABMERUTL  

Caller Graph

Caller Graph Total: 4

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

Entry Points

Name Comments DBIA/ICR reference
EX(ABMX,ABMY) ;EXTRINSIC FUNCTION HERE
60 ;Accommodation Days 1 (SOURCE: FILE=9002274.4025, FIELD=.02)
130 ;Accommodations Revenue Code 4 (SOURCE: FILE=9002274.4025)
110 ;Accommodations Revenue Code 2 (SOURCE: FILE=9002274.4025)
80 ;Accommodations Non-Covered Charges 1 (SOURCE: FILE= FIELD=)
20 ;Sequence
GET25 ;GET INFO FOR ROOM AND BOARD CHARGES
40 ;Accommodations Revenue Code 1 (SOURCE: FILE=9002274.4025 FIELD=.01)
120 ;Accommodations Revenue Code 3 (SOURCE: FILE=9002274.25)
START ;START HERE
70 ;Accommodation Total Charges 1 (SOURCE: FILE=9002274.4025, FIELD=.03)
90 ;Form Locator 49 1 (SOURCE: FILE= FIELD=)
100 ;Filler (National Use)
10 ;Record type
30 ;Patient Control Number, (SOURCE: FILE=9000001.41,FIELD=.02)
50 ;Accommodations Rate 1 (SOURCE: FILE=9002274.0131, FIELD=.02)
1106 ;Form Locator 49
1107 ;Filler
1104 ;Total Charges
1105 ;Non-Covered Charges
1102 ;Rate
1103 ;Days
1101 ;Revenue Code
LOOP ;LOOP HERE

External References

Name Field # of Occurrence
FRATE^ABMDF11 GET25+2
$$EX^ABMER20 30+1
$$FMT^ABMERUTL 20+2, 30+2, 40+2, 50+2, 60+2, 70+2, 80+2, 90+2, 100+2, 1101+2
, 1102+2, 1103+2, 1104+2, 1105+3, 1106+2, 1107+2
$$RCID^ABMERUTL GET25+23
S90^ABMERUTL START+5
SET^ABMERUTL START+3, EX+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( GET25+5, GET25+7, GET25+18
^ABMEXLM("AA" LOOP+3

Label References

Name Line Occurrences
@( LOOP+2, LOOP+3, 110+3, 120+3, 130+3, EX+4
GET25 40+1, 50+1, 60+1, 70+1, 80+1, 110+1, 120+1, 130+1
LOOP START+4

Naked Globals

Name Field # of Occurrence
^( LOOP+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM START+6!, EX+7!
ABM("NCDAYS" GET25+18*, GET25+19
ABM("RC#" 110+2*, 120+2*, 130+2*, 1101+1, 1102+1, 1103+1, 1104+1, 1105+2
ABM("T2" GET25+3*, GET25+9*, GET25+14*, GET25+24
ABM("T4" GET25+3*, GET25+9*, GET25+14*, GET25+15, GET25+16, GET25+17, GET25+24
ABM(25 40+1, 50+1, 60+1, 70+1, 1101+1, 1102+1, 1103+1, 1104+1, 1105+2, GET25+1
, GET25+7*, GET25+8*, GET25+9, GET25+13*, GET25+14, GET25+19, GET25+24*, GET25+25*
ABME EX+7!
ABME("RTYPE" START+2*
ABME("S#" START+4*, LOOP+4, 20+1
>> ABMP("BDFN" 30+1, GET25+5, GET25+7, GET25+18, EX+2*
>> ABMP("EXP" LOOP+3
>> ABMP("FLAT" GET25+2!, GET25+4, GET25+10, GET25+11, GET25+13
>> ABMP("FMT" EX+3*, EX+6*
>> ABMP("INS" LOOP+3, GET25+23
>> ABMP("NOFMT" LOOP+4, EX+3
>> ABMR(50 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+2*, 90+1*, 90+2*, 100+1*, 100+2*
, 110+3*, 120+3*, 130+3*, 1101+1*, 1101+2*, 1102+1*, 1102+2*, 1103+1*, 1103+2*, 1104+1*
, 1104+2*, 1105+1*, 1105+2*, 1105+3*, 1106+1*, 1106+2*, 1107+1*, 1107+2*, GET25+18*, GET25+19*
, GET25+20, GET25+21, GET25+22, EX+5, EX+7!
>> ABMREC(50 START+1!, LOOP+4*
>> ABMRT(90 GET25+15*, GET25+20*
>> ABMRT(95 GET25+16*, GET25+21*
>> ABMRT(99 GET25+17*, GET25+22*
ABMX EX~, EX+4, EX+5, EX+7!
ABMY EX~, EX+2, EX+7!
ABMZ EX+7!
>> CNT GET25+5*, GET25+6*, GET25+7, GET25+8, GET25+9, GET25+12*, GET25+24*
DUZ(2 GET25+5, GET25+7, GET25+18
I LOOP+1*, LOOP+2, LOOP+3, LOOP+4, 110+3~*, 120+3~*, 130+3~*, 1101+1, 1101+2, 1102+1
, 1102+2, 1103+1, 1103+2, 1104+1, 1104+2, 1105+1, 1105+2, 1105+3, 1106+1, 1106+2
, 1107+1, 1107+2, GET25+2~, GET25+5~*, GET25+7, GET25+25*
U 40+1, 1101+1, 1105+2, GET25+13
>> Y EX+5*, EX+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All