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

Package: Integrated Billing

Routine: IBCREQ


Information

IBCREQ ;ALB/ARH-RATES: CM FAST ENTER/EDIT OPTION ;22-MAY-1996

Source Information

Source file <IBCREQ.m>

Entry Points

Name Comments DBIA/ICR reference
ENTER ; OPTION: fast enter Tort or Interagency rates - this option requires charge sets defined as released,
; name not changed and a standard set of charges
TORT(IBRATE,EFDT,ARR,IBRVCD) ; find the standard charge sets for Tort rates
TORTQ
IA(IBRATE,EFDT,ARR) ; find the standard charge sets for Interagency rates
IAQ
CS(IBRATE,IBCSN,TYPE,ITEM,RVCD,DESC,ARR) ; accumulate standard charge sets for a rate
; check the billing rate is correct and return all relevant info
; Output: ARR(event type) = event type name
; ARR(event type, X) = CS name ^ CS IFN ^ default rev code ^ rev code to store ^ description of charge
SET(IBRATE,ARR) ; add/edit charges: for each type of charge and each item, displays rev code and description
; then askes the user for bedsection and charge
NPFRC() ; get the default revenue codes for non-professional inpatient services
NPFRCQ
DISP(IBRATE,ARR) ;
GETBS(COL,PROMPT,TYPE) ; ask and return billable bedsection (399.1): (-1 if ^, 0 if none) IFN^.01
; if type is inpatient then not PRESCRIPTION or OUTPATIENT bedsections can be selected
; if type is not inpatient then default bedsections are provided
MT() ; do the new mt rate format (misc type) eff 12/6/01 ib*2*167

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ENTER+3
Function Call: WRITE
  • Prompt: !!,?10,"Fast Enter of Tortiously Liable and Interagency Rates",!!
  • Line Location: ENTER+3
Function Call: WRITE
  • Prompt: !!,"The Fast Enter of rates expects to find the standard rates and sets released",!,"nationally, if these are not found this option can not be used."
  • Line Location: TORTQ+0
Function Call: WRITE
  • Prompt: !!,"The Fast Enter of rates expects to find the standard rates and sets released",!,"nationally, if these are not found this option can not be used."
  • Line Location: IAQ+0
Function Call: WRITE
  • Prompt: !!!,IBERROR,!," Can not continue!"
  • Line Location: CS+10
Function Call: WRITE
  • Prompt: !!,"--------------------------------------------------------------------------------"
  • Line Location: SET+6
Function Call: WRITE
  • Prompt: !,"Enter ",$P(ARR(IBTYP),U,1)," ",$P(IBRATE,U,2)," charges effective ",$$FMTE^XLFDT(IBEFDT),":"
  • Line Location: SET+7
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: SET+8
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+10
Function Call: WRITE
  • Prompt: ?74,"added"
  • Line Location: SET+19
Function Call: WRITE
  • Prompt: ?74,"edited"
  • Line Location: SET+20
Function Call: WRITE
  • Prompt: !!,"Enter the Revenue Code to use for all non-professional inpatient services:",!
  • Line Location: NPFRC+3
Function Call: WRITE
  • Prompt: !!,"Both of these revenue codes are required for the Inpatient Non-Professional",!,"charges to be added to bills. Can Not Continue!",!
  • Line Location: NPFRCQ+0
Function Call: WRITE
  • Prompt: @IOF,!,$P(IBRATE,U,2)," charges effective ",$$FMTE^XLFDT(ARR)," will be added as follows:"
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: !,"Charge Type",?30,"Charge Set",?55,"Rev Code",!,"--------------------------------------------------------------------------------",!
  • Line Location: DISP+3
Function Call: WRITE
  • Prompt: $P(ARR(IBTYP),U,1)
  • Line Location: DISP+5
Function Call: WRITE
  • Prompt: ?30,$P(IBLN,U,1),?55,$P($G(^DGCR(399.2,+$P(IBLN,U,3),0)),U,1),?65,$P(IBLN,U,5),!
  • Line Location: DISP+8
Function Call: WRITE
  • Prompt: !,"If any of the revenue codes are incorrect then change the Default Revenue for",!,"the Charge set."
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: " (except the non-prof inpt rev codes entered above)"
  • Condition for execution: +IBRATE=1
  • Line Location: DISP+9
Function Call: WRITE
  • Prompt: !!,"If any of the Charge Sets are incorrect DO NOT USE this option."
  • Line Location: DISP+10
Function Call: WRITE
  • Prompt: !,"This option may NOT be used to delete rates or add zero charges."
  • Line Location: DISP+11
Function Call: WRITE
  • Prompt: !!,"The charges will be asked in sections based on the Charge Types listed above."
  • Line Location: DISP+12
Function Call: WRITE
  • Prompt: !,"The first section is INPATIENT, enter all Inpatient Bedsections and their"
  • Line Location: DISP+13
Function Call: WRITE
  • Prompt: !,"charges, then press return at the Select Bedsection prompt to move to the"
  • Line Location: DISP+14
Function Call: WRITE
  • Prompt: !,"OUTPATIENT VISIT section and enter the Outpatient Visit Bedsection and charge..."
  • Line Location: DISP+15
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+16
Function Call: WRITE
  • Prompt: !,"*** Error: Charge set TL-MT OPT COPAY not found"
  • Line Location: MT+3
Function Call: WRITE
  • Prompt: !!,"--------------------------------------------------------------------------------"
  • Line Location: MT+4
Function Call: WRITE
  • Prompt: !,"Enter MT OUTPATIENT COPAYMENT charges effective ",$$FMTE^XLFDT(IBEFDT),":"
  • Line Location: MT+5
Function Call: WRITE
  • Prompt: !,"--------------------------------------------------------------------------------"
  • Line Location: MT+6
Function Call: WRITE
  • Prompt: ?74,"added"
  • Line Location: MT+14
Function Call: WRITE
  • Prompt: ?74,"edited"
  • Line Location: MT+15
Function Call: WRITE
  • Prompt: !,IBERROR
  • Line Location: MT+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGCR(399.1 - [#399.1] Classic Fileman Calls
^DGCR(399.2 - [#399.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call