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 |  Marked Items  | All
Print Page as PDF
Routine: IBEMTF

Package: Integrated Billing

Routine: IBEMTF


Information

IBEMTF ;ALB/CPM - FLAG STOP CODES, DISPOSITIONS, AND CLINICS ; 22-JUL-93

Source Information

Source file <IBEMTF.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 3 ^%DT  ^DIC  ^DIR  
Integrated Billing 1 (FILE,LIST,REV)^IBEMTF1  

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 IB MT FLAG OPT PARAMS  

Entry Points

Name Comments DBIA/ICR reference
EN ; Option entry point - main processing loop.
UPD ; Update the billable status for stop codes, dispositions, or clinics.
UPDQ
UPDQ1
DASH() ; Write a dashed line.
INFO ; Description of stop/disposition/clinic information listed below.
S ; Stop Code Information
D ; Disposition Information
C ; Clinic Information

External References

Name Field # of Occurrence
^%DT UPD+43
^DIC UPD+22
^DIR EN+5, UPD+9, UPD+38, UPD+52, UPD+56
FILE^IBEMTF1 UPD+55
LIST^IBEMTF1 UPD+47
REV^IBEMTF1 UPD+30

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Due to the new Means Test Copayment Tier, this option, is no longer used!",!!
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: @IOF,*13,?6,"Flag Stop Codes, Dispositions, and Clinics for Means Test Billing"
  • Line Location: UPD+1
Function Call: WRITE
  • Prompt: !,$$DASH(),!,"This option is used to set up Clinic Stop Codes, Dispositions, and Clinics"
  • Line Location: UPD+2
Function Call: WRITE
  • Prompt: !,"as either non-billable or billable for the Means Test Outpatient Copayment."
  • Line Location: UPD+3
Function Call: WRITE
  • Prompt: !!,"Use of this option will have an immediate effect on your billing operations,"
  • Line Location: UPD+4
Function Call: WRITE
  • Prompt: !,"so you should have your work pre-planned before using this option.",!,$$DASH()
  • Line Location: UPD+5
Function Call: WRITE
  • Prompt: !!,$$DASH(),!,"You may now enter the ",$P(IBINFO,";",3)," that you wish to flag. Please note"
  • Line Location: UPD+13
Function Call: WRITE
  • Prompt: !,"all ",$P(IBINFO,";",3)," that you select will be assigned the same effective"
  • Line Location: UPD+14
Function Call: WRITE
  • Prompt: !,"date and billable status.",!,$$DASH(),!
  • Line Location: UPD+15
Function Call: WRITE
  • Prompt: !,"Please note that you've already selected ",Y(0,0),"."
  • Line Location: UPD+23
Function Call: WRITE
  • Prompt: !!,"No ",$P(IBINFO,";",3)," selected!"
  • Line Location: UPD+27
Function Call: WRITE
  • Prompt: !!,"All ",$P(IBINFO,";",3)," were de-selected!"
  • Line Location: UPD+33
Function Call: WRITE
  • Prompt: !
  • Line Location: UPD+38
Function Call: WRITE
  • Prompt: !!,"Please note that you've selected a future date!"
  • Line Location: UPD+44
Function Call: WRITE
  • Prompt: !!,"Action to take => ",IBACT," billing for the following ",$P(IBINFO,";",3),":"
  • Line Location: UPD+47
Function Call: WRITE
  • Prompt: !
  • Line Location: UPD+47
Function Call: WRITE
  • Prompt: !!,"Filing these ",$P(IBINFO,";",4)," entries... "
  • Line Location: UPD+55
Function Call: WRITE
  • Prompt: !
  • Line Location: UPD+56
Routine Call
  • DIC
  • Line Location:
    • UPD+22
Routine Call
  • DIR
  • Line Location:
    • EN+5
    • UPD+9
    • UPD+38
    • UPD+52
    • UPD+56

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("IBEMTF" UPD+23, UPD+24*, UPD+27, UPD+33, UPDQ1!

Label References

Name Line Occurrences
$$DASH UPD+2, UPD+5, UPD+13, UPD+15
UPD EN+10
UPDQ UPD+9, UPD+27, UPD+30, UPD+33, UPD+38, UPD+43, UPD+52
UPDQ1 UPD+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT UPD+42*, UPD+43!
%DT("A" UPD+42*
DIC UPD+19*, UPD+22!
DIC("A" UPD+20*
DIC("S" UPD+21*
DIC(0 UPD+19*
DIR EN+5~, UPD+9!, UPD+38!, UPD+52!, UPD+56!
DIR("?" UPD+8*, UPD+37*, UPD+51*
DIR("A" UPD+9*, UPD+36*, UPD+50*
DIR(0 EN+5*, UPD+8*, UPD+36*, UPD+50*, UPD+56*
DIROUT EN+5~, UPDQ+1!
DIRUT EN+5~, UPD+9, UPD+38, UPD+52, UPD+56!, UPDQ, UPDQ+1!
DT UPD+44
DTOUT EN+5~, UPDQ+1!
DUOUT EN+5~, UPD+9, UPD+38, UPD+52, UPD+56!, UPDQ, UPDQ+1!
IBACT UPD+39*, UPD+42, UPD+47, UPDQ+1!
IBDAT UPD+43*, UPDQ+1!
IBFILE UPD+39*, UPDQ+1!
IBHIT UPD+18*, UPD+20, UPD+22*, UPDQ+1!
IBINFO UPD+10*, UPD+13, UPD+14, UPD+19, UPD+20, UPD+21, UPD+27, UPD+33, UPD+36, UPD+47
, UPD+55, UPDQ+1!
IBNUM UPD+18*, UPD+24*, UPD+30, UPD+36, UPDQ+1!
IBQ EN+10*, EN+11!, UPD+27*, UPD+30, UPDQ*
IOF UPD+1
X EN+5~
Y EN+5~, UPD+18, UPD+22, UPD+23, UPD+24, UPD+39, UPD+43, UPD+44, UPD+52
Y(0 UPD+23, UPD+24

Marked Items

Name Field # of Occurrence
$T(@Y+1 UPD+10
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All