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

Package: Third Party Billing

Routine: ABMDEDIC


Information

ABMDEDIC ; IHS/ASDST/DMJ - Claim Selection ;

Source Information

Source file <ABMDEDIC.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 2 ^DIC  ^DIR  
Third Party Billing 1 ($$HDT,$$SDT,PAT)^ABMDUTL  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Third Party Billing 6 ABMDE  ABMDECAN  ABMDEOPN  ABMDRDE  ABMDSPLT  ABMRSTIN  

Entry Points

Name Comments DBIA/ICR reference
CLM ;SELECT CLAIM
SELO
PAT ;PATIENT LOOKUP
CLM1
XIT
DICW ;EP - for displaying claim identifiers
SEL ;SELECT
MULT ;EP for Selecting Multiple Claims

External References

Name Field # of Occurrence
$$HDT^ABMDUTL DICW+1, DICW+4
$$SDT^ABMDUTL PAT+17
PAT^ABMDUTL PAT+7, PAT+10
^DIC CLM+8, CLM+15, PAT+2, CLM1+8, SELO
^DIR CLM+4, CLM+17, SEL+3, CLM1+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: SEL+2
Function Call: WRITE
  • Prompt: ?46,$P(^DPT(+ABMP(0),0),U,2)," ",$$HDT^ABMDUTL($P(^(0),U,3))," ",$P(^(0),U,9)
  • Line Location: DICW+1
Function Call: WRITE
  • Prompt: ?68,$P($G(^AUTTLOC(DUZ(2),0)),U,7)," ",$P(^AUPNPAT(+ABMP(0),41,DUZ(2),0),U,2)
  • Line Location: DICW+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DICW+3
Function Call: WRITE
  • Prompt: ?17,"Clm:",Y," ",$$HDT^ABMDUTL($P(ABMP(0),U,2))," "
  • Line Location: DICW+4
Function Call: WRITE
  • Prompt: $E($P($G(^ABMDVTYP($P(ABMP(0),U,7),0)),U),1,12)
  • Line Location: DICW+5
Function Call: WRITE
  • Prompt: ?51,$E($P($G(^DIC(40.7,$P(ABMP(0),U,6),0)),U),1,15),?68,$E($P($G(^AUTTLOC($P(ABMP(0),U,3),0)),U,2),1,12)
  • Line Location: DICW+6
Function Call: WRITE
  • Prompt: !?25,$E($P($G(^AUTNINS($P(ABMP(0),U,8),0)),U),1,30)
  • Line Location: DICW+7
Function Call: WRITE
  • Prompt: ?57,$E($P($P($P(^(0),U,3),$P(ABMP(0),U,4)_":",2),";"),1,20)
  • Line Location: DICW+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: CLM1+0
Function Call: WRITE
  • Prompt: !
  • Line Location: MULT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: MULT+3
Routine Call
  • DIC
  • Line Location:
    • CLM+8
    • CLM+15
    • PAT+2
    • CLM1+8
    • SELO
Routine Call
  • DIR
  • Line Location:
    • CLM+4
    • CLM+17
    • SEL+3
    • CLM1+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNPAT - [#9000001] Classic Fileman Calls
^ABMDCLM - [#9002274.3] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDCLM - [#9002274.3] CLM+11, CLM+12, PAT+8, PAT+9, PAT+15
^ABMDVTYP - [#9002274.8] PAT+18, DICW+5
^AUPNPAT - [#9000001] DICW+2
^AUTNINS - [#9999999.18] PAT+21, DICW+7
^AUTTLOC - [#9999999.06] PAT+20, DICW+2, DICW+6
^DD(9002274.3 PAT+4, DICW+8
^DIC(40.7 - [#40.7] PAT+19, DICW+6
^DPT - [#2] PAT+5, DICW+1

Label References

Name Line Occurrences
CLM PAT+3, PAT+25
CLM1 CLM1+9
SEL PAT+23, PAT+24
SELO SELO+2
XIT CLM+19, PAT+26, CLM1+7, CLM1+10, SELO+5

Naked Globals

Name Field # of Occurrence
^(0 DICW+1, DICW+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%P CLM1!
ABM CLM1+6!, XIT!, MULT+3*, SELO
ABM( PAT+15*
ABM("=" PAT+6*
ABM("C" MULT+2*
ABM("CNT" PAT+8*, PAT+10, PAT+11*, PAT+12*, PAT+13, PAT+23, PAT+24, SEL+3, SEL+4
ABM("D" CLM1+1*
ABM("D0" CLM1+1*
ABM("E" SELO*
ABM("INPUT" CLM+6*, PAT+1
ABM("P0" PAT+5*
ABM("STATUS" PAT+4*, PAT+16
ABM("ZERO" PAT+15*
ABM(2 PAT+17
ABM(3 PAT+20
ABM(4 PAT+16*, PAT+22
ABM(6 PAT+19
ABM(7 PAT+18
ABM(8 PAT+21
>> ABMM( SELO+3*
>> ABMP("CDFN" CLM+1!, CLM+10*, CLM+14*, CLM+18!, CLM+19, PAT+8, PAT+25, SEL+1, SEL+4*, CLM1+9*
>> ABMP("PDFN" PAT+5*, PAT+7, PAT+8, PAT+10
>> ABMP(0 DICW+1, DICW+2, DICW+3, DICW+4, DICW+5, DICW+6, DICW+7, DICW+8, DICW+10!
>> AUPNLK("ALL" PAT+1*, XIT!, MULT+1*
DIC CLM+8*, CLM+15*, PAT+1*, CLM1!, CLM1+8*!, MULT+2!*, SELO+4!
DIC("A" SELO*
DIC("W" CLM+13*
DIC(0 CLM+8*, CLM+15*, PAT+1*, CLM1+8*, MULT+2*, SELO*
DIR CLM+4!, CLM+17!, SEL+3!, CLM1!, CLM1+6!
DIR("?" CLM+3*, CLM1*, CLM1+2*, CLM1+3*, CLM1+4*
DIR("??" CLM1+5*
DIR("A" CLM+2*, CLM+16*, SEL+3*, CLM1*
DIR("B" CLM+16*
DIR(0 CLM+4*, CLM+16*, SEL+3*, CLM1*
>> DIROUT CLM1+7
DIRUT CLM+5, PAT+8, SEL+5!, CLM1+7
>> DIW DICW+9*
>> DTOUT SEL+5, CLM1+7, MULT+3, SELO+1
>> DUOUT CLM1+7, MULT+3, SELO+1
DUZ(2 CLM+11, CLM+12, PAT+8, PAT+9, PAT+15, DICW+2
>> DZ DICW+1, DICW+3
>> I PAT+8*, PAT+9, PAT+12, PAT+14, PAT+15
IOSL SEL+2
J PAT+15~*
U CLM+12, PAT+15, PAT+18, PAT+19, PAT+20, PAT+21, DICW+1, DICW+2, DICW+4, DICW+5
, DICW+6, DICW+7, DICW+8
>> X CLM+8*, CLM+15*, PAT+1*, DICW+3, MULT+3, SELO+1
>> Y CLM+6, CLM+7, CLM+8, CLM+9, CLM+10, CLM+11, CLM+12, CLM+14, CLM+15, CLM+18
, PAT+3, PAT+5, SEL+4, SEL+5, DICW+4, CLM1+9, SELO+2, SELO+3
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