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

Package: Integrated Billing

Routine: IBJDI2


Information

IBJDI2 ;ALB/CPM - VETERANS WITH UNVERIFIED ELIGIBILITY ;16-DEC-96

Source Information

Source file <IBJDI2.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Integrated Billing 5 DS^IBJD  E^IBJDE  ^IBJDI21  PSDR^IBODIV  DATE^IBOUTL  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Integrated Billing 1 IBJD INTAKE UNV ELIG  

Entry Points

Name Comments DBIA/ICR reference
EN ; - Option entry point.
DATE
DQ ; - Tasked entry point.
PROC
ENQ
ENQ1
DHLP ; - 'Sort by division' prompt.

External References

Name Field # of Occurrence
^%ZIS DATE+20
HOME^%ZIS DATE+26
^%ZISC ENQ+4
^%ZTLOAD DATE+24
^DIR DATE+5
DS^IBJD DATE+11
E^IBJDE DQ+2
^IBJDI21 PROC
PSDR^IBODIV DATE+8
DATE^IBOUTL DATE

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This report measures the number of patients who have been treated at the"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !,"facility but whose eligibility has not been verified. This report will"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,"also list patients with verified eligibility for at least 2 years, if any.",!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: !!,"You will need a 132 column printer for this report!"
  • Line Location: DATE+13
Function Call: WRITE
  • Prompt: !!,"This report only requires an 80 column printer."
  • Line Location: DATE+14
Function Call: WRITE
  • Prompt: !!,"Note: This report may take a while to run."
  • Line Location: DATE+16
Function Call: WRITE
  • Prompt: !?6,"You should queue this report to run after normal business hours.",!
  • Line Location: DATE+17
Function Call: WRITE
  • Prompt: !!,"Select: '<CR>' to print the trend report without regard to"
  • Line Location: DHLP+1
Function Call: WRITE
  • Prompt: !?15,"division"
  • Line Location: DHLP+2
Function Call: WRITE
  • Prompt: !?11,"'Y' to select those divisions for which a separate"
  • Line Location: DHLP+3
Function Call: WRITE
  • Prompt: !?15,"trend report should be created",!?11,"'^' to quit"
  • Line Location: DHLP+4
Routine Call
  • %ZIS
  • Line Location:
    • DATE+20
Routine Call
  • %ZIS
  • Line Location:
    • DATE+26
Routine Call
  • DIR
  • Line Location:
    • DATE+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] DQ+9, DQ+10
^TMP("IBDFN" DQ+6!, ENQ+1!
^TMP("IBJDI21" DQ+5!, ENQ!
^TMP("IBJDI22" DQ+5!, ENQ!
^TMP("IBJDI23" DQ+5!, ENQ!
^TMP($J DQ+6!, ENQ+1!

Label References

Name Line Occurrences
ENQ DATE, DATE+5, DATE+8, DATE+11, DATE+20, DATE+21
ENQ1 ENQ+2
PROC DQ+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% ENQ1+3!
%ZIS DATE+20*, ENQ1+3!
DFN ENQ1+2!
DIR DATE+6!, ENQ1+3!
DIR("?" DATE+3*
DIR("A" DATE+4*
DIR("B" DATE+3*
DIR(0 DATE+3*
DIROUT DATE+5, DATE+6!, ENQ1+3!
DIRUT DATE+5, DATE+6!, ENQ1+3!
DTOUT DATE+5, DATE+6!, ENQ1+3!
DUOUT DATE+5, DATE+6!, ENQ1+3!
I DATE+23*, DQ+9*, DQ+10, DQ+11*, ENQ1+2!
IB DQ+5!, ENQ1!
IB( DQ+10*
IB("ALL" DQ+11*
IBBDT DATE, ENQ1!
IBC DQ+7*, DQ+10, DQ+11, ENQ1+2!
IBD ENQ1!
IBDIV DQ+11*, ENQ1+2!
IBDN ENQ1!
IBDOD ENQ1!
IBDT ENQ1+1!
IBDTF ENQ1+1!
IBEDT DATE, ENQ1!
IBES ENQ1+1!
IBESD ENQ1+1!
IBLT ENQ1+1!
IBN ENQ1+2!
IBNEXT ENQ1+1!
IBNUMD ENQ1+1!
IBNUMO ENQ1+1!
IBOE ENQ1+1!
IBOED ENQ1+1!
IBPAG ENQ1!
IBPERD ENQ1+2!
IBPERO ENQ1+2!
IBPERP ENQ1+2!
IBPERV ENQ1!
IBPM ENQ1+1!
IBPMD ENQ1+1!
IBQ DQ+7*, ENQ1!
IBQUERY DQ+4~
IBQUERY1 DQ+4~
IBRPT DATE+11, DATE+13, ENQ1!
IBRUN ENQ1!
IBSORT DATE+5*, DATE+8, DQ+8, ENQ1+2!
IBX ENQ1!
>> IBXTRACT DQ+2
IBXX ENQ1!
IO DATE+28
IO("Q" DATE+21, DATE+26!
J DQ+10*, ENQ1+2!
K DQ+10*, ENQ1+2!
POP DATE+20, ENQ1+2!
U DQ+10, DQ+11
VAUTD DQ+9, ENQ1+2!
VAUTD( DQ+9
X ENQ1+3!
X1 ENQ1+3!
X2 ENQ1+3!
Y DATE+5, DATE+8, ENQ1+3!
ZTDESC DATE+22*, ENQ1+3!
>> ZTQUEUED ENQ+2
>> ZTREQ ENQ+2*
ZTRTN DATE+22*, ENQ1+3!
ZTSAVE ENQ1+3!
ZTSAVE( DATE+23*
ZTSK DATE+25, DATE+26!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All