Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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)
INDIVIDUAL(IBIFN,PROVTYPE,PHYSFUNC) ;EP - ONLY INDIVIDUAL TYPE
INDIVHELP ;EP - DISPLAY XECUTABLE HELP FOR NEW SCREEN IN 399.002 AND 399.0404
PHYSFUNC(PHYSFUNC) ;EP -RETURN PHYSFUNC FOR SETCODE

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
Info |  Source |  Entry Points |  Interaction Calls