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

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Integrated Billing 1 $$CSVDATE^IBACSV  
VA FileMan 1 DD^%DT  

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

Package Total Caller Graph
Integrated Billing 15 IBCA  IBCA2  IBCBB  IBCD5  IBXS41  IBXS6  IBXS7  IBXSC41  
IBXSC6  IBXSC61  IBXSC7  IBXSC74  IBXX19  ^DGCR(399  OTHER CARE  

Entry Points

Name Comments DBIA/ICR reference
DDAT ;Input transform for Statement Covers From field
DDAT1 ;Input transform for Statement covers to
DDAT3 ; - x-ref call for to and from dates, REPLACED BY TRIGGERS ON .08, 151, 152 ON 10/18/93
DDAT4
OTDAT ; Input transform for Other Care Start Date (399,48,.02)
CHDAT ; Input transform for chiropractic-related dates (399/245,246,247)
; Make sure that date entered is not after end date of the bill
TO ;151 pseudo input x-form
FROM ;152 pseudo input x-form
FY(DATE) ; return a dates Fiscal Year
SPEC ; - calculate discharge specialty
; - input IBids(.08) = ptf record number
; - output IBids(161) = pointer to billing specialty in 399.1
PROCDT ; - find first and last dates of procedures
; can't set from and to date inside of this range
ICD10S(BDT,EDT,IBIFN) ; return Code Version Date if bill dates span the ICD-10 activation date
; enter either the bill to check or the dates to check
TOBIN(Y,DA) ; Screen for UB-04 bill classification based on UB-04 location of care
; Y = internal value of code for field .25 (UB-04 BILL CLASSIFICATION)
; DA = bill ien in file 399
TRIG05(X,D0) ; Trigger executed on field .05 of file 399 to set field .25
; Find the correct entry in file 399.1 that corresponds to the value in .05
; X = value of field .05, location of care
; D0 = IEN of bill entry in file 399
TOB(IBIFN,POS) ;Function returns the 3 digit type of bill from UB-04
; fields or the position (1-3) as determined by POS (optional)

External References

Name Field # of Occurrence
DD^%DT CHDAT+6
$$CSVDATE^IBACSV ICD10S+3

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 bill for future treatment!",*7
  • Line Location: DDAT1+3
Function Call: WRITE
  • Prompt: !?4,"Cannot precede the 'Start Date'!",*7
  • Line Location: DDAT1+4
Function Call: WRITE
  • Prompt: !?4,"Bill Statement dates cannot span ICD-10 activation date!",*7
  • Line Location: DDAT1+5
Function Call: WRITE
  • Prompt: !?4,"Must be in same fiscal year!",*7
  • Line Location: DDAT1+6
Function Call: WRITE
  • Prompt: !?4,"Must be in same fiscal year!",*7
  • Line Location: DDAT1+7
Function Call: WRITE
  • Prompt: !?4,"Must be in same calendar year!",*7
  • Line Location: DDAT1+8
Function Call: WRITE
  • Prompt: !?4,"Can't be less than date of specified Procedures!",*7
  • Line Location: DDAT1+10
Function Call: WRITE
  • Prompt: !?4,*7,"No 'Start Date' on file...can't enter OP visit dates..."
  • Line Location: DDAT1+14
Function Call: WRITE
  • Prompt: !?4,*7,"No 'End Date' on file...can't enter OP visit dates..."
  • Line Location: DDAT1+15
Function Call: WRITE
  • Prompt: !?4,*7,"Can't enter a visit date prior to 'Start Date'..."
  • Line Location: DDAT1+16
Function Call: WRITE
  • Prompt: !?4,*7,"Can't enter a visit date later than 'End Date'..."
  • Line Location: DDAT1+17
Function Call: WRITE
  • Prompt: !?4,*7,"Only 1 visit date allowed on bills with Amb. Surg. Codes!"
  • Line Location: DDAT1+18
Function Call: WRITE
  • Prompt: !,?4,"Can Not Precede Bill Start Date!",!,*7
  • Line Location: OTDAT+3
Function Call: WRITE
  • Prompt: !,?4,"Cannot be after Bill End Date!",!,*7
  • Line Location: OTDAT+4
Function Call: WRITE
  • Prompt: !?4,*7,"No end date of the bill on file - can't enter chiropractic-related dates "
  • Line Location: CHDAT+5
Function Call: WRITE
  • Prompt: !,?4,*7,"This date cannot be after the end date of the claim ("_Y_") "
  • Line Location: CHDAT+6
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 precede the 'Start Date'!",*7
  • Line Location: FROM+2
Function Call: WRITE
  • Prompt: !?4,"Bill Statement dates cannot span ICD-10 activation date!",*7
  • Line Location: FROM+3
Function Call: WRITE
  • Prompt: !?4,"Must be in same fiscal year!",*7
  • Line Location: FROM+4
Function Call: WRITE
  • Prompt: !?4,"Must be in same fiscal year!",*7
  • Line Location: FROM+5
Function Call: WRITE
  • Prompt: !?4,"Must be in same calendar year!",*7
  • Line Location: FROM+6

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
$$ICD10S DDAT1+5, FROM+3
DDAT4 DDAT+2, DDAT+3, DDAT+5, DDAT+6, DDAT1+2, DDAT1+3, DDAT1+4, DDAT1+5, DDAT1+10, DDAT1+11
, DDAT1+20, DDAT3+2, DDAT3+4
FROM DDAT1+1
PROCDT DDAT+4, DDAT1+9
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
BDT ICD10S~, ICD10S+4*, ICD10S+5
D0 TRIG05~, TRIG05+5
DA DDAT+1, DDAT+2, DDAT1+1, DDAT1+2, DDAT1+5, DDAT3+3, DDAT3+4, DDAT3+5, CHDAT+4, PROCDT+3
, TOBIN~, TOBIN+4
DA(1 OTDAT+1, OTDAT+2
DATE FY~, FY+2
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+10, DDAT4!, PROCDT+2*, PROCDT+5*
DGPROC DDAT4!, PROCDT+2*, PROCDT+3*
DGX DDAT4!
DT DDAT+3, DDAT1+3, TO+2
EDT ICD10S~, ICD10S+4*, ICD10S+5
IB0 TOBIN+3~, TOBIN+4*, TOBIN+5
IB00 DDAT+2*, DDAT1+2*, DDAT1+4, DDAT1+5, DDAT3+4*, DDAT3+5, DDAT4!
IB01 DDAT3+5*, DDAT4!
IB02 DDAT3+5*, DDAT4!
IB03 DDAT4!
IBFY FY+1~*, FY+2*, FY+3
>> IBIDS( TO+1, FROM+3, SPEC+4
>> IBIDS(151 FROM+1, FROM+2, FROM+3
>> IBIDS(161 SPEC+3!, SPEC+4*, SPEC+5*!, SPEC+6*, SPEC+7!
IBIFN ICD10S~, ICD10S+4, TOB~, TOB+3
IBS ICD10S+2~*, ICD10S+5*, ICD10S+6
IBU ICD10S+2~, ICD10S+4*
IBV ICD10S+2~, ICD10S+3*, ICD10S+5
IBX OTDAT+2~*, OTDAT+3, OTDAT+4, CHDAT+3~, CHDAT+4*, CHDAT+5, CHDAT+6
IBYR FY+1~, FY+2*
IEN TRIG05+4~, TRIG05+6*, TRIG05+8*, TRIG05+9
LOC TRIG05+4~, TRIG05+5*, TRIG05+8
POS TOB~, TOB+4
U DDAT1+5, OTDAT+4, CHDAT+4, ICD10S+4, TOBIN+4, TOBIN+5, TRIG05+5, TRIG05+8, TOB+3
X DDAT+2!, DDAT+3!, DDAT+5!, DDAT1+2!, DDAT1+3!, DDAT1+4!, DDAT1+5!, DDAT1+10!, DDAT3+2, DDAT3+4!
, OTDAT+1, OTDAT+3!, OTDAT+4!, CHDAT+2, CHDAT+5!, CHDAT+6!, TO+1!, TO+2!, FROM+1!, FROM+2!
, FROM+3!, TRIG05~, TRIG05+8
Y CHDAT+3~, CHDAT+6*, TOBIN~, TOBIN+5
Z TRIG05+4~, TRIG05+6*, TRIG05+8*, TOB+2~, TOB+3*, TOB+4
Z0 TRIG05+4~, TRIG05+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All