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

Package: Integrated Billing

Routine: IBECEAU2


Information

IBECEAU2 ;ALB/CPM - Cancel/Edit/Add... User Prompts ; 19-APR-93

Source Information

Source file <IBECEAU2.m>

Entry Points

Name Comments DBIA/ICR reference
REAS(IBX) ; Ask for the cancellation reason.
; Input: IBX -- "C" (Cancel a charge), "E" (Edit a Charge)
UNIT(DEF) ; Ask for units for Rx copay charges
; Input: DEF -- Default value if previous charge is to be displayed
FR(DEF) ; Ask Bill From Date
; Input: DEF -- Default value if previous charge is to be displayed
FRA
FRQ
TO(DEF) ; Ask Bill To Date
; Input: DEF -- Default value if previous charge is to be displayed
TOA
TOQ
FEE(DEF) ; Ask for Fee Amount
; Input: DEF -- Default value if previous charge is to be displayed
AMT ; Ask for Charge Amount
CATC ; Display that patient is not Means Test billable.
HUN ; Help for units
HFR ; Help for Bill From date
HTO ; Help for Bill To date
HFEE ; Help for Fee Amount
HAMT ; Help for Charge Amount
TIER(IBATYP,IBEFDT,TIER) ; Prompt if needed for copay tier
; IBATYP - 350.1 IB Action Type
; IBEFDT - Date for possible tier choice or not if only one tier available
; TIER - {optional) default tier, if none specified, then 2 used
GETDOD(DFN) ; get patient's date of death IB*2.0*772

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Units not entered - transaction cannot be completed."
  • Line Location: UNIT+7
Function Call: WRITE
  • Prompt: !!,$S(IBXA=4!(IBXA=7):"Visit",IBXA=5:"Rx",1:"Bill From")," Date not entered - transaction cannot be completed."
  • Line Location: FRA+10
Function Call: WRITE
  • Prompt: !!,"This date is after patient's recorded date of death."
  • Line Location: FRA+12
Function Call: WRITE
  • Prompt: !,"This patient is not LTC billable on this date.",!
  • Line Location: FRA+15
Function Call: WRITE
  • Prompt: !!,"This patient has already been billed the outpatient copay charge for ",$$DAT1^IBOUTL(IBFR),".",!
  • Line Location: FRA+17
Function Call: WRITE
  • Prompt: !!,"Bill To date not entered - transaction cannot be completed."
  • Line Location: TOA+2
Function Call: WRITE
  • Prompt: !!,"Charge not entered - transaction cannot be completed."
  • Line Location: FEE+5
Function Call: WRITE
  • Prompt: !!,"Charge not entered - transaction cannot be completed."
  • Line Location: AMT+3
Function Call: WRITE
  • Prompt: !!,"The patient ",$S(IBFR<DT:"was",1:"is")," not Means Test billable on this date.",!
  • Line Location: CATC+1
Function Call: WRITE
  • Prompt: !!,"Please enter 1, 2, 3, ...,12 to denote a 30, 60, 90, ...,360 days supply of"
  • Line Location: HUN+1
Function Call: WRITE
  • Prompt: !,"medication, or '^' to quit."
  • Line Location: HUN+2
Function Call: WRITE
  • Prompt: !!,"Please enter the ",STR
  • Line Location: HFR+8
Function Call: WRITE
  • Prompt: !,$S(IBXA=5:"today or prior to today",1:"10/1/90"_$S(IBXA=4!(IBXA=7):"",1:" (and be prior to today)")),", or '^' to quit."
  • Line Location: HFR+11
Function Call: WRITE
  • Prompt: !!,"Please enter the 'Bill To' date for this charge, which may not precede"
  • Line Location: HTO+1
Function Call: WRITE
  • Prompt: !,$$DAT1^IBOUTL(IBFR),", or '^' to quit."
  • Line Location: HTO+2
Function Call: WRITE
  • Prompt: !!,"Please enter the charge for this Fee Service, which may not be greater than"
  • Line Location: HFEE+1
Function Call: WRITE
  • Prompt: !,"the difference between the Medicare Deductible amount and the "
  • Line Location: HFEE+2
Function Call: WRITE
  • Prompt: $$INPT^IBECEAU(IBCLDAY)," 90 days",!,"copay billed ($",IBMED-IBCLDOL,"), or '^' to quit."
  • Line Location: HFEE+3
Function Call: WRITE
  • Prompt: !!,"Please enter the charge for this copayment."
  • Line Location: HAMT+1
Function Call: WRITE
  • Prompt: !!,"Rx Date entered is invalid for the charge type. Please confirm",!
  • Line Location: TIER+7
Function Call: WRITE
  • Prompt: "the date and re-enter."
  • Line Location: TIER+8

FileMan Files Accessed Via FileMan Db Call

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