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 |  Local Variables |  All
Print Page as PDF
Routine: ABMEF19

Package: Third Party Billing

Routine: ABMEF19


Information

ABMEF19 ; IHS/ASDST/DMJ - Electronic HCFA-1500 V2.0 Envoy Version ;

Source Information

Source file <ABMEF19.m>

Call Graph

Call Graph Total: 19

Package Total Call Graph
Third Party Billing 10 ^ABMEAA0  ^ABMEBA0  ^ABMEH15  ^ABMEH20  ^ABMEH30  ^ABMEH40  ^ABMEH61  ^ABMEH90  
^ABMEH95  ^ABMEH99  
VA Fileman 4 ^DIC  ^DIE  $$GET1^DIQ  ^DIR  
Kernel 2 ^%ZISC  OPEN^%ZISH  
MailMan 2 XMZ^XMA2  ENT1^XMD  
IHS VA Utilities 1 $$JDT^XBFUNC  

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Third Party Billing 10 ABMEAA0  ABMEEPRV  ABMEFA0  ABMEFB0  ABMEH30  ABMEH61  ABMEH62  ABMEH63  
ABMEH99  ABMERUT2  

Entry Points

Name Comments DBIA/ICR reference
CLAIM ;one claim
END ;end of file
BATCH ;new batch
WRITE ;EP - write record to file
START ;
ENVOY() ; EP - Is the an Envoy format? ; ABM*2.4*9 IHS/FCS/DRS 09/21/01 ;
; A call to this is needed when making changes to code used by
; other formats, such as ABMEH61
FMTNAME()
CLOSE ;
ENVOY15() ; EP - Is this the Envoy 1500 format? ; ABM*2.4*9 IHS/FCS/DRS 09/21/01 ;
; A call to this is needed when making changes to code used by
; other formats, such as ABMEH20
OPEN ;
; OPEN FILE
LOOP ;loop through bills

External References

Name Field # of Occurrence
^%ZISC CLOSE+2
OPEN^%ZISH OPEN+42
^ABMEAA0 CLAIM+8
^ABMEBA0 BATCH+6
^ABMEH15 BATCH+9
^ABMEH20 CLAIM+16
^ABMEH30 CLAIM+20
^ABMEH40 CLAIM+32
^ABMEH61 CLAIM+36
^ABMEH90 CLAIM+38
^ABMEH95 BATCH+3, END+2
^ABMEH99 END+6
^DIC START+7, OPEN+7
^DIE START+20, CLAIM+44
$$GET1^DIQ FMTNAME
^DIR OPEN+17, OPEN+25, OPEN+39
$$JDT^XBFUNC OPEN+31
XMZ^XMA2 OPEN+50
ENT1^XMD CLOSE+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"File could not be created/opened.",!
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !,"Submission # ",ABMR(1,50),!
  • Line Location: CLAIM+9
Function Call: WRITE
  • Prompt: !,"Writing bills to file.",!
  • Line Location: CLAIM+10
Function Call: WRITE
  • Prompt: "."
  • Line Location: CLAIM+14
Function Call: WRITE
  • Prompt: !!,"Finished.",!!
  • Line Location: END+10
Function Call: WRITE
  • Prompt: !,"MM SEND TO DOMAIN NOT DEFINED.",!
  • Line Location: OPEN+46
Routine Call
  • DIE
  • Line Location:
    • START+20
    • CLAIM+44
Routine Call
  • DIC
  • Line Location:
    • START+7
    • OPEN+7
Routine Call
  • DIR
  • Line Location:
    • OPEN+17
    • OPEN+25
    • OPEN+39

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIZ(8980 - [#8980] Classic Fileman Calls
^ABMDTXST - [#9002274.6] Classic Fileman Calls,  GET1^DIQ
^AUTNINS - [#9999999.18] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( CLAIM+2, CLAIM+3, CLAIM+4
^ABMDPARM( START+13, OPEN+24, OPEN+45
^ABMDTXST - [#9002274.6] START+3, LOOP+8, LOOP+9, CLAIM+1
^ABMNINS("ALF" OPEN+32, OPEN+43*
^AUTNINS - [#9999999.18] START+10, OPEN+28
^AUTTLOC - [#9999999.06] OPEN+48
^DIC(4.2 - [#4.2] OPEN+47
^DIZ(8980 - [#8980] OPEN+12, OPEN+19!, WRITE+4*, CLOSE+3*
^XMB(3.9 - [#3.9] WRITE+11*, CLOSE+5*

Label References

Name Line Occurrences
$$FMTNAME ENVOY15+3, ENVOY+3
BATCH CLAIM+13
CLAIM LOOP+9
CLOSE END+9
END START+22
LOOP START+21
OPEN START+15
WRITE CLAIM+12, CLAIM+18, CLAIM+24, CLAIM+27, CLAIM+30, CLAIM+34, CLAIM+40, BATCH+5, BATCH+8, BATCH+11
, END+4, END+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM END+11!
>> ABMAPRV LOOP+7*, LOOP+8*, LOOP+9, CLAIM+13, BATCH+12
>> ABMBIL0 CLAIM+4*, CLAIM+5, CLAIM+6
ABME END+11!
ABMEF END+11!
ABMEF("BATCH#" LOOP+2*, BATCH+1*
ABMEF("LINE" CLAIM+11*, CLAIM+17*, CLAIM+23*, CLAIM+26*, CLAIM+29*, CLAIM+33*, CLAIM+39*, BATCH+4*, BATCH+7*, BATCH+10*
, END+3*, END+7*, WRITE+4, WRITE+7, WRITE+11
ABMFN START+19, END+11!, OPEN+11*, OPEN+37*, OPEN+38, OPEN+41*, OPEN+42, OPEN+43, OPEN+52*
>> ABMJDT OPEN+31*, OPEN+33, OPEN+37
ABMLF END+11!, OPEN+32*, OPEN+33*, OPEN+34
ABMLNUM END+11!, OPEN+34*, OPEN+35*, OPEN+36*, OPEN+37
>> ABMOPRV LOOP+6*, CLAIM+7, CLAIM+13, BATCH+2, BATCH+12*
>> ABMP("BDFN" CLAIM+1*, CLAIM+2, CLAIM+3, CLAIM+4, CLAIM+42
>> ABMP("DOMAIN" OPEN+45*, OPEN+46, OPEN+47*, CLOSE+6
>> ABMP("FILE#" OPEN+10*, OPEN+12, OPEN+19, WRITE+4, CLOSE+3
>> ABMP("FTYPE" START+13*, START+14*, OPEN+2, OPEN+21, OPEN+44, WRITE+2, WRITE+5, WRITE+9, CLOSE+2, CLOSE+3
, CLOSE+4
>> ABMP("INS" START+2, START+3*, START+4, START+9*, START+10, START+11, OPEN+28, OPEN+32, OPEN+43
>> ABMP("ITYPE" START+10*
>> ABMP("L#" LOOP+1*, WRITE+3*, WRITE+4, WRITE+10*, WRITE+11, CLOSE+5
>> ABMP("LDFN" CLAIM+5*
>> ABMP("MP" LOOP+3*
>> ABMP("VTYP" CLAIM+6*
>> ABMP("WRITE" LOOP+4*, WRITE+1
>> ABMP("XMIT" START+3, START+18, LOOP+8, LOOP+9, CLAIM+1, CLAIM+43, FMTNAME
ABMPATH END+11!, OPEN+27*, OPEN+42
ABMR LOOP+5!, CLAIM+15!, CLAIM+19!, CLAIM+31!, CLAIM+35!, CLAIM+37!, END+1!, END+5!, END+11!
ABMR(1 CLAIM+9
>> ABMRCID OPEN+28*, OPEN+29, OPEN+30*, OPEN+37
ABMREC END+11!
ABMREC(1 CLAIM+11
ABMREC(10 BATCH+7
ABMREC(15 BATCH+10
ABMREC(20 CLAIM+17
ABMREC(30 CLAIM+22, CLAIM+23
ABMREC(31 CLAIM+25, CLAIM+26
ABMREC(32 CLAIM+28, CLAIM+29
ABMREC(40 CLAIM+33
ABMREC(90 CLAIM+39
ABMREC(95 BATCH+4, END+3
ABMREC(99 END+7
ABMRT LOOP+5!
ABMRV END+11!
>> ABMTXIEN LOOP+9*, CLAIM+1
>> DA START+18*, CLAIM+42*
DIC START+5*, OPEN+4*, OPEN+8!
DIC("S" OPEN+6*
DIC(0 START+6*, OPEN+5*
>> DIE START+17*, CLAIM+41*
DIR OPEN+18!, OPEN+25!, OPEN+39!
DIR("A" OPEN+14*, OPEN+23*, OPEN+38*
DIR("B" OPEN+16*, OPEN+24*, OPEN+38*
DIR(0 OPEN+15*, OPEN+22*, OPEN+38*
>> DR START+19*, CLAIM+43*
DT OPEN+31, CLOSE+3, CLOSE+5
DUZ OPEN+49
DUZ(2 START+3, START+13, LOOP+8, LOOP+9, CLAIM+1, CLAIM+2, CLAIM+3, CLAIM+4, OPEN+24, OPEN+45
, OPEN+48
>> I CLAIM+21*, CLAIM+22, CLAIM+23, CLAIM+25, CLAIM+26, CLAIM+28, CLAIM+29, CLOSE+3
IO WRITE+6
IO(0 WRITE+8
>> POP START+16, OPEN+3*, OPEN+9*, OPEN+20*, OPEN+26*, OPEN+40*, OPEN+43, OPEN+46*, OPEN+51*
U START+10, OPEN+47
X ENVOY15+3~*, ENVOY15+4
>> XMDUZ OPEN+49*
>> XMSUB OPEN+48*
>> XMY(".5@" CLOSE+6*
>> XMZ OPEN+51, OPEN+52, OPEN+53, WRITE+11, CLOSE+5
>> Y START+8, START+9, OPEN+9, OPEN+10, OPEN+11, OPEN+19, OPEN+20, OPEN+26, OPEN+27, OPEN+40
, OPEN+41
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 |  Local Variables |  All