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 |  All
Print Page as PDF
Routine: ABMDE2A

Package: Third Party Billing

Routine: ABMDE2A


Information

ABMDE2A ; IHS/SD/SDR - PAGE 2 - INSURER VIEW OPTION ;

Source Information

Source file <ABMDE2A.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Third Party Billing 4 SUM^ABMDE1  SEL^ABMDE2X  ^ABMDERR  $$SDT^ABMDUTL  
VA Fileman 2 $$GET1^DIQ  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
V1 ; view
V2 ;
XIT ;
ERR ;

External References

Name Field # of Occurrence
SUM^ABMDE1 V2+8
SEL^ABMDE2X V2+6
^ABMDERR ERR+1
$$SDT^ABMDUTL V2+50
$$GET1^DIQ V2+32, V2+42
^DIR V1+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Insurer..: ",$E($P($G(^AUTNINS(ABMT("INS"),0)),U),1,30)
  • Line Location: V2+12
Function Call: WRITE
  • Prompt: ?45,"Phone....: ",$P(ABMV("X1"),U,2)
  • Line Location: V2+13
Function Call: WRITE
  • Prompt: !,"Prov. No.: ",$P(ABMV("X1"),U,7)
  • Line Location: V2+14
Function Call: WRITE
  • Prompt: ?45,"Contact..: ",$E($P(ABMV("X1"),U,3),1,24)
  • Line Location: V2+15
Function Call: WRITE
  • Prompt: !,"TIN......: ",$P($G(^AUTNINS($P(ABMV("X1"),";"),0)),U,11)
  • Line Location: V2+16
Function Call: WRITE
  • Prompt: !,"*UNBILLABLE* for reason ",$P($G(^ABMDCS($P($G(ABML(ABMPRI,Y)),U,6),0)),U)
  • Line Location: V2+21
Function Call: WRITE
  • Prompt: !,ABMV
  • Line Location: V2+26
Function Call: WRITE
  • Prompt: !
  • Line Location: V2+31
Function Call: WRITE
  • Prompt: $S($P($P(ABMV("X1"),U),";",2)="MEDICARE":"Medicare Number....: ",$$GET1^DIQ(9999999.181,$$GET1^DIQ(9999999.18,+ABMV("X1"),".211","I"),1,"I")="V":"VMBP Enrollment Number..: ",1:"Policy Number...: ")
  • Line Location: V2+32
Function Call: WRITE
  • Prompt: $P(ABMV("X1"),U,4)
  • Line Location: V2+33
Function Call: WRITE
  • Prompt: ?45,"Rate Code.......:",$P($G(ABMV("X1")),U,13)
  • Line Location: V2+36
Function Call: WRITE
  • Prompt: !,ABMV
  • Line Location: V2+52
Function Call: WRITE
  • Prompt: !,"Policy Holder.: ",$P($P(ABMV("X2"),U),";",2)
  • Line Location: V2+53
Function Call: WRITE
  • Prompt: ?48,"Relationship..: ",$P($P(ABMV("X2"),U,2),";",2)
  • Line Location: V2+54
Function Call: WRITE
  • Prompt: !?16,$P(ABMV("X2"),U,3)
  • Line Location: V2+55
Function Call: WRITE
  • Prompt: ?48,"Home Phone....: ",$P(ABMV("X2"),U,5)
  • Line Location: V2+56
Function Call: WRITE
  • Prompt: !?16,$P(ABMV("X2"),U,4)
  • Line Location: V2+57
Function Call: WRITE
  • Prompt: !!?3,"Employer...: ",$P(ABMV("X3"),U)
  • Line Location: V2+58
Function Call: WRITE
  • Prompt: ?48,"Empl. Status..: ",$P($P(ABMV("X3"),U,5),";",2)
  • Line Location: V2+59
Function Call: WRITE
  • Prompt: !?16,$P(ABMV("X3"),U,2)
  • Line Location: V2+60
Function Call: WRITE
  • Prompt: ?48,"Work Phone....: ",$P(ABMV("X3"),U,4)
  • Line Location: V2+61
Function Call: WRITE
  • Prompt: !?16,$P(ABMV("X3"),U,3)
  • Line Location: V2+62
Function Call: WRITE
  • Prompt: !
  • Line Location: ERR+2
Routine Call
  • DIR
  • Line Location:
    • V1+9

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)
^ABMDCLM - [#9002274.3] V2+5, V2+11, V2+22, V2+24
^ABMDCS - [#9002274.02] V2+21
^AUTNINS - [#9999999.18] V2+12, V2+16, V2+24

Label References

Name Line Occurrences
ERR V2+37
V2 V1+1, V1+3
XIT V1+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM XIT+1!
ABM("XIEN" V2+2*, V2+11, V2+22, V2+24
ABM("Y" ERR+3*
>> ABMCOV V2+46*, V2+47*, V2+48, V2+49, V2+51
>> ABMEDT V2+48*, V2+50
>> ABMEEDT V2+49*, V2+50
>> ABML( V2+18, V2+19, V2+20, V2+21
>> ABMP("CDFN" V2+3, V2+5, V2+11, V2+22, V2+24
>> ABMP("COV" V2+47, V2+48, V2+49
>> ABMP("GL" V2+3*
>> ABMPFLG V2+17*, V2+18, V2+19*, V2+20*, V2+21
>> ABMPRI V2+17*, V2+18*, V2+19, V2+20, V2+21
>> ABMT("INS" V2+11*, V2+12
>> ABMV V2+9*, V2+26, V2+52
>> ABMV("X1" V2+13, V2+14, V2+15, V2+16, V2+32, V2+33, V2+36, V2+42
>> ABMV("X2" V2+37, V2+53, V2+54, V2+55, V2+56, V2+57
>> ABMV("X3" V2+43, V2+44, V2+58, V2+59, V2+60, V2+61, V2+62
>> ABMZ( V2+1
>> ABMZ("ITEM" V1+7
>> ABMZ("NUM" V1+1, V1+3, V1+6
>> ABMZ("TITL" V2+7*
DIR V1+5!, V1+10!
DIR("?" V1+7*
DIR("A" V1+8*
DIR(0 V1+6*
>> DIROUT V1+11
>> DTOUT V1+11
>> DUOUT V1+11
DUZ(2 V2+5, V2+11, V2+22, V2+24
U V2+1, V2+5, V2+11, V2+12, V2+13, V2+14, V2+15, V2+16, V2+21, V2+22
, V2+24, V2+32, V2+33, V2+36, V2+43, V2+44, V2+48, V2+49, V2+53, V2+54
, V2+55, V2+56, V2+57, V2+58, V2+59, V2+60, V2+61, V2+62
>> Y V1+1, V1+2*, V1+4*, V1+11, V2+1*, V2+2, V2+5*, V2+19, V2+20, V2+21
, ERR+3
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 |  All