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

Package: Third Party Billing

Routine: ABMDE2


Information

ABMDE2 ; IHS/ASDST/DMJ - Edit Page 2 - PAYERS ;

Source Information

Source file <ABMDE2.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Third Party Billing 6 (PAUSE,SUM)^ABMDE1  (,SEL)^ABMDE2X  ^ABMDE2X1  SEL^ABMDEOPT  ^ABMDERR  ^ABMDWARN  
VA Fileman 4 DD^%DT  ^DIK  $$GET1^DIQ  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
OPT ;
DISP ;
INS ;
INSR ; Insurer Info
XIT
HD ;
DXIT
D2
D3
LOOP ;LOOP HERE
D1 ;EP - Delete Insurer Multiple on claim

External References

Name Field # of Occurrence
DD^%DT DISP+87
PAUSE^ABMDE1 DISP+4, INSR+6, INS+6
SUM^ABMDE1 DISP+5
^ABMDE2X DISP+8
SEL^ABMDE2X INS+13
^ABMDE2X1 DISP+9
SEL^ABMDEOPT OPT+18
^ABMDERR LOOP+15
^ABMDWARN OPT+16
^DIK D3+4
$$GET1^DIQ DISP+92, INS+28
^DIR D1+9, D2+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: OPT+17
Function Call: WRITE
  • Prompt: $P($G(^ABMDEXP(+ABMV("X6"),0)),U)
  • Line Location: DISP+23
Function Call: WRITE
  • Prompt: $P($G(^ABMDEXP(+ABMV("X6"),0)),U)
  • Line Location: DISP+45
Function Call: WRITE
  • Prompt: ?40,"Export Mode.: "
  • Line Location: DISP+65
Function Call: WRITE
  • Prompt: $P($G(^ABMDEXP(+ABMV("X6"),0)),U)
  • Line Location: DISP+65
Function Call: WRITE
  • Prompt: ?40,"Export Mode.: ",$P(^ABMDEXP(ABMP("VTYP",999),0),U)
  • Line Location: DISP+66
Function Call: WRITE
  • Prompt: !,ABMX,!
  • Line Location: DISP+73
Function Call: WRITE
  • Prompt: "["_ABMMSPRS_"]-"_$$GET1^DIQ(9000037,ABMMSPSV,.04)
  • Line Location: DISP+92
Function Call: WRITE
  • Prompt: "NOT MSP ELIGIBLE"
  • Line Location: DISP+93
Function Call: WRITE
  • Prompt: !?13,"BILLING ENTITY",?39,"STATUS",?52,"POLICY HOLDER"
  • Line Location: HD+1
Function Call: WRITE
  • Prompt: !,?5,"==============================",?37,"==========",?49,"=============================="
  • Line Location: HD+2
Function Call: WRITE
  • Prompt: *7,!?5,"*** ERROR: No "_ABMZ("ITEM")_" Exists, at Least One is Required! ***",!
  • Line Location: LOOP+9
Function Call: WRITE
  • Prompt: !,"[",ABM("I"),"]"
  • Line Location: INS+19
Function Call: WRITE
  • Prompt: ?5,$P(ABMZ(ABM("I")),U)
  • Line Location: INS+23
Function Call: WRITE
  • Prompt: ?37,ABM("Y0")
  • Line Location: INS+24
Function Call: WRITE
  • Prompt: ?49,$P($P(ABMV("X2"),U),";",2)
  • Line Location: INS+25
Function Call: WRITE
  • Prompt: !,"Cannot delete only insurer on claim!"
  • Line Location: D2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: D2+1
Function Call: WRITE
  • Prompt: !,"Cannot delete active insurer!"
  • Line Location: D2+2
Routine Call
  • DIR
  • Line Location:
    • D1+9
    • D2+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNMSP - [#9000037] GET1^DIQ
^AUTNINS - [#9999999.18] GET1^DIQ
^AUTTINTY - [#9999999.181] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDCLM - [#9002274.3] OPT+6, OPT+7, OPT+12, DISP+32, DISP+53, LOOP+3, LOOP+4, LOOP+5, INS+1, INS+2
, INS+4, INS+20, INS+22
^ABMDEXP - [#9002274.08] DISP+45, DISP+46, DISP+65, DISP+66
^AUPNMSP - [#9000037] DISP+90, DISP+92
^AUPNMSP("C" DISP+74, DISP+78, DISP+80
^AUTNINS - [#9999999.18] INS+10, INS+22
^DD(9002274.3013 INS+17

Label References

Name Line Occurrences
@( OPT+21
D2 D1+1, D1+2
DISP OPT+10
DXIT D1+3, D1+11
HD INSR+7, INS+6
INS LOOP+6
INSR DISP+6
LOOP INSR+8
OPT OPT+23
XIT OPT+11, OPT+19, OPT+22

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT DISP+85!, DISP+89!
ABM OPT+1!, LOOP+2*, LOOP+3*, LOOP+4, XIT!
ABM( INS+30*
ABM("DO" OPT+20*, OPT+21
ABM("E" LOOP+12*, LOOP+13*, LOOP+14, INS+26*
ABM("I" LOOP+3*, INS+3, INS+9, INS+10, INS+19, INS+20, INS+22, INS+23
ABM("PRI" INS+29*, INS+30
ABM("X" LOOP+5*, INS+10, INS+11, INS+28
ABM("X0" INS+4*, INS+5, INS+7, INS+10, INS+15
ABM("XIEN" LOOP+4*, LOOP+5, INS+1, INS+2, INS+4, INS+10
ABM("Y" INS+15*, INS+16, INS+18, INS+26
ABM("Y0" INS+14*, INS+17*, INS+18*, INS+24
ABME OPT+1!, LOOP+10!
ABME( LOOP+14*, INS+26
ABME("CONT" LOOP+11*, LOOP+16!
ABMFLAG DISP+75!, DISP+77*, DISP+78, DISP+80*, DISP+81*, DISP+84, DISP+95!
ABMG OPT+1!, XIT!
ABMG( LOOP+13, LOOP+14, INS+26*
>> ABMITYP INS+28*, INS+29
ABMMSP DISP+75!, DISP+77*, DISP+78*, DISP+79, DISP+80, DISP+81, DISP+82, DISP+86
ABMMSPDT DISP+88*, DISP+91, DISP+97!
>> ABMMSPRS DISP+90*, DISP+92
ABMMSPSV DISP+75!, DISP+77*, DISP+79*, DISP+80*, DISP+82*, DISP+90, DISP+92, DISP+95!
>> ABMP("C0" DISP+6
>> ABMP("CDFN" OPT+6, OPT+7, OPT+12, DISP+7, DISP+32, DISP+53, LOOP+3, LOOP+4, LOOP+5, INS+1
, INS+2, INS+4, INS+12, INS+20, INS+22, D3+1
>> ABMP("DDL" DISP+3
>> ABMP("DFLT" OPT+12*, OPT+14*
>> ABMP("FLAT" DISP+38, DISP+42, DISP+49, DISP+59, DISP+63, DISP+69
>> ABMP("GL" DISP+7*, INS+12*
>> ABMP("OPT" OPT+4*, OPT+8*, OPT+15*
>> ABMP("OVER" OPT+22
>> ABMP("PDFN" DISP+74, DISP+78, DISP+80
>> ABMP("VDT" DISP+80, DISP+81
>> ABMP("VTYP" DISP+30, DISP+33, DISP+37, DISP+46, DISP+49, DISP+51, DISP+53, DISP+54, DISP+57, DISP+58
, DISP+65, DISP+66, DISP+68, DISP+69
ABMV OPT+1!
ABMV("X1" INS+20
ABMV("X2" INS+25
ABMV("X5" DISP+31, DISP+34, DISP+43, DISP+47, DISP+52, DISP+55, DISP+64, DISP+67
ABMV("X6" DISP+29, DISP+36, DISP+40, DISP+45, DISP+48, DISP+50, DISP+57, DISP+61, DISP+65, DISP+68
>> ABMW OPT+16
ABMX DISP+71*, DISP+72*, DISP+73, DISP+94, DISP+96!, DXIT!
ABMX("ANS" D2+1*, D2+2, D2+3, D3+2
>> ABMZ( INS+10*, INS+20, INS+22, INS+23, D2+2, D2+3, D3+2
>> ABMZ("DIC" INSR+4*
>> ABMZ("DR" INSR+2*, LOOP+8*
>> ABMZ("ITEM" INSR+3*, LOOP+9, D1+4, D1+7
>> ABMZ("LNUM" LOOP+1*, LOOP+8, INS+5*
>> ABMZ("NUM" OPT+2*, OPT+13, LOOP+1*, LOOP+9, INS+3*, D1+1, D1+2, D1+3, D1+6, D2
>> ABMZ("PG" OPT+9*, DISP+2*
>> ABMZ("SUB" INSR+1*, D3+3
>> ABMZ("TITL" DISP+1*
>> ABMZ("UNBILL" LOOP+1*, INS+8*, INS+9*
>> ABMZ("X" INSR+5*
>> ABMZ(1 LOOP+1*
>> DA D3+2*
>> DA(1 D3+1*, D3+3
>> DIK D3+3*
DIR D1+6!, D1+10!, D2+1!, D2+4!
DIR("?" D1+7*
DIR("A" D1+8*, D2+3*
DIR(0 D1+6*, D2+1*
>> DIROUT OPT+11, OPT+19, OPT+22, DISP+3, INSR+6, INS+6, D1+11, D2+5
>> DTOUT OPT+11, OPT+19, OPT+22, DISP+3, INSR+6, INS+6, D1+11, D2+5
>> DUOUT OPT+11, OPT+19, OPT+22, DISP+3, INSR+6, INS+6, D1+11, D2+5
DUZ(2 OPT+6, OPT+7, OPT+12, DISP+32, DISP+53, LOOP+3, LOOP+4, LOOP+5, INS+1, INS+2
, INS+4, INS+20, INS+22
IOSL DISP+3, INSR+6, INS+6
U OPT+12, DISP+6, DISP+29, DISP+31, DISP+34, DISP+36, DISP+40, DISP+42, DISP+43, DISP+45
, DISP+46, DISP+47, DISP+48, DISP+49, DISP+50, DISP+52, DISP+55, DISP+57, DISP+61, DISP+63
, DISP+64, DISP+65, DISP+66, DISP+67, DISP+68, DISP+69, DISP+90, DISP+92, LOOP+5, INS+2
, INS+5, INS+7, INS+10, INS+15, INS+17, INS+20, INS+22, INS+23, INS+25, D2+2
, D2+3, D3+2
>> Y OPT+19, OPT+20, DISP+86*, DISP+88, INS+11*, D1+1*, D1+2*, D1+11, D2+1, D3
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