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

Package: Third Party Billing

Routine: ABMDFUTL


Information

ABMDFUTL ; IHS/SD/DMJ - Export Forms Utility ;

Source Information

Source file <ABMDFUTL.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA Fileman 4 ^DIC  FILE^DICN  $$GET1^DIQ  ^DIR  
Third Party Billing 3 ^ABMDDIE  PIREFID^ABME8L2  $$RCID^ABMERUTL  
Kernel 1 ($$CHKDGT,$$NPI)^XUSNPI  

Caller Graph

Caller Graph Total: 36

Package Total Caller Graph
Third Party Billing 35 ABMDBLK  ABMDE3C  ABMDES1  ABMDESM  ABMDESM1  ABMDESMA  ABMDESMB  ABMDESMD  
ABMDESML  ABMDESMM  ABMDESMR  ABMDESMU  ABMDESMX  ABMDF12  ABMDF14  ABMDF14D  
ABMDF18  ABMDF24  ABMDF25  ABMDF26  ABMDF27  ABMDF27D  ABMDF29  ABMDF2D  
ABMDF3  ABMDF34  ABMDF35  ABMDF35D  ABMDF3D  ABMDF4  ABMDFPRT  ABMDFRDO  
ABME5SBR  ABME8SBR  ABMURREC  
Phoenix Devel Center 1 AZXDFRDO  

Entry Points

Name Comments DBIA/ICR reference
PRVLKUP(ABMX,ABMY) ;EP
K24() ;EP - box 24k hcfa form
WTOT ;EP for writing Summary totals
YTOT ;EP for updating ABMY("TOT") variable
; - input variables: ABM("YTOT") = $ amount of each bill
; - output variable: ABMY("TOT") = # bills ^ $ amount ^ # insurers
GETPRV() ;EP - get attending or rendering provider for line
; item if not one on indiv. page
K24N(X) ;EP - get payer assigned number (x=provider file 200 ien)
TXST ;EP for obtaining or adding 3P TX STATUS entry
; - input variables: ABMP("EXP") - export form
; ABMY("INS") - insurer (optional)
; ABMY("TYP") - insurer type (optional)
; - output variable: ABMP("XMIT") - export batch
F54() ;EP - flag 54 HCFA BOX 33
TXUPDT ;EP for updating the TXST file
NPI ;
PREV ;EP for obtaining previous payment info

External References

Name Field # of Occurrence
^ABMDDIE TXUPDT+6
PIREFID^ABME8L2 K24N+18
$$RCID^ABMERUTL F54+3
^DIC PRVLKUP+16
FILE^DICN TXST+15
$$GET1^DIQ PREV+21
^DIR WTOT+9, PRVLKUP+7, NPI+13
$$CHKDGT^XUSNPI NPI+16
$$NPI^XUSNPI PRVLKUP+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?16,"(All Print-outs are Complete)"
  • Line Location: WTOT+2
Function Call: WRITE
  • Prompt: !!?5,"For Printing Mailing Labels, Worksheets or a Transmittal Listing...",!?5,"...refer to EXPORT BATCH: ",ABMP("XMIT")
  • Line Location: WTOT+3
Function Call: WRITE
  • Prompt: !?17,"==========================="
  • Line Location: WTOT+5
Function Call: WRITE
  • Prompt: !?17,"Number of Records Exported: ",$P(ABMY("TOT"),U)
  • Line Location: WTOT+6
Function Call: WRITE
  • Prompt: !?17,"Number of Insurers........: ",$P(ABMY("TOT"),U,3)
  • Line Location: WTOT+7
Function Call: WRITE
  • Prompt: !?17,"Total Amount Billed.......: ",$FN($P(ABMY("TOT"),U,2),",",2),!
  • Line Location: WTOT+8
Function Call: WRITE
  • Prompt: !,"No NPI entered - nothing saved"
  • Line Location: NPI+15
Routine Call
  • DIC
  • Line Location:
    • PRVLKUP+16
Routine Call
  • DIR
  • Line Location:
    • WTOT+9
    • PRVLKUP+7
    • NPI+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] Classic Fileman Calls
^ABMDTXST - [#9002274.6] Classic Fileman Calls
^AUTNINS - [#9999999.18] GET1^DIQ
^AUTTINTY - [#9999999.181] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( YTOT+6, PREV+12, PREV+14, PREV+15, PREV+17, PREV+18, PREV+24, PREV+25, PREV+27, PREV+29
, PREV+30, PREV+31, PREV+32, PREV+33, PREV+35, PREV+36
^ABMDTXST - [#9002274.6] TXST+8, TXST+9, TXST+10, TXST+11, TXUPDT+3
^ABMNINS( K24+5, K24N+5, K24N+10, K24N+11, K24N+15
^ABMREFID - [#9002274.11] K24N+10, K24N+15
^AUTNINS - [#9999999.18] K24N+5, K24N+6
^VA(200 - [#200] K24N+4

Label References

Name Line Occurrences
NPI NPI+16

Naked Globals

Name Field # of Occurrence
^(0 TXST+9, YTOT+6, TXUPDT+3, PREV+25
^(1 TXUPDT+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM PREV+7~, PREV+15*, PREV+16, PREV+17, PREV+18, PREV+23, PREV+24, PREV+25, PREV+27, PREV+29
, PREV+30, PREV+31, PREV+32, PREV+33, PREV+36
ABM( PREV+16, PREV+23*
ABM("A" PREV+14*, PREV+15
ABM("BIL" PREV+13*
ABM("CLM" PREV+12*, PREV+14, PREV+15
ABM("J" PREV+24*, PREV+25, PREV+27, PREV+29, PREV+30, PREV+31, PREV+32, PREV+33
ABM("PROVIDER" PRVLKUP+10*, PRVLKUP+15, PRVLKUP+17, PRVLKUP+18*, PRVLKUP+19*, NPI+1!, NPI+11, NPI+15*, NPI+20*, NPI+21
ABM("W" PREV+10*, PREV+25*, PREV+36
ABM("YTOT" YTOT+5
ABM(0 TXUPDT+3*, TXUPDT+5
ABM(1 TXUPDT+3*, TXUPDT+5
>> ABMAFLG PREV+11
>> ABMDUZ2 K24N+9*, K24N+10, K24N+14*, K24N+15
>> ABMIDCD K24N+17*, K24N+19
>> ABMMFLG PREV+11
>> ABMNFLG PRVLKUP+20*, NPI+1, NPI+15*
>> ABMP PREV+8*
>> ABMP("BDFN" YTOT+6, PREV+12, PREV+13, PREV+35, K24N+2
>> ABMP("BILL" PREV+6!, PREV+35*
>> ABMP("CDFN" PREV+12
>> ABMP("COI" PREV+5*, PREV+31*
>> ABMP("DED" PREV+5*, PREV+32*
>> ABMP("EXP" TXST+9, TXST+14, PREV+11, K24+5, K24+6, K24N+8, K24N+13
>> ABMP("GL" GETPRV+2, GETPRV+5, GETPRV+8, GETPRV+9
>> ABMP("GRP" PREV+5*, PREV+27*
>> ABMP("INS" PREV+21, K24+5, K24N+3, K24N+4, K24N+5, K24N+6, K24N+10, K24N+11, K24N+15, F54+3
>> ABMP("ITYPE" K24N+10, K24N+15, K24N+16, F54+1
>> ABMP("LDFN" K24N+5, K24N+11
>> ABMP("NONC" PREV+5*, PREV+29*
>> ABMP("PD" PREV+9*, PREV+25*
>> ABMP("PDFN" PREV+17
>> ABMP("PENS" PREV+5*, PREV+30*
>> ABMP("REF" PREV+5*, PREV+33*
>> ABMP("VTYP" K24+5, K24N+5, K24N+10, K24N+15, F54+2
>> ABMP("WO" PREV+9*, PREV+36*
>> ABMP("XMIT" TXST+7*, TXST+8, TXST+10*, TXST+11*, TXST+12, TXST+15*, WTOT+3, TXUPDT+1, TXUPDT+2, TXUPDT+3
ABMPM PREV+8!
>> ABMPQ K24N+10*, K24N+15*, K24N+19*, K24N+20*
>> ABMPRV GETPRV+3*, GETPRV+6*, GETPRV+8*, GETPRV+9
>> ABMPRVT GETPRV+5*, GETPRV+6, GETPRV+8*, GETPRV+9*, GETPRV+10*, GETPRV+11
>> ABMR("SBR" PREV+21
ABMX TXST+6~, TXST+7*, TXST+8*, TXST+9, TXST+10, TXST+11, PRVLKUP~, PRVLKUP+6, NPI+11
ABMY PRVLKUP~, NPI+11
ABMY("INS" TXST+11, TXST+14
ABMY("TINS" YTOT+6*
ABMY("TOT" YTOT+4*, YTOT+5*, YTOT+6*, WTOT+4*, WTOT+6, WTOT+7, WTOT+8, TXUPDT+5
ABMY("TYP" TXST+10, TXST+14
DA TXUPDT+2*, PRVLKUP+3~, PRVLKUP+11~, NPI+6~
DD TXST+15!
DIC TXST+13*, PRVLKUP+3~, PRVLKUP+11~, PRVLKUP+12*, NPI+6~
DIC("DR" TXST+14*
DIC("S" PRVLKUP+14*
DIC(0 TXST+13*, PRVLKUP+13*
DIE TXUPDT+4*, PRVLKUP+3~, PRVLKUP+11~, NPI+6~
DINUM TXST+15!
DIR WTOT+9!, PRVLKUP+3~, PRVLKUP+11~, NPI+6~
DIR("A" PRVLKUP+5*, NPI+10*
DIR("B" PRVLKUP+6*, NPI+11*
DIR(0 WTOT+9*, PRVLKUP+4*, NPI+8*
>> DIROUT PRVLKUP+8
DO TXST+15!
DR TXUPDT+5*, PRVLKUP+3~, PRVLKUP+11~, NPI+6~
DT TXST+8, TXST+13
>> DTOUT PRVLKUP+8
>> DUOUT PRVLKUP+8
DUZ TXST+14
DUZ(2 TXST+8, TXST+9, TXST+10, TXST+11, YTOT+6, TXUPDT+3, PREV+12, PREV+14, PREV+15, PREV+17
, PREV+18, PREV+24, PREV+25, PREV+27, PREV+29, PREV+30, PREV+31, PREV+32, PREV+33, PREV+35
, PREV+36, K24+5, K24N+9, K24N+14
U TXST+9, TXST+10, TXST+11, TXST+14, YTOT+4, YTOT+5, YTOT+6, WTOT+6, WTOT+7, WTOT+8
, TXUPDT+5, PREV+12, PREV+17, PREV+25, PREV+27, PREV+29, PREV+30, PREV+31, PREV+32, PREV+33
, PREV+35, PREV+36, K24N+5, K24N+6, K24N+10, K24N+11, K24N+15, PRVLKUP+18, PRVLKUP+19, NPI+20
X TXST+13*, K24N~, K24N+4, K24N+5, K24N+11, PRVLKUP+3~, PRVLKUP+11~, PRVLKUP+15*, NPI+6~
Y TXST+15, K24N+1~, K24N+2*, K24N+3*, K24N+4*, K24N+5*, K24N+11*, K24N+22, PRVLKUP+3~, PRVLKUP+9
, PRVLKUP+10, PRVLKUP+11~, PRVLKUP+17, PRVLKUP+18, PRVLKUP+19, NPI+3, NPI+6~, NPI+15, NPI+16, NPI+18!
, NPI+20
>> ZTQUEUED WTOT+1
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