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

Package: Integrated Billing

Routine: IBCOIVM


Information

IBCOIVM ;ALB/NLR - IVM BILLING ACTIVITY ; 28-APR-94

Source Information

Source file <IBCOIVM.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  
Integrated Billing 1 ^IBCOIVM1  
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: 2

Package Total Caller Graph
Integrated Billing 2 IB OUTPUT IVM BILLING ACTIVITY  IBYHPRE  

Entry Points

Name Comments DBIA/ICR reference
EN ; Entry point to generate list of patients with policies identified
; through IVM Center, including total amounts billed and collected
DEVICE ; Select device for queueing/printing report
ENQ ; Cleanup
PROD() ; Is this the production account? Output: 1 - YES, 0 - NO
HLPIVM ; Help for sending report to the IVM Center.

External References

Name Field # of Occurrence
^%ZIS DEVICE+2
HOME^%ZIS DEVICE+6
^%ZTLOAD DEVICE+5
^DIR EN+14
^IBCOIVM1 DEVICE+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?6,"This report will generate a list of patients who have policies"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !?6,"that were identified through the IVM Center. For all bills"
  • Line Location: EN+4
Function Call: WRITE
  • Prompt: !?6,"generated against these policies, individual and total amounts"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !?6,"billed and collected will be indicated. If you are running"
  • Line Location: EN+6
Function Call: WRITE
  • Prompt: !?6,"this report in your Production account, you will have the"
  • Line Location: EN+7
Function Call: WRITE
  • Prompt: !?6,"opportunity to transmit this report to the IVM Center."
  • Line Location: EN+8
Function Call: WRITE
  • Prompt: !
  • Line Location: EN+13
Function Call: WRITE
  • Prompt: !!?6,"Please note that this output requires 132 columns.",!
  • Line Location: DEVICE+1
Function Call: WRITE
  • Prompt: !!,$S($D(ZTSK):"This job has been queued as task #"_ZTSK_".",1:"Unable to queue this job.")
  • Line Location: DEVICE+5
Function Call: WRITE
  • Prompt: !!,"The IVM Center has identified insurance policies for a"
  • Line Location: HLPIVM+1
Function Call: WRITE
  • Prompt: !,"large number of patients, and wishes to track amounts"
  • Line Location: HLPIVM+2
Function Call: WRITE
  • Prompt: !,"billed and collected against these policies. The data"
  • Line Location: HLPIVM+3
Function Call: WRITE
  • Prompt: !,"will be compiled nationally and will assist the IVM Center"
  • Line Location: HLPIVM+4
Function Call: WRITE
  • Prompt: !,"in meeting its goals. Even if you are planning to transmit"
  • Line Location: HLPIVM+5
Function Call: WRITE
  • Prompt: !,"a report to the IVM Center, you should run the report"
  • Line Location: HLPIVM+6
Function Call: WRITE
  • Prompt: !,"once without transmitting to check the results. You may"
  • Line Location: HLPIVM+7
Function Call: WRITE
  • Prompt: !,"then re-run the report and transmit it to the IVM Center."
  • Line Location: HLPIVM+8
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+2
Routine Call
  • %ZIS
  • Line Location:
    • DEVICE+6
Routine Call
  • DIR
  • Line Location:
    • EN+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^XMB("NETNAME" PROD+1

Label References

Name Line Occurrences
$$PROD EN+11
DEVICE EN+11
ENQ EN+14, DEVICE+2, DEVICE+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS DEVICE+2*
DIR EN+14!
DIR("?" EN+13*
DIR("A" EN+13*
DIR("B" EN+13*
DIR(0 EN+13*
DIROUT ENQ+1!
DIRUT EN+14, ENQ+1!
DTOUT ENQ+1!
DUOUT EN+14, ENQ+1!
I ENQ+1!
IBFLG EN+11*, EN+14*, ENQ+1!
IO DEVICE+8
IO("Q" DEVICE+3, DEVICE+6!
>> POP DEVICE+2
X PROD+1~*, PROD+2
>> Y EN+14
ZTDESC DEVICE+4*, ENQ+1!
ZTREQ ENQ+1!
ZTRTN DEVICE+4*, ENQ+1!
ZTSAVE ENQ+1!
ZTSAVE("IBFLG" DEVICE+4*
ZTSK DEVICE+5, DEVICE+6!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All