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 |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ABMERUTL

Package: Third Party Billing

Routine: ABMERUTL


Information

ABMERUTL ; IHS/ASDST/DMJ - EMC UTILITIES ;

Source Information

Source file <ABMERUTL.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 5 NOW^%DTC  ^DIC  ^DIE  $$GET1^DIQ  ^DIR  
Third Party Billing 3 DBFX^ABMDEFIP  4^ABMDLCK2  $$RCID^ABMUTLP  

Caller Graph

Caller Graph Total: 158

Package Total Caller Graph
Third Party Billing 154 ABM47IT  ABMAPAS1  ABMAPASS  ABMCUFE  ABMDE4A  ABMDE4X  ABMDEBIL  ABMDEOPT  
ABMDESL1  ABMDESMR  ABMDF11  ABMDF11W  ABMDF12A  ABMDF14A  ABMDF18A  ABMDF25A  
ABMDF26A  ABMDF27A  ABMDF28  ABMDF28Q  ABMDF28R  ABMDF28T  ABMDF28X  ABMDF28Y  
ABMDF28Z  ABMDF29B  ABMDF34B  ABMDF35A  ABMDF3A  ABMDF51  ABMDF51Z  ABMDFUTL  
ABME3AA0  ABME3BA0  ABME3DA0  ABME3DA1  ABME3EA0  ABME3EA1  ABME3FA0  ABME3GC0  
ABME3HA0  ABME3XA0  ABME501  ABME520  ABME520A  ABME540  ABME540A  ABME561  
ABME570  ABME570A  ABME5AMT  ABME5BHT  ABME5CL1  ABME5CLM  ABME5DTP  ABME5GE  
ABME5GS  ABME5IEA  ABME5ISA  ABME5L8  ABME5SE  ABME5ST  ABME5SV1  ABME5SV2  
ABME601  ABME630  ABME630A  ABME650  ABME660  ABME661  ABME690  ABME8AMT  
ABME8BHT  ABME8CL1  ABME8CLM  ABME8DTP  ABME8GE  ABME8GS  ABME8IEA  ABME8ISA  
ABME8L14  ABME8L8  ABME8L9  ABME8SE  ABME8ST  ABME8SV1  ABME8SV2  ABMEAA0  
ABMEBA0  ABMEBDSP  ABMECS  ABMECS2  ABMEE01  ABMEE61  ABMEEPRV  ABMEF10  
ABMEF13  ABMEF15  ABMEF16  ABMEFA0  ABMEFB0  ABMEH01  ABMEH10  ABMEH15  
ABMEH20  ABMEH30  ABMEH31  ABMEH32  ABMEH40  ABMEH61  ABMEH62  ABMEH63  
ABMEH90  ABMEH95  ABMEH99  ABMEHGRV  ABMEMCRC  ABMER01  ABMER10  ABMER20  
ABMER20A  ABMER30  ABMER30A  ABMER31  ABMER40  ABMER40A  ABMER41  ABMER41A  
ABMER46  ABMER50  ABMER60  ABMER61  ABMER70  ABMER70A  ABMER80  ABMER90  
ABMER91  ABMER95  ABMER99  ABMERGR2  ABMERGRV  ABMERSND  ABMFECNV  ABMPPAD2  
ABMPTSMT  ABMPUEXT  ABMUCAPI  ABMUCUTL  ABMURCN2  ABMURCON  ABMUTL8  ABMUTLN  
ABMUTLP  ABMUTLP2  
IHS Code Set Versioning 2 BCSVDQR  BCSVDQR1  
IHS Accounts Receivable 1 BAR276  
Local Area Programs 1 AZAXSND  

Entry Points

Name Comments DBIA/ICR reference
SOP1(X) ;EP source of pay (x=ien insurer file)
STRIP(X) ;EP strip trailing blanks
TCN(X) ;EP Transmission Control Number
PAYED ; EP
LWC(X) ; EP lower case
PCN ;EP Patient Control Number
POS(X) ;EP place of service
BCBS1(X) ;EP check if blue cross/blue shield
SET ; EP Set up some things
GCNMULT(ABMSTAT,ABMREASN) ;
STRPL(X) ;EP strip leading blanks
BCBS ; EP check if Blue Cross/Blue Shield
SOP ;EP Source of Pay
S90 ;EP add 1 to record type counts
UPC(X) ; EP Upper case
TOS(X) ;EP type of service (where x=multiple from 3P Bill File)
ISET ; EP
NSN(X) ; EP next submission number
TCR(X) ; EP Total credits for bill
RCID(X) ;EP Receiver ID (X=Insurer IEN)
ENVY(X,Y) ;EP Envoy Payer ID (X=Insurer EIN,Y=Visit Type)
FMT(X,Y) ; EP
DFMT ; EP Format Date Field
MCDCFX(X,Y) ;EP Fix CLAIM Insurance Multiple if broken pointer, Medicaid
; INPUT: X = IEN (CLAIM OR BILL)
; Y = INSURER IEN UNDER FIELD #13 (INS MULTIPLE)
MCDBFX(X,Y) ;EP Fix BILL Insurance Multiple if broken pointer medicaid
; INPUT: X = IEN (CLAIM OR BILL)
; Y = INSURER IEN UNDER FIELD #13 (INS MULTIPLE)
MSG(X) ; EP
MGET ; EP Get new pointer
SLN(X,Y) ; EP Provider state license number

External References

Name Field # of Occurrence
NOW^%DTC GCNMULT+8
DBFX^ABMDEFIP ISET+26
4^ABMDLCK2 MGET+6
$$RCID^ABMUTLP ISET+28, ISET+31
^DIC GCNMULT+14
^DIE GCNMULT+25
$$GET1^DIQ SET+16, ISET+16, MGET+5, SOP1+2
^DIR MSG+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,X,!
  • Line Location: MSG+3
Function Call: WRITE
  • Prompt: !
  • Line Location: MSG+4
Routine Call
  • DIE
  • Line Location:
    • GCNMULT+25
Routine Call
  • DIC
  • Line Location:
    • GCNMULT+14
Routine Call
  • DIR
  • Line Location:
    • MSG+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUTNINS - [#9999999.18] GET1^DIQ
^AUTTINTY - [#9999999.181] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( SET+5, ISET+7, ISET+11, ISET+13, ISET+14, ISET+19, ISET+23, ISET+24, ISET+27, PCN+2
, PAYED+4, PAYED+5, PAYED+7, PAYED+8, PAYED+10, PAYED+15, PAYED+17, TCR+3, TCR+4, MCDBFX+7
, MCDBFX+8, MCDBFX+9, MCDBFX+11*
^ABMDCLM - [#9002274.3] MCDCFX+7, MCDCFX+8, MCDCFX+9, MCDCFX+11*
^ABMDCODE - [#9002274.03] POS+22
^ABMDPARM( PCN+3, PCN+6, POS+20, POS+21
^ABMDTXST - [#9002274.6] TCN+2, TCN+12, TCN+15
^ABMDTXST(0 NSN+1, NSN+2, NSN+3, NSN+4*, NSN+5
^ABMDVTYP - [#9002274.8] ISET+33
^ABMENVOY - [#9002274.93] ENVY+12
^ABMNINS( PAYED+12, POS+7, POS+8, POS+9, POS+10, POS+12, POS+13, POS+16, POS+17
^AUPNMCD - [#9000004] ISET+25, MGET+4
^AUPNPAT - [#9000001] PCN+7, PCN+8
^AUTNINS - [#9999999.18] ISET+30, BCBS+3, RCID+1, ENVY+3, PAYED+12, BCBS1+2
^AUTTLOC - [#9999999.06] SLN+5, SLN+6
^DD(9002274.6 GCNMULT+6
^DIC(40.7 - [#40.7] SET+13
^DIC(5 - [#5] SLN+14
^VA(200 - [#200] SLN+9, SLN+10, SLN+12, SLN+13

Label References

Name Line Occurrences
$$BCBS1 SOP1+7
$$NSN GCNMULT+3
BCBS SOP+4
GCNMULT TCN+14
ISET SET+17
MGET MCDBFX+10, MCDCFX+10
PCN SET+18
SOP SET+19

Naked Globals

Name Field # of Occurrence
^(0 MCDBFX+11*, MCDCFX+11*, NSN+1*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % GCNMULT+9
ABM ENVY+1~
ABM( ENVY+3*
ABM("CHIEN" GCNMULT+13
ABM("TCREDITS" TCR+1*, TCR+4*, TCR+5, TCR+6!
ABM(1 ENVY+8, ENVY+9, ENVY+10, ENVY+11
ABM(2 ENVY+4, ENVY+5
ABM(3 ENVY+6, ENVY+7
>> ABMB0 SET+6, SET+7, SET+8, SET+9, SET+10, SET+11, SET+12
>> ABMB7 SET+14
ABMCDNUM ISET+3!, ISET+23*, ISET+25, ISET+27*
>> ABMDUZ2 PCN+1*, PCN+2
>> ABME("FILLER" FMT+15*, FMT+16
>> ABME("INS" ISET+14*, ISET+16, ISET+19, ISET+21
>> ABME("INS#" ISET+5*, ISET+20*, ISET+21
>> ABME("ITYPE" ISET+16*, ISET+17, ISET+19, ISET+21, ISET+22
>> ABME("LOC" BCBS+1!, BCBS+5, BCBS+6*, BCBS+7
>> ABME("PRIO" ISET+4*, ISET+7*, ISET+11
>> ABME("RTYPE" S90+2
>> ABMGCN GCNMULT+3*, GCNMULT+10
>> ABML( MGET+8, MGET+11
>> ABML(0 MGET+7
ABMLC BCBS1+5, BCBS1+6*, BCBS1+7, BCBS1+8!
ABMLEN STRPL+2*, STRPL+3, STRPL+5, STRPL+6!
ABMLN STRIP+1, STRIP+3*, STRIP+4, STRIP+5!
ABMNM BCBS1+2*, BCBS1+3!, BCBS1+6, BCBS1+8!
ABMP MCDBFX+4~, MCDCFX+4~
ABMP( MGET+11*
ABMP("BCBS" SOP+4, BCBS+2!, BCBS+8*
ABMP("BDFN" SET+5, ISET+7, ISET+11, ISET+13, ISET+14, ISET+19, ISET+23, ISET+24, ISET+26, ISET+27
, PCN+2, PAYED+4, PAYED+5
ABMP("BTYP" SET+8*, RCID+4, RCID+15, POS+23, POS+24
ABMP("CLIN" SET+12*, SET+13*, RCID+15, POS+26, POS+27
ABMP("CLN" RCID+15
ABMP("D0" MCDBFX+5*, MCDBFX+7, MCDBFX+8, MCDBFX+9, MCDBFX+11, MCDCFX+5*, MCDCFX+7, MCDCFX+8, MCDCFX+9, MCDCFX+11
ABMP("D1" MCDBFX+6*, MCDBFX+7, MCDBFX+11, MCDCFX+6*, MCDCFX+7, MCDCFX+11
ABMP("EXP" SET+9*, RCID+4, RCID+5, RCID+15, POS+15
ABMP("HRN" PCN+7*, PCN+8*, PCN+9, PCN+10
ABMP("INAME" BCBS+3*, BCBS+6
ABMP("INS" SET+2!, SET+10*, SET+16, ISET+7, ISET+11, ISET+21*, ISET+28, ISET+29, ISET+30, ISET+31
, ISET+34*, ISET+35!, BCBS+3, PAYED+12, MGET+8*, MGET+9, MGET+11, POS+7, POS+8, POS+9
, POS+10, POS+12, POS+13, POS+16, POS+17
ABMP("INSCO" MGET+1*, MGET+5, MGET+9
ABMP("ITYPE" SET+16*, SOP+2, SOP+4
ABMP("LDFN" SET+7*, PCN+3, PCN+6, PCN+7, PAYED+12, POS+7, POS+8, POS+9, POS+10, POS+12
, POS+13, POS+16, POS+17, POS+20
ABMP("NOFMT" FMT+6
ABMP("PAYED" PAYED+2!, PAYED+12*, PAYED+20*, PAYED+22*
ABMP("PCN" PCN+2*, PCN+5*, PCN+10*
ABMP("PDFN" SET+6*, ISET+24*, ISET+25, PCN+7, PCN+8, MCDBFX+8*, MCDCFX+8*
ABMP("PDT" PAYED+21*
ABMP("PRI" MGET+7*, MGET+8, MGET+11
ABMP("PTR" MGET+2*, MGET+3, MGET+4
ABMP("SET" SET+1, SET+20*
ABMP("SOP" SOP+3*, SOP+4*
ABMP("SPACES" FMT+7*, FMT+15
ABMP("VDT" SET+14*, MCDBFX+9*, MCDCFX+9*
ABMP("VTYP" SET+11*, ISET+33, RCID+4, RCID+15, POS+7, POS+9, POS+12, POS+16, POS+25
ABMP("XMIT" TCN+13*, GCNMULT+4, GCNMULT+19
ABMP("ZERO" MCDBFX+7*, MCDCFX+7*, MGET+1, MGET+2
ABMP("ZEROS" FMT+8*, FMT+15
ABMP(1 MCDBFX+11, MCDCFX+11
ABMP(2 MCDBFX+11, MCDCFX+11
ABMPAY PAYED+16~, PAYED+19*, PAYED+20, PAYED+22
ABMPDT PAYED+16~, PAYED+18*, PAYED+21
>> ABMQUIET MSG+2
ABMREASN GCNMULT~, GCNMULT+16
>> ABMRT(90 S90+5*, S90+6*, S90+7*
ABMSFX PCN+3*, PCN+4, PCN+5, PCN+11!
ABMSTAT GCNMULT~, GCNMULT+11
ABMTYP SOP1+2*, SOP1+3, SOP1+5, SOP1+7, SOP1+8!
>> ABMXMTDT TCN+11, TCN+12, TCN+15, GCNMULT+9*
ABMZERO PAYED+16~, PAYED+17*, PAYED+18, PAYED+19
DA TCN+3*, GCNMULT+1~, GCNMULT+18!, GCNMULT+20*
DA(1 GCNMULT+4*, GCNMULT+5, GCNMULT+19*, GCNMULT+22
DIC GCNMULT+1~, GCNMULT+5*, GCNMULT+18!
DIC("DR" GCNMULT+10*, GCNMULT+11*, GCNMULT+12*, GCNMULT+13*
DIC("P" GCNMULT+6*
DIC(0 GCNMULT+7*
DIE GCNMULT+1~, GCNMULT+18!, GCNMULT+22*
DIE("NO^" GCNMULT+24*
DIR MSG+7!
DIR(0 MSG+5*
DR GCNMULT+1~, GCNMULT+18!, GCNMULT+23*
DT RCID+20
DUZ GCNMULT+12
DUZ(2 SET+5, ISET+7, ISET+11, ISET+13, ISET+14, ISET+19, ISET+23, ISET+24, ISET+27, PCN+1
, PCN+8, PAYED+4, PAYED+5, PAYED+7, PAYED+8, PAYED+10, PAYED+15, PAYED+17, TCR+3, TCR+4
, SLN+5, SLN+6, MCDBFX+7, MCDBFX+8, MCDBFX+9, MCDBFX+11, MCDCFX+7, MCDCFX+8, MCDCFX+9, MCDCFX+11
, POS+21, TCN+2, TCN+12, TCN+15
I FMT+10~*, FMT+11*, FMT+12, STRIP+1~*, STRIP+2, STRIP+3, STRPL+1~, STRPL+3*, STRPL+4, STRPL+5
, SET+3~, SET+4*, SET+5, ISET+8~, ISET+9*, ISET+11*, ISET+13, ISET+14, ISET+21, ISET+23
, ISET+26, ISET+27, BCBS+4~, BCBS+5*, BCBS+6, ENVY+1~, ENVY+3*, PAYED+6~, PAYED+7*, PAYED+8
, PAYED+10, PAYED+15, PAYED+17, TCR+2*, TCR+3*, TCR+4, SLN+8~, SLN+9*, SLN+10*, SLN+11
, SLN+12, SLN+13, MGET+10~, MGET+11*, S90+1~, S90+2*, S90+3*, S90+4*, S90+6, BCBS1+4~
, BCBS1+5*, BCBS1+6
IOSL MSG+4
J PAYED+13~, PAYED+14*, PAYED+15*, PAYED+17, TCR+4*
K PAYED+9~, PAYED+10*, PAYED+12, PAYED+20, PAYED+21
L PAYED+3~, PAYED+4*, PAYED+5*, PAYED+7
U SET+14, ISET+13, ISET+14, ISET+19, ISET+25, ISET+29, ISET+30, ISET+31, ISET+33, PCN+2
, PCN+6, BCBS+3, ENVY+12, PAYED+4, PAYED+5, PAYED+12, PAYED+18, SLN+12, MCDBFX+9, MCDCFX+8
, MGET+1, POS+22, BCBS1+2, TCN+15, GCNMULT+6
X FMT~, FMT+6, FMT+12*, FMT+14*, FMT+16*, FMT+17*, FMT+18, STRIP~, STRIP+1, STRIP+2
, STRIP+4*, STRIP+6, STRPL~, STRPL+2, STRPL+3, STRPL+4, STRPL+5*, STRPL+7, SOP+1~, SOP+2*
, SOP+3, RCID~, RCID+1, ENVY~, ENVY+3, MSG~, MSG+3, TCR~, TCR+3, TCR+4
, TCR+5*, TCR+7, UPC~, UPC+1*, UPC+2, LWC~, LWC+1*, LWC+2, SLN~, SLN+9
, SLN+10, SLN+11*, SLN+12, SLN+13*, SLN+14*, SLN+15, MCDBFX~, MCDBFX+5, MCDCFX~, MCDCFX+5
, POS~, POS+7*, POS+8*, POS+9*, POS+10*, POS+12*, POS+13*, POS+16*, POS+17*, POS+19
, POS+20*, POS+21*, POS+22*, POS+23*, POS+24*, POS+25*, POS+26*, POS+27*, POS+28, TOS~
, TOS+2, TOS+3, TOS+4, TOS+5, TOS+6, SOP1~, SOP1+2, SOP1+7, BCBS1~, BCBS1+2
, NSN~, NSN+2*, NSN+3*, NSN+4, NSN+6, TCN~, TCN+1, TCN+2*, TCN+3, TCN+11*
, TCN+12, TCN+13, TCN+15, GCNMULT+1~, GCNMULT+9*, GCNMULT+18!
Y FMT~, FMT+9, FMT+10, FMT+13, FMT+15, FMT+16, FMT+17, DFMT+1*, RCID+1*, RCID+2
, RCID+3*, RCID+4*, RCID+5*, RCID+13, RCID+14*, RCID+16*, RCID+17*, RCID+18*, RCID+19*, RCID+20*
, RCID+22, ENVY~, ENVY+4, ENVY+5, ENVY+6, ENVY+7, ENVY+8, ENVY+9, ENVY+10, SLN~
, SLN+5*, SLN+6*, SLN+7*, SLN+9, SLN+12*, SLN+14, MCDBFX~, MCDBFX+6, MCDCFX~, MCDCFX+6
, TOS+1*, TOS+2*, TOS+3*, TOS+4*, TOS+5*, TOS+6*, TOS+7, SOP1+3*, SOP1+4, SOP1+5*
, SOP1+6*, SOP1+7*, SOP1+9, BCBS1+1*, BCBS1+3, BCBS1+7*, BCBS1+9, GCNMULT+1~, GCNMULT+15, GCNMULT+20
, GCNMULT+21!
Z ENVY+1~, ENVY+2*, ENVY+4*, ENVY+5*, ENVY+6*, ENVY+7*, ENVY+8*, ENVY+9*, ENVY+10*, ENVY+11*
, ENVY+12*, ENVY+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All