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 |  Local Variables |  All
Print Page as PDF
Routine: IBRCON1

Package: Integrated Billing

Routine: IBRCON1


Information

IBRCON1 ;ALB/RJS - PASS CONVERTED INPATIENT CHARGES ; 28-APR-92

Source Information

Source file <IBRCON1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Integrated Billing 2 $$DAT1^IBOUTL  ^IBR  
Registration 2 DEM^VADPT  PID^VADPT6  
VA Fileman 2 ^DIC  ^DIR  
Kernel 1 HOME^%ZIS  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Integrated Billing 1 IBRCON3  

Entry Points

Name Comments DBIA/ICR reference
EN ; Entry point for stand-alone 'pass' option
END
LST2 ; Display individual IB Action.
LST1 ; Display individual IB Action.
HDR1 ; Display charge header.
ERR ; Display error message.
RESUME
HLP ; Display basic help message.
HLP1 ; Display all patients with converted charges
ASK
HDR2 ; Display charge header.
LOOP ;
HELP ; Help for the 'Select' prompt.

External References

Name Field # of Occurrence
HOME^%ZIS EN+3
^DIC ASK+5
^DIR RESUME+6, RESUME+13
$$DAT1^IBOUTL LST1+3, LST2+5
^IBR RESUME+18
DEM^VADPT ASK+11
PID^VADPT6 HLP1+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are no patients with converted charges at this time.",!
  • Line Location: EN+1
Function Call: WRITE
  • Prompt: !!,"This patient does not have any converted charges",!
  • Line Location: ASK+9
Function Call: WRITE
  • Prompt: @IOF,VADM(1)," Pt ID: ",VA("PID"),!
  • Line Location: ASK+11
Function Call: WRITE
  • Prompt: "-"
  • Line Location: ASK+11
Function Call: READ
  • Prompt: "Enter RETURN to continue or '^' to stop: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: RESUME+2
Function Call: WRITE
  • Prompt: ?42,"On Hold"
  • Line Location: LST2+3
Function Call: WRITE
  • Prompt: ?42,$P($P(IBND,"^",11),"-",2)
  • Line Location: LST2+4
Function Call: WRITE
  • Prompt: !?3,$P($G(^DPT(DFN,0)),"^"),$J("",10),VA("PID")
  • Line Location: HLP1+3
Function Call: READ
  • Prompt: "Enter RETURN to continue or '^' to stop: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: HLP1+4
Routine Call
  • %ZIS
  • Line Location:
    • EN+3
Routine Call
  • DIC
  • Line Location:
    • ASK+5
Routine Call
  • DIR
  • Line Location:
    • RESUME+6
    • RESUME+13

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] HLP1+3
^IB - [#350] LST1+1, LST2+1
^IB("AI" EN+1, ASK+8, HLP1+3
^IBE(350.1 - [#350.1] LST1+2, LST2+2

Label References

Name Line Occurrences
ASK ASK+2, ASK+3, ASK+5, ASK+9, LOOP+1
END ASK+1, RESUME+6, RESUME+13
ERR RESUME+18
HDR1 RESUME
HDR2 RESUME+17
HLP ASK+3
HLP1 ASK+2
LOOP RESUME+7, RESUME+14
LST1 RESUME+1
LST2 RESUME+18

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN ASK+5*, ASK+8, END+1!, HLP1+1~, HLP1+3*
DIC ASK+5*!, END+1!
DIC("S" ASK+4*
DIC(0 ASK+5*
DIR RESUME+6!, RESUME+13!, END+1!
DIR("?" RESUME+5*
DIR("A" RESUME+5*, RESUME+12*
DIR("B" RESUME+11*
DIR(0 RESUME+5*, RESUME+12*
DIRUT RESUME+7, RESUME+14, END!
DTIME ASK+1, RESUME+2, HLP1+4
DTOUT END!
DUOUT RESUME+6, RESUME+13, END!
DUZ RESUME+9
I ASK+11*, END+1!, HLP1+1~, HLP1+3*
IBA ASK+7!, ASK+9, END!, END+1!
IBA( ASK+8*, RESUME+1, RESUME+18
IBAFY END!
IBARTYP END!
IBATYP END!
IBDA END!
IBDUZ RESUME+9*, END!
IBFAC END!
IBLINE END+1!, HDR1+1~*, HDR1+2, HDR1+3, HDR2+1~*, HDR2+2, HDR2+4
IBN RESUME+1*, RESUME+18*, END!, LST1+1, LST2+1
IBND END+1!, LST1+1~*, LST1+2, LST1+3, LST1+4, LST2+1~*, LST2+2, LST2+3, LST2+4, LST2+5
, LST2+6
IBNOS RESUME+18*, END!
IBNUM ASK+8*, RESUME+1*, RESUME+5, RESUME+18*, END!, LST1+2, LST2+2, ERR+1, HELP+2
IBQ RESUME+1*, RESUME+2*, END!, HLP1+1~, HLP1+3*, HLP1+4*
IBRANGE RESUME+9*, RESUME+18, RESUME+19, END!
IBRHOLD ASK*, RESUME+20, END+1!, LST2+3*
IBRRJS ASK+8*, RESUME+18*, END+1!
IBRRJSL END!
IBSEQNO RESUME+9*, END!
IBSERV END!
IBSITE END!
IBTOTL END!
IBTRAN END!
IBWHER END!
IOF ASK+11
U LST2+3
VA END!, END+1!, HLP1+1~
VA("PID" ASK+11, HLP1+3
VADM END!, END+1!
VADM(1 ASK+11
VAERR END!, HLP1+1~
X ASK+1*, ASK+2, ASK+3, RESUME+2*, END+1!, HLP1+4*
Y ASK+5, RESUME+9, RESUME+12, RESUME+14, RESUME+18, END+1!
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 |  Local Variables |  All