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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: ABMDFRDO

Package: Third Party Billing

Routine: ABMDFRDO


Information

ABMDFRDO ; IHS/ASDST/DMJ - Re-Print Selected Bills ;

Source Information

Source file <ABMDFRDO.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Third Party Billing 7 BENT^ABMDBDIC  ^ABMDBRUN  (ENT,UB82)^ABMDF1  ^ABMDF1X  (ENT,HCFA)^ABMDF2  ^ABMDF2X  WTOT^ABMDFUTL  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA Fileman 2 ^DIC  ^DIR  
IHS VA Utilities 1 ^XBFMK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Third Party Billing 1 ABMRSUBN  

Entry Points

Name Comments DBIA/ICR reference
HCFA ;
CKMULT ; check if form is used for multiple bills
UB82 ;
TSK ; Taskman Entry Point
UNPD ;UN-PAID BILLS
BATCH ;
FORMS ; Reprint Forms
OUT ;
QUE2 ;
ENT ;
XIT ;
SEL ;
ZIS ;EP

External References

Name Field # of Occurrence
^%ZIS ZIS+58
HOME^%ZIS ZIS+62
^%ZISC OUT+1
^%ZTLOAD QUE2+5
BENT^ABMDBDIC SEL+10
^ABMDBRUN UNPD+1
ENT^ABMDF1 UB82+2
UB82^ABMDF1 UB82+3
^ABMDF1X UB82+2
ENT^ABMDF2 HCFA+1
HCFA^ABMDF2 HCFA+4
^ABMDF2X HCFA+3
WTOT^ABMDFUTL XIT+1
^DIC BATCH+6
^DIR ABMDFRDO+19, ZIS+25, ZIS+47
^XBFMK ZIS+42

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Re-Print Bills for:"
  • Line Location: ABMDFRDO+15
Function Call: WRITE
  • Prompt: !
  • Line Location: BATCH+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: SEL+1
Function Call: WRITE
  • Prompt: !!,"For the parameters specified, the"
  • Line Location: UNPD+3
Function Call: WRITE
  • Prompt: !," Number of Bills to Reprint: ",ABMP("CNT")
  • Line Location: UNPD+4
Function Call: WRITE
  • Prompt: *7
  • Line Location: UNPD+5
Function Call: WRITE
  • Prompt: !!?15,"(NOTE: "
  • Line Location: ZIS+51
Function Call: WRITE
  • Prompt: "Plain Paper needs"
  • Line Location: ZIS+52
Function Call: WRITE
  • Prompt: $P(ABMY("FORM"),U,2)," forms need"
  • Line Location: ZIS+53
Function Call: WRITE
  • Prompt: " to be loaded in the printer.)"
  • Line Location: ZIS+54
Function Call: WRITE
  • Prompt: !!
  • Line Location: ZIS+55
Function Call: WRITE
  • Prompt: !,"Cannot Queue to Screen or Slave Printer!",!
  • Line Location: QUE2+1
Function Call: WRITE
  • Prompt: !,"(Job Queued, Task Number: ",ZTSK,")"
  • Line Location: QUE2+6
Routine Call
  • %ZIS
  • Line Location:
    • ZIS+62
Routine Call
  • DIC
  • Line Location:
    • BATCH+6
Routine Call
  • DIR
  • Line Location:
    • ABMDFRDO+19
    • ZIS+25
    • ZIS+47
Routine Call
  • %ZIS
  • Line Location:
    • ZIS+58

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ABMDTXST - [#9002274.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ABMDBILL( SEL+17, ENT+7, ENT+9, CKMULT+1, CKMULT+3, CKMULT+5
^ABMDEXP - [#9002274.08] BATCH+10, SEL+18, ZIS+2, ZIS+52, CKMULT+1, CKMULT+5
^ABMDTXST - [#9002274.6] BATCH+10, BATCH+11

Label References

Name Line Occurrences
@( FORMS+2
BATCH BATCH+8
CKMULT SEL+13
ENT ZIS+66
FORMS ENT+5, ENT+11
OUT QUE2+7, ENT+1, ENT+12
QUE2 ZIS+61
SEL ABMDFRDO+21, SEL+14, SEL+16, SEL+19
UNPD ABMDFRDO+21
XIT ABMDFRDO+21, BATCH+8, SEL+11, SEL+12, UNPD+5, ZIS+59
ZIS BATCH+12, SEL+12, QUE2+1

Naked Globals

Name Field # of Occurrence
^(0 BATCH+10, BATCH+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS ZIS+57*
>> %ZIS("A" ZIS+56*
>> ABM QUE2+4*
>> ABM("E" SEL+6*, SEL+7
ABMP ABMDFRDO+12!, XIT+2!
ABMP("BDFN" SEL+12, SEL+14, SEL+15, SEL+17, ENT+4*, ENT+10*, CKMULT+1, CKMULT+3, CKMULT+5, CKMULT+9!
ABMP("CNT" UNPD+4
ABMP("EXP" ZIS+40*, ZIS+52, FORMS+2
ABMP("PAYED" FORMS+1!
ABMP("PRINTDT" ZIS+49*
ABMP("Q" TSK+1*
ABMP("XMIT" ABMDFRDO+13*, BATCH+9*
>> ABMR UB82+3
>> ABMR("" HCFA+2, HCFA+4
>> ABMR("MORE" HCFA+2*
ABMY ABMDFRDO+12!, SEL+5*, SEL+6, SEL+7, SEL+9, SEL+12, SEL+14*, SEL+16, ENT+2*, ENT+3*
, ENT+4, ENT+6*, ENT+7*, ENT+9, ENT+10, XIT+2!
ABMY( SEL+15*, ENT+3
ABMY("BATCH" BATCH+9*, BATCH+11, ENT+1, ENT+7
ABMY("EXP" SEL+17*, SEL+18, ZIS+1*, ZIS+2
ABMY("FORM" BATCH+10*, BATCH+11*, SEL+18*, ZIS+1, ZIS+6, ZIS+14, ZIS+17, ZIS+27*, ZIS+28*, ZIS+30*
, ZIS+40, ZIS+53, FORMS+2, UB82+1
ABMY("TOT" ABMDFRDO+14*, UNPD+2*, XIT+1
ABMY(0 UNPD+5
DIC BATCH+2!, BATCH+3*, SEL+2!, SEL+3*, ZIS+3!
DIC("A" BATCH+5*, BATCH+7!, SEL+7*
DIC("S" SEL+8*, SEL+9*
DIC(0 BATCH+4*, SEL+4*
DIE ZIS+3!
DIQ XIT+2!
DIR ABMDFRDO+16!, ABMDFRDO+20!, ZIS+3!, ZIS+25!, ZIS+47!
DIR("A" ABMDFRDO+18*, ZIS+4*, ZIS+45*
DIR("B" ZIS+11*, ZIS+15*, ZIS+22*, ZIS+46*
DIR(0 ABMDFRDO+17*, ZIS+12*, ZIS+16*, ZIS+23*, ZIS+44*
>> DIROUT ABMDFRDO+21
>> DIRUT ABMDFRDO+21
>> DTOUT BATCH+8, SEL+11
>> DUOUT BATCH+8, SEL+11
DUZ(2 BATCH+10, BATCH+11, SEL+17, ENT+7, ENT+9, CKMULT+1, CKMULT+3, CKMULT+5
IO ZIS+60, ZIS+65, QUE2+1
IO("S" ZIS+64
IO(0 ZIS+60, ZIS+63, QUE2+1
>> IOT ZIS+60
>> POP ZIS+59
U BATCH+10, BATCH+11, SEL+17, SEL+18, ZIS+6, ZIS+14, ZIS+17, ZIS+27, ZIS+28, ZIS+30
, ZIS+52, ZIS+53, ENT+9, CKMULT+1, CKMULT+3, CKMULT+5
X BATCH+8, ZIS+3!
Y ABMDFRDO+21, BATCH+8, BATCH+9, BATCH+10, ZIS+3!, ZIS+27, ZIS+28, ZIS+30, ZIS+49
>> ZTDESC QUE2+3*
>> ZTRTN QUE2+2*
>> ZTSAVE( QUE2+4*
>> ZTSK QUE2+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All