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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: IBATEI

Package: Integrated Billing

Routine: IBATEI


Information

IBATEI ;ALB/BGA - TRANSFER PRICING INPATIENT TRACKER ; 02-FEB-99

Source Information

Source file <IBATEI.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; Main Entry Point
FINDRT(PTF,ADMIS,IBDFN) ; Find the Rate
TYPRATE(X) ; Pass in PTF ien and return either DRG or Bedsection or ERROR
; see if PTF has a DRG
CALCRT(Z,Y,V,R) ; Calculate LOS, and price out claim.
; INPUT:
; Z = a string either "BED" or "DRG"
; Y = ien for the admission movement
; V = value either bedsection NAME or the drg NUMBER
; R = used only with DRG and it is the dollar value of the drg.
; OUTPUT:
; IBCALC=" if 0^ 2nd piece is error message
; if 1^ there are 2 possible options that can be returned
; Option 1 - If we are calculating a Bed Section
; 1^calculated amount^"B"
; Option 2 - If we are calculating a DRG
; 1^calculated amt^ien drg^los^hightrim^outlier days
; ^bedsection rate for the outliers
END ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Updating Transfer Pricing has been...completed."
  • Line Location: END+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPT - [#45] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call