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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ABMDES4

Package: Third Party Billing

Routine: ABMDES4


Information

ABMDES4 ; IHS/ASDST/DMJ - ADA Form Dental Charge Summary ;

Source Information

Source file <ABMDES4.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Third Party Billing 3 $$CPT^ABMCVAPI  $$HDT^ABMDUTL  $$EN^ABMVDF  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
WRT ;
XIT ;
HD ;
; SCREEN HEADER

External References

Name Field # of Occurrence
$$CPT^ABMCVAPI WRT+6, WRT+13, WRT+15, WRT+42, WRT+49, WRT+51
$$HDT^ABMDUTL WRT+14, WRT+35, WRT+50, WRT+85
$$EN^ABMVDF HD+3
^DIR ABMDES4+21

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ABMDES4+19
Function Call: WRITE
  • Prompt: $$EN^ABMVDF("IOF")
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !?15,"***** ADA FORM DENTAL CHARGE SUMMARY *****"
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: !!,"Active Insurer: ",$P($G(^AUTNINS(ABMP("INS"),0)),U),!
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !!?2,"Tooth",?9,"Surface",?20,"Description of Service",?52,"Date",?60,"ADA Code",?73,"Fee"
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !,"-------------------------------------------------------------------------------"
  • Line Location: HD+7
Function Call: WRITE
  • Prompt: !
  • Line Location: WRT+4
Function Call: WRITE
  • Prompt: !
  • Line Location: WRT+40
Function Call: WRITE
  • Prompt: !
  • Line Location: WRT+55
Routine Call
  • DIR
  • Line Location:
    • ABMDES4+21

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDCLM - [#9002274.3] ABMDES4+14, WRT+5, WRT+21, WRT+41, WRT+58, WRT+59
^ADEOPS - [#9002010.03] WRT+30, WRT+31
^AUTNINS - [#9999999.18] HD+5
^AUTTADA - [#9999999.31] WRT+34, WRT+36
^PSDRUG - [#50] WRT+66

Label References

Name Line Occurrences
HD ABMDES4+15, WRT+11, WRT+26, WRT+47, WRT+82
WRT ABMDES4+17
XIT ABMDES4+16

Naked Globals

Name Field # of Occurrence
^( WRT+5, WRT+21, WRT+41
^(0 WRT+66

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABM ABMDES4+13~, WRT+3*, WRT+5*, WRT+20*, WRT+21*, WRT+39*, WRT+41*
ABM( WRT+59*
ABM("C" WRT+20*
ABM("CHRG" WRT+7*, WRT+8*, WRT+9, WRT+16, WRT+22*, WRT+23*, WRT+24, WRT+37, WRT+43*, WRT+44*
, WRT+45, WRT+52
ABM("TCHRG" WRT+2*, WRT+9*, WRT+24*, WRT+45*, WRT+77*, WRT+91, WRT+93*, WRT+95, WRT+96
ABM(0 WRT+5*, WRT+6, WRT+7, WRT+8, WRT+13, WRT+14, WRT+15, WRT+21*, WRT+22, WRT+23
, WRT+28, WRT+29, WRT+33, WRT+34, WRT+35, WRT+36, WRT+41*, WRT+42, WRT+43, WRT+44
, WRT+49, WRT+50, WRT+51
ABM(1 WRT+60, WRT+61, WRT+62, WRT+65, WRT+66
ABM(2 WRT+60, WRT+61, WRT+62, WRT+65, WRT+66
ABM(3 WRT+62, WRT+63
ABM(4 WRT+63
ABM(5 WRT+63
ABM(6 WRT+63*, WRT+64*, WRT+65
>> ABMCNTR WRT+60*, WRT+61, WRT+62, WRT+65, WRT+66, WRT+74*, WRT+75*, WRT+76, WRT+79, WRT+80
, WRT+81
>> ABMED WRT+71*, WRT+72*, WRT+75, WRT+76, WRT+79, WRT+80, WRT+81
>> ABMOPS WRT+29*, WRT+30, WRT+31
>> ABMP("CDFN" ABMDES4+14, WRT+5, WRT+21, WRT+41, WRT+58, WRT+59
>> ABMP("EXP" WRT+96*
>> ABMP("FLAT" WRT+92, WRT+93
>> ABMP("INS" HD+5
>> ABMP("VDT" WRT+6, WRT+13, WRT+15, WRT+42, WRT+49, WRT+51
>> ABMQUIET ABMDES4+18, HD+2, WRT+4, WRT+10, WRT+25, WRT+40, WRT+46, WRT+55, WRT+78, WRT+89
, WRT+94
>> ABMRCD WRT+69*, WRT+70*, WRT+72, WRT+75, WRT+76, WRT+79, WRT+80, WRT+81
ABMRV WRT+56~
ABMRV( WRT+60, WRT+61*, WRT+62*, WRT+65*, WRT+66*, WRT+70, WRT+72, WRT+75, WRT+76, WRT+79
, WRT+80, WRT+81
>> ABMRX WRT+79*, WRT+84
>> ABMRXCHG WRT+76*, WRT+77, WRT+87
>> ABMRXDT WRT+80*, WRT+85
>> ABMRXQTY WRT+81*, WRT+86
>> ABMTMP WRT+30*, WRT+31*, WRT+32
>> DA WRT+57*, WRT+58*, WRT+59
DIR ABMDES4+22!
DIR(0 ABMDES4+20*
DUOUT ABMDES4+16, XIT+1!, WRT+11, WRT+21, WRT+26, WRT+47, WRT+72, WRT+82
DUZ(2 ABMDES4+14, WRT+5, WRT+21, WRT+41, WRT+58, WRT+59
IOSL ABMDES4+19, WRT+11, WRT+26, WRT+47, WRT+82
>> J WRT+59*
U HD+5, WRT+6, WRT+7, WRT+8, WRT+13, WRT+14, WRT+15, WRT+22, WRT+23, WRT+28
, WRT+29, WRT+30, WRT+31, WRT+33, WRT+34, WRT+35, WRT+36, WRT+42, WRT+43, WRT+44
, WRT+49, WRT+50, WRT+51, WRT+59, WRT+61, WRT+62, WRT+65, WRT+66, WRT+76, WRT+79
, WRT+80, WRT+81, WRT+93
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All