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

Package: Integrated Billing

Routine: IBECEA33


Information

IBECEA33 ;ALB/CPM-Cancel/Edit/Add... More Add Utilities ; 23-APR-93

Source Information

Source file <IBECEA33.m>

Entry Points

Name Comments DBIA/ICR reference
NOCL ; Find the correct clock from the 'bill from' date.
NOCLQ
OPT ; Check for a C&P exam and determine the outpatient copay rate.
OPTQ
CHTYP ; Ask for the Charge Type
CHTYPQ
CLMSG ; Check the Medicare Deductible and Billing Clock
CLMSGQ
CHKLTCCC() ; Check to see if the selected Charge Type is an LTC Inpatient CC

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"No local clock found for service date.",!,"Running Billing Clock Query, please wait."
  • Line Location: NOCL+6
Function Call: WRITE
  • Prompt: !!,"Billing Clock query required for local clock.",!,"Running Billing Clock Query, please wait."
  • Line Location: NOCL+7
Function Call: WRITE
  • Prompt: !!,"Billing clock query successful and clock has been updated if applicable.",!!
  • Line Location: NOCL+15
Function Call: WRITE
  • Prompt: !,IBTEXT(IBX)
  • Line Location: NOCL+25
Function Call: WRITE
  • Prompt: !,IBVRNST
  • Line Location: NOCL+27
Function Call: WRITE
  • Prompt: !!,"Billing Clock Query was not returned from VDIF and clock could not be synced",!,"with other potential clocks.",!
  • Line Location: NOCL+31
Function Call: WRITE
  • Prompt: !!,"***",IBERRMSG,"***",!!
  • Line Location: NOCL+36
Function Call: WRITE
  • Prompt: !!,"The Bill From date is prior to the start of the active clock..."
  • Line Location: NOCL+38
Function Call: WRITE
  • Prompt: !!,"This patient has no clock which would cover this date. You should use the",!,"Clock Maintenance option to adjust this patient's clocks before proceeding."
  • Line Location: NOCL+41
Function Call: WRITE
  • Prompt: !!?5,"This charge will be billed under the following closed clock:"
  • Line Location: NOCL+47
Function Call: WRITE
  • Prompt: !!?6,"Begin Date: ",$$DAT1^IBOUTL(IBCLDT)," # Inpt Days: ",IBCLDAY
  • Line Location: NOCL+48
Function Call: WRITE
  • Prompt: !?5,"Closed Date: ",$$DAT1^IBOUTL($P(IBCLST,"^",10))," ",$$INPT^IBECEAU(IBCLDAY)," 90 Days: $",+IBCLDOL
  • Line Location: NOCL+49
Function Call: WRITE
  • Prompt: !!?5,"This patient has been billed the full copayment under this billing clock!",!?5,"You cannot add another copay charge starting on this date."
  • Line Location: NOCL+50
Function Call: WRITE
  • Prompt: !!,"No CHARGE TYPE entered - transaction cannot be completed."
  • Line Location: CHTYP+5
Function Call: WRITE
  • Prompt: !!,"This patient does not have a Primary Eligibility of CHAMPVA.",!
  • Line Location: CHTYP+18
Function Call: WRITE
  • Prompt: !!,"This patient has never been Means Test billable...",!,"You may only select a Pharmacy copay charge type.",!
  • Line Location: CHTYP+19
Function Call: WRITE
  • Prompt: !!,"Patient is Exempt from Medication Copayment",!,$P(IBEXSTAT,"^",4),!
  • Line Location: CHTYP+20
Function Call: WRITE
  • Prompt: !!,"This patient has no LTC (1010EC) information on file.",!,"You cannot select a LTC charge type.",!
  • Line Location: CHTYP+21
Function Call: WRITE
  • Prompt: !!,"This patient is Exempt from LTC Charges.",!
  • Line Location: CHTYP+22

FileMan Files Accessed Via FileMan Db Call

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