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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ABMESTAT

Package: Third Party Billing

Routine: ABMESTAT


Information

ABMESTAT ; IHS/SD/SDR - Bills Export Statistical Report;

Source Information

Source file <ABMESTAT.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Third Party Billing 5 BILL^ABMDRCHK  ^ABMDRDBQ  (,WHD)^ABMDRHD  ^ABMDRSEL  PAZ^ABMDRUTL  
VA Fileman 2 $$GET1^DIQ  ^DIR  
IHS VA Utilities 1 ^XBFMK  

Entry Points

Name Comments DBIA/ICR reference
SUB
HDB
EXP
PRINT ;
DATA ;
HD
SLOOP
TXT ;
C ;;OTHER
COMPUTE ;EP - Entry Point for Setting up Data
D ;;MEDICAID
G ;;OTHER
F ;;PRIVATE
I ;;OTHER
H ;;PRIVATE
K ;;MEDICAID
M ;;PRIVATE
N ;;OTHER
P ;;PRIVATE
R ;;MEDICARE
T ;;OTHER
W ;;OTHER
V ;;VMBP
MD ;;MEDICARE
SEL ;
MH ;;MEDICARE

External References

Name Field # of Occurrence
BILL^ABMDRCHK DATA+1
^ABMDRDBQ SEL+8
^ABMDRHD SEL+3
WHD^ABMDRHD HDB
^ABMDRSEL SEL+1
PAZ^ABMDRUTL HD
$$GET1^DIQ DATA+5
^DIR ABMESTAT+11
^XBFMK ABMESTAT+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " (cont)"
  • Line Location: PRINT+14
Function Call: WRITE
  • Prompt: !!?40,"======",?64,"============"
  • Line Location: PRINT+25
Function Call: WRITE
  • Prompt: !?20,"Total:",?40,$J(ABM("TCNT"),"6R"),?64,$J($FN(ABM("TAMT"),",",2),"12R")
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: !?40,"Number"
  • Line Location: HDB+1
Function Call: WRITE
  • Prompt: !?10,$S(ABM("SRT")="I":"Insurer",ABM("SRT")="A":"Allowance Category",1:"Insurer Type")
  • Line Location: HDB+2
Function Call: WRITE
  • Prompt: ?40,"Bills",?53,"Percent",?68,"Total"
  • Line Location: HDB+3
Function Call: WRITE
  • Prompt: !,ABM("LINE")
  • Line Location: HDB+4
Function Call: WRITE
  • Prompt: !!?3,"Export Mode: "_$S(+$P(ABM("TXT"),U,2):$P($G(^ABMDEXP($P(ABM("TXT"),U,2),0)),U),1:$P(ABM("TXT"),U,2))
  • Line Location: EXP+0
Function Call: WRITE
  • Prompt: !?40,"------",?64,"------------"
  • Line Location: SUB+1
Function Call: WRITE
  • Prompt: !?20,"Subtotal:",?40,$J(ABM("SUBCNT"),"6R"),?55,$J((ABM("SUBCNT")/ABM("TCNT")*100),".",1),?64,$J($FN(ABM("SUBAMT"),",",2),"12R")
  • Line Location: SUB+2
Routine Call
  • DIR
  • Line Location:
    • ABMESTAT+11

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( SLOOP+4, SLOOP+5, SLOOP+8, SLOOP+11, SLOOP+13, SLOOP+16, SLOOP+19, DATA+9, DATA+13
^ABMDEXP - [#9002274.08] EXP
^ABMDTXST - [#9002274.6] SLOOP+14
^AUPNVSIT - [#9000010] SLOOP+9
^AUTNINS - [#9999999.18] DATA+2
^DIC(4 - [#4] DATA+8
^TMP("ABM-ES" COMPUTE+1!, DATA+11*, DATA+12*, DATA+13*

Label References

Name Line Occurrences
DATA SLOOP+5, SLOOP+11, SLOOP+16, SLOOP+19
EXP PRINT+14, PRINT+16
HD PRINT+14
HDB PRINT+3
SUB PRINT+16, PRINT+24

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM ABMESTAT+4!, SLOOP+5*, SLOOP+11*, SLOOP+16*, SLOOP+18*, SLOOP+19*, DATA+9, DATA+13, PRINT+7*, PRINT+9*
, PRINT+10, PRINT+12*, PRINT+13*, PRINT+15
ABM("A" PRINT+6*, PRINT+7, PRINT+9, PRINT+12, PRINT+13
ABM("DT" ABMESTAT+13*, ABMESTAT+14*, ABMESTAT+15*
ABM("EXP" DATA+9*, DATA+10*, DATA+11, DATA+12, DATA+13, PRINT+4*, PRINT+16, PRINT+17*
ABM("HD" SEL+2*
ABM("I" DATA+2, DATA+5
ABM("L" DATA+8*, DATA+11, DATA+12, DATA+13
ABM("LINE" HDB+4*!
ABM("NODX" ABMESTAT+5*
ABM("PG" COMPUTE+1*, PRINT+2*, HDB*
ABM("RD" SLOOP+1*, SLOOP+4*, SLOOP+5
ABM("SORT" DATA+2*, DATA+5*, DATA+7*, DATA+11, DATA+12, DATA+13
ABM("SRT" ABMESTAT+12*, DATA+2, DATA+3, DATA+7, HDB+2
ABM("SUBAMT" PRINT+4*, PRINT+22*, SUB+2, SUB+3*
ABM("SUBCNT" PRINT+4*, PRINT+21*, SUB, SUB+2, SUB+3*
ABM("SUBR" COMPUTE+1*
ABM("TAMT" PRINT+5*, PRINT+22*, PRINT+26
ABM("TCNT" PRINT+5*, PRINT+10*, PRINT+26, SUB+2
ABM("TXT" PRINT+1*, PRINT+15*, PRINT+16, PRINT+17, PRINT+18, PRINT+19, PRINT+20, PRINT+21, PRINT+22, EXP
ABM("V" PRINT+4*, PRINT+16*
>> ABMP("HIT" DATA+1*
>> ABMQ("NS" SEL+6*
>> ABMQ("RC" SEL+4*
>> ABMQ("RP" SEL+7*
>> ABMQ("RX" SEL+5*
>> ABMVDFN SLOOP+7*, SLOOP+8*, SLOOP+9, SLOOP+11
>> ABMVDT SLOOP+9*, SLOOP+10
>> ABMXDT SLOOP+14*, SLOOP+15
>> ABMXMT SLOOP+12*, SLOOP+13*, SLOOP+14, SLOOP+16
ABMY ABMESTAT+4!
ABMY("DT" SLOOP, SLOOP+1, SLOOP+2*, SLOOP+3, SLOOP+4, SLOOP+6, SLOOP+10, SLOOP+15
DIR ABMESTAT+11!
DIR("A" ABMESTAT+9*
DIR("B" ABMESTAT+10*
DIR(0 ABMESTAT+8*
>> DIROUT SEL+1, PRINT+9, PRINT+13, PRINT+14, PRINT+23, HD
DT ABMESTAT+15
>> DTOUT SEL+1, PRINT+9, PRINT+13, PRINT+14, PRINT+23, HD
>> DUOUT SEL+1, PRINT+9, PRINT+13, PRINT+14, PRINT+23, HD
DUZ(2 SLOOP+4, SLOOP+5, SLOOP+8, SLOOP+11, SLOOP+13, SLOOP+14, SLOOP+16, SLOOP+19, DATA+9, DATA+13
IOSL PRINT+14
U SLOOP+9, SLOOP+14, DATA+2, DATA+8, DATA+9, DATA+11, DATA+12, DATA+13, PRINT+10, PRINT+16
, PRINT+17, PRINT+18, PRINT+19, PRINT+20, PRINT+21, PRINT+22, EXP
>> Y ABMESTAT+12

Marked Items

Name Field # of Occurrence
$T(@(5) DATA+7
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All