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 |  Label References |  Local Variables |  All
Print Page as PDF
Routine: ABMDSTAT

Package: Third Party Billing

Routine: ABMDSTAT


Information

ABMDSTAT ; IHS/ASDST/DMJ - Display Processing Status ;

Source Information

Source file <ABMDSTAT.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Third Party Billing 1 $$MDT^ABMDUTL  
VA Fileman 1 (NOW,YX)^%DTC  

Entry Points

Name Comments DBIA/ICR reference
END ;EP for displaying Ending Time and Cleaning Variables
TEST
WRT ;EP for displaying the processing status
ERR3
ERR2
ERR1
HD ; EP for writing heading

External References

Name Field # of Occurrence
NOW^%DTC HD+5, WRT+8, END+3
YX^%DTC WRT+11
$$MDT^ABMDUTL HD+5, WRT+8, END+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,ABMXB
  • Line Location: HD+3
Function Call: WRITE
  • Prompt: !?5,"Records to Process: ",$FN(ABMXB("TOT-REC"),",",0),?40,"Start Time: "
  • Line Location: HD+4
Function Call: WRITE
  • Prompt: $$MDT^ABMDUTL(%)
  • Line Location: HD+5
Function Call: WRITE
  • Prompt: !,ABMXB
  • Line Location: HD+6
Function Call: WRITE
  • Prompt: !?55,"Estimated"
  • Line Location: HD+8
Function Call: WRITE
  • Prompt: !?11,"Records",?25,"Current",?40,"Percent",?55,"Completion"
  • Line Location: HD+9
Function Call: WRITE
  • Prompt: !?10,"Processed",?26,"Time",?40,"Complete",?58,"Time"
  • Line Location: HD+10
Function Call: WRITE
  • Prompt: !?7,"============================================================="
  • Line Location: HD+11
Function Call: WRITE
  • Prompt: !?17,0
  • Line Location: HD+12
Function Call: WRITE
  • Prompt: *8
  • Line Location: WRT+5
Function Call: WRITE
  • Prompt: $P($$MDT^ABMDUTL(%)," ",2,3),?40,$J(100*ABMXB("RATE"),5,1)," %"
  • Line Location: WRT+8
Function Call: WRITE
  • Prompt: $J($S(Y>12:Y-12,1:+Y),2),":",$P(Y,":",2)," ",$S(Y>12:"PM",1:"AM")
  • Line Location: WRT+13
Function Call: WRITE
  • Prompt: !,ABMXB
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !!?10,"Ending Time: ",$$MDT^ABMDUTL(%)
  • Line Location: END+4
Function Call: WRITE
  • Prompt: !!,*7,"ERROR: The variable ABMXB(""TOT-REC"") is UNDEFINED!"
  • Line Location: ERR1+0
Function Call: WRITE
  • Prompt: !!,*7,"ERROR: The variable ABMXB(""STIME"") is UNDEFINED!"
  • Line Location: ERR2+0
Function Call: WRITE
  • Prompt: !!,*7,"ERROR: The variable ABMXB(""CUR-REC"") is UNDEFINED!"
  • Line Location: ERR3+0

Label References

Name Line Occurrences
END TEST+2
ERR1 HD+2, WRT+2
ERR2 WRT+2
ERR3 WRT+2
HD TEST
WRT TEST+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % HD+5, WRT+8, END+4
>> %H WRT+11*
ABMXB HD+3*, HD+6, END+1*, END+2!
ABMXB("CUR-REC" WRT+2, WRT+4, WRT+6, WRT+7, TEST+1*
ABMXB("ETIME" WRT+10*, WRT+11
ABMXB("INCR" WRT+3*, WRT+4
ABMXB("J" WRT+5*
ABMXB("RATE" WRT+6*, WRT+8, WRT+9, WRT+10
ABMXB("STIME" HD+7*, WRT+2, WRT+10, WRT+11
ABMXB("TOT-REC" HD+2, HD+4, WRT+2, WRT+6, TEST*, TEST+1
>> Y WRT+12*, WRT+13
>> ZTQUEUED HD+1, WRT+1
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables |  All