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

Package: Third Party Billing

Routine: ABMDRAL4


Information

ABMDRAL4 ; IHS/ASDST/DMJ - Bills Cost Report ;

Source Information

Source file <ABMDRAL4.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Third Party Billing 2 WHD^ABMDRHD  PAZ^ABMDRUTL  

Entry Points

Name Comments DBIA/ICR reference
WSRT
XIT
HDB
PRINT ;EP for printing data
WLOC
HD

External References

Name Field # of Occurrence
WHD^ABMDRHD HDB
PAZ^ABMDRUTL HD

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+12
Function Call: WRITE
  • Prompt: $E(ABM("E"),1,30)
  • Line Location: PRINT+19
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+24
Function Call: WRITE
  • Prompt: ?58,$J($FN(ABM("P"),",",0),5)
  • Line Location: PRINT+42
Function Call: WRITE
  • Prompt: ?+ABM,$J($FN(ABM("P"),",",2),12)
  • Line Location: PRINT+43
Function Call: WRITE
  • Prompt: ?ABM," ----------"
  • Line Location: PRINT+46
Function Call: WRITE
  • Prompt: ?+ABM,$J($FN(ABM("M"_$P(ABM,U,2)),",",2),12)
  • Line Location: PRINT+48
Function Call: WRITE
  • Prompt: ?ABM," ----------"
  • Line Location: PRINT+50
Function Call: WRITE
  • Prompt: ?+ABM,$J($FN(ABM("S"_$P(ABM,U,2)),",",2),12)
  • Line Location: PRINT+52
Function Call: WRITE
  • Prompt: ?ABM," ==========="
  • Line Location: PRINT+55
Function Call: WRITE
  • Prompt: ?+ABM,$J($FN(ABM("T"_$P(ABM,U,2)),",",2),12)
  • Line Location: PRINT+57
Function Call: WRITE
  • Prompt: !?41,"Bill",?55,"Amount",?69,"Amount",?81,"Deductible",?95,"Write Off-",?110,"Residual",?121,"Collection"
  • Line Location: HDB+1
Function Call: WRITE
  • Prompt: !?10,"Insurer",?33,"HRN",?40,"Number",?55,"Billed",?70,"Paid",?81,"and Co-Ins",?95,"Adjustment",?110,"Balance",?121,"Percentage"
  • Line Location: HDB+2
Function Call: WRITE
  • Prompt: !,ABM("LINE")
  • Line Location: HDB+3
Function Call: WRITE
  • Prompt: !!?3,"Visit Location: ",ABM("L")
  • Line Location: WLOC+0
Function Call: WRITE
  • Prompt: !?7,"Visit Type: ",$E($P(^ABMDVTYP(ABM("V"),0),U),1,18)
  • Line Location: WSRT+0
Function Call: WRITE
  • Prompt: !?11,"Clinic: ",$E($P(^DIC(40.7,ABM("V"),0),U),1,18)
  • Line Location: WSRT+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( PRINT+29, PRINT+32
^ABMDVTYP - [#9002274.8] WSRT
^AUPNPAT - [#9000001] PRINT+30
^DIC(40.7 - [#40.7] WSRT+1
^TMP( PRINT+6, PRINT+10, PRINT+17, PRINT+22, PRINT+37, XIT!

Label References

Name Line Occurrences
HD PRINT+11, PRINT+18, PRINT+23
HDB PRINT+2
WLOC PRINT+8, PRINT+11, PRINT+18, PRINT+23
WSRT PRINT+13, PRINT+18, PRINT+23
XIT PRINT+17, PRINT+59

Naked Globals

Name Field # of Occurrence
^(0 PRINT+30

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ABM PRINT+3*, PRINT+7*, PRINT+14*, PRINT+29*, PRINT+30, PRINT+34*, PRINT+35, PRINT+38, PRINT+39, PRINT+40
, PRINT+41, PRINT+42, PRINT+43, PRINT+46*, PRINT+48*, PRINT+50*, PRINT+52*, PRINT+55*, PRINT+57*
>> ABM( PRINT+38*
>> ABM("AI" PRINT+20*, PRINT+24, PRINT+25*
>> ABM("B" PRINT+44
>> ABM("C" PRINT+20*, PRINT+22*, PRINT+29, PRINT+32, PRINT+37
>> ABM("CN" PRINT+15*, PRINT+26*, PRINT+45, PRINT+47
>> ABM("E" PRINT+15*, PRINT+17*, PRINT+19, PRINT+22, PRINT+37
>> ABM("I" PRINT+33*, PRINT+35*, PRINT+37
>> ABM("L" PRINT+4*, PRINT+6*, PRINT+10, PRINT+17, PRINT+22, PRINT+30, PRINT+37, WLOC
>> ABM("LINE" HDB+3*!
>> ABM("M" PRINT+14*, PRINT+41*, PRINT+48
>> ABM("MB" PRINT+49
>> ABM("MPD" PRINT+49
>> ABM("OE" PRINT+15*, PRINT+19
>> ABM("P" PRINT+37*, PRINT+38, PRINT+39, PRINT+40, PRINT+41, PRINT+42, PRINT+43
>> ABM("PD" PRINT+44
>> ABM("PG" PRINT+1*, HDB*
>> ABM("PRINT" PRINT+2
>> ABM("S" PRINT+7*, PRINT+40*, PRINT+52
>> ABM("SB" PRINT+53
>> ABM("SN" PRINT+7*, PRINT+27*, PRINT+51, PRINT+54
>> ABM("SPD" PRINT+53
>> ABM("SUBR" PRINT+6, PRINT+10, PRINT+17, PRINT+22, PRINT+37, XIT
>> ABM("T" PRINT+3*, PRINT+39*, PRINT+57
>> ABM("TB" PRINT+58
>> ABM("TN" PRINT+4*, PRINT+28*, PRINT+54, PRINT+56
>> ABM("TPD" PRINT+58
>> ABM("V" PRINT+4*, PRINT+7*, PRINT+10*, PRINT+17, PRINT+22, PRINT+37, WSRT, WSRT+1
>> ABM("VI" PRINT+10*, PRINT+12
>> ABMY("SORT" WSRT, WSRT+1
>> DIROUT HD
>> DTOUT HD
>> DUOUT PRINT+6, PRINT+10, PRINT+11, PRINT+17, PRINT+18, PRINT+22, PRINT+23, PRINT+34, HD*
DUZ(2 PRINT+29, PRINT+30, PRINT+32
IOSL PRINT+8, PRINT+11, PRINT+18, PRINT+23
U PRINT+29, PRINT+30, PRINT+32, PRINT+37, PRINT+38, PRINT+39, PRINT+40, PRINT+41, PRINT+48, PRINT+52
, PRINT+57, WSRT, WSRT+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All