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

Package: Integrated Billing

Routine: IBCNQ1


Information

IBCNQ1 ;ALB/CPM - OUTPATIENT VISIT DATE INQUIRY ; 31-JUL-91

Source Information

Source file <IBCNQ1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA FileMan 2 ^DIC  ^DIR  
Integrated Billing 1 VIEW^IBCNQ  
Kernel 1 HOME^%ZIS  

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 OUTPT VISIT DATE INQUIRY  

Entry Points

Name Comments DBIA/ICR reference
ASKPAT ;
ASKDAT
END
LIST ; If multiple bills for an OP visit date, list them.
ASKNUM
LQ
HELP ; List all OP visit dates and bill numbers for patient.
PAUSE
DISP ; Write the bill number, rate type, and bill status.

External References

Name Field # of Occurrence
HOME^%ZIS IBCNQ1+6
^DIC ASKPAT+5
^DIR ASKDAT+2
VIEW^IBCNQ ASKDAT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: ASKPAT+5
Function Call: WRITE
  • Prompt: !!,"This patient has no bills with OP visits. Please enter another patient."
  • Line Location: ASKPAT+6
Function Call: WRITE
  • Prompt: !!?5,"Select one of the following bills for this visit date:"
  • Line Location: LIST+1
Function Call: WRITE
  • Prompt: !!?5,"End of list.",!
  • Line Location: LIST+5
Function Call: READ
  • Variable: DGX
  • Timeout: DTIME
  • Line Location: ASKNUM+0
Function Call: WRITE
  • Prompt: !!?5,*7,"Enter a NUMBER from 1 to "_$S(J#5:J-1,1:J)_".",!
  • Line Location: ASKNUM+0
Function Call: WRITE
  • Prompt: !!?5,"Enter one of the following OP visit dates: ",!
  • Line Location: HELP+1
Function Call: WRITE
  • Prompt: !?5,$E(Y,4,5)_"-"_$E(Y,6,7)_"-"_$E(Y,2,3)
  • Line Location: HELP+2
Function Call: READ
  • Variable: DGY
  • Timeout: DTIME
  • Line Location: PAUSE+0
Function Call: WRITE
  • Prompt: ?20,$P(^(0),"^"),?30,$P($G(^DGCR(399.3,+$P(^(0),"^",7),0)),"^")
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: ?55,$S(IBS=1:"ENTERED/NOT REVIEWED",IBS=2:"REVIEWED",IBS=3:"AUTHORIZED",IBS=4:"PRINTED",IBS=7:"CANCELLED",IBS=0:"CLOSED",1:"")
  • Line Location: DISP+2
Routine Call
  • %ZIS
  • Line Location:
    • IBCNQ1+6
Routine Call
  • DIC
  • Line Location:
    • ASKPAT+5
Routine Call
  • DIR
  • Line Location:
    • ASKDAT+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] ASKPAT+6, ASKDAT+3, LIST+4, HELP+2, DISP+1
^DGCR(399.3 - [#399.3] DISP+1

Label References

Name Line Occurrences
ASKNUM LIST+4, ASKNUM
ASKPAT ASKPAT+6, ASKDAT+6
DISP LIST+4, HELP+2
END ASKPAT+5, ASKDAT+2, ASKDAT+4
LIST ASKDAT+4
LQ LIST+4
PAUSE HELP+2

Naked Globals

Name Field # of Occurrence
^(0 DISP+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN ASKPAT+6*, ASKDAT+3, END!, LIST+4, HELP+2
DGI END!, LIST+3*, LIST+4*, HELP+2*, DISP+1
DGX END!, ASKNUM*, ASKNUM+1, HELP+2*
DGY END!, HELP+2*, PAUSE*, PAUSE+1
DIC ASKPAT+5*!
DIC(0 ASKPAT+5*
DIR ASKDAT+2!
DIR("?" ASKDAT+1*
DIR("??" ASKDAT+1*
DIR("A" ASKDAT*
DIR(0 ASKDAT*
DPTNOFZY ASKPAT+4~*
DTIME ASKNUM, PAUSE
IB END!
IBAC ASKPAT+8*, END!
IBAC1 END!
IBARR ASKDAT+4!
IBARR( LIST+4*, ASKNUM+1
IBBNO END!
IBIFN ASKDAT+3*, ASKDAT+4, ASKDAT+5, END!, LIST+4, ASKNUM+1*
IBN END!
IBNOW END!
IBNUM END!
IBOPD END!
IBPAGE END!
IBPT END!
IBQUIT ASKPAT+8*, ASKDAT+4, ASKDAT+6, END!, LIST+4, ASKNUM*
IBS END!, DISP+1*, DISP+2
IBSTAT END!
IBU END!
IBUK END!
IBUN END!
IBX END!
J END!, LIST+4*, LIST+5, ASKNUM, HELP+2*
X ASKDAT+3*, END!
X2 END!
Y ASKPAT+5, ASKPAT+6, ASKDAT+2, ASKDAT+3, END!, LIST+4, HELP+2*
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