Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: IBCU4

Package: Integrated Billing

Routine: IBCU4


Information

IBCU4 ;ALB/AAS - BILLING UTILITY ROUTINE (CONTINUED) ;12-FEB-90

Source Information

Source file <IBCU4.m>

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Integrated Billing 5 IBCD5  ^DGCR(399  IBCA2  IBXSC6  IBXSC7  

Entry Points

Name Comments DBIA/ICR reference
FROM ;152 pseudo input x-form
DDAT1 ;Input transform for Satement covers to
DDAT3 ; - x-ref call for to and from dates, REPLACED BY TRIGGERS ON .08, 151, 152 ON 10/18/93
DDAT4
TO ;151 pseudo input x-form
PROCDT ; - find first and last dates of procedures
DDAT ;Input transform for Statement Covers From field
SPEC ; - calculate discharge specialty

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?4,"Cannot precede the 'EVENT DATE'!",*7
  • Line Location: DDAT+2
Function Call: WRITE
  • Prompt: !?4,"Cannot bill for future treatment!",*7
  • Line Location: DDAT+3
Function Call: WRITE
  • Prompt: !?4,"Can't be greater than date of specified Procedures!",*7
  • Line Location: DDAT+5
Function Call: WRITE
  • Prompt: !?4,"'Start Date' must be specified first!",*7
  • Line Location: DDAT1+2
Function Call: WRITE
  • Prompt: !?4,"Cannot preceed the 'Start Date'!",*7
  • Line Location: DDAT1+3
Function Call: WRITE
  • Prompt: !?4,"Must be in same fiscal year!",*7
  • Line Location: DDAT1+4
Function Call: WRITE
  • Prompt: !?4,"Must be in same calendar year!",*7
  • Line Location: DDAT1+5
Function Call: WRITE
  • Prompt: !?4,"Can't be less than date of specified Procedures!",*7
  • Line Location: DDAT1+7
Function Call: WRITE
  • Prompt: !?4,*7,"No 'Start Date' on file...can't enter OP visit dates..."
  • Line Location: DDAT1+11
Function Call: WRITE
  • Prompt: !?4,*7,"No 'End Date' on file...can't enter OP visit dates..."
  • Line Location: DDAT1+12
Function Call: WRITE
  • Prompt: !?4,*7,"Can't enter a visit date prior to 'Start Date'..."
  • Line Location: DDAT1+13
Function Call: WRITE
  • Prompt: !?4,*7,"Can't enter a visit date later than 'End Date'..."
  • Line Location: DDAT1+14
Function Call: WRITE
  • Prompt: !?4,*7,"Only 1 visit date allowed on bills with Amb. Surg. Codes!"
  • Line Location: DDAT1+15
Function Call: WRITE
  • Prompt: !?4,"Cannot precede the 'EVENT DATE'!",*7
  • Line Location: TO+1
Function Call: WRITE
  • Prompt: !?4,"Cannot bill for future treatment!",*7
  • Line Location: TO+2
Function Call: WRITE
  • Prompt: !?4,"'Start Date' must be specified first!",*7
  • Line Location: FROM+1
Function Call: WRITE
  • Prompt: !?4,"Cannot preceed the 'Start Date'!",*7
  • Line Location: FROM+2
Function Call: WRITE
  • Prompt: !?4,"Must be in same fiscal year!",*7
  • Line Location: FROM+3
Function Call: WRITE
  • Prompt: !?4,"Must be in same calendar year!",*7
  • Line Location: FROM+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGCR(399 - [#399] DDAT+2, DDAT1+2, DDAT3+3, DDAT3+4, DDAT3+5*, PROCDT+3
^DGCR(399.1 - [#399.1] SPEC+6, SPEC+7
^DGPT - [#45] SPEC+4
^DIC(42.4 - [#42.4] SPEC+4, SPEC+5

Label References

Name Line Occurrences
DDAT4 DDAT+2, DDAT+3, DDAT+5, DDAT+6, DDAT1+2, DDAT1+3, DDAT1+4, DDAT1+5, DDAT1+7, DDAT1+8
, DDAT1+17, DDAT3+2, DDAT3+4
FROM DDAT1+1
PROCDT DDAT+4, DDAT1+6
TO DDAT+1

Naked Globals

Name Field # of Occurrence
^("U" DDAT1+2, DDAT3+4
^(0 DDAT3+3
^(70 SPEC+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA DDAT+1, DDAT+2, DDAT1+1, DDAT1+2, DDAT3+3, DDAT3+4, DDAT3+5, PROCDT+3
DGJ DDAT4!
>> DGNEWLOS DDAT3+3*
DGNOAP DDAT4!
DGPRDT DDAT4!, PROCDT+2*, PROCDT+3*, PROCDT+4, PROCDT+5
DGPRDTB DDAT+5, DDAT4!, PROCDT+2*, PROCDT+4*
DGPRDTE DDAT1+7, DDAT4!, PROCDT+2*, PROCDT+5*
DGPROC DDAT4!, PROCDT+2*, PROCDT+3*
DGX DDAT4!
DT DDAT+3, TO+2
IB00 DDAT+2*, DDAT1+2*, DDAT1+3, DDAT1+4, DDAT1+5, DDAT3+4*, DDAT3+5, DDAT4!
IB01 DDAT3+5*, DDAT4!
IB02 DDAT3+5*, DDAT4!
IB03 DDAT4!
>> IBIDS( TO+1, SPEC+4
>> IBIDS(151 FROM+1, FROM+2, FROM+3, FROM+4
>> IBIDS(161 SPEC+3!, SPEC+4*, SPEC+5*!, SPEC+6*, SPEC+7!
X DDAT+2!, DDAT+3!, DDAT+5!, DDAT1+2!, DDAT1+3!, DDAT1+4!, DDAT1+5!, DDAT1+7!, DDAT3+2, DDAT3+4!
, TO+1!, TO+2!, FROM+1!, FROM+2!, FROM+3!, FROM+4!
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All