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

Package: Integrated Billing

Routine: IBCRED


Information

IBCRED ;ALB/ARH - RATES: CM DELETE CHARGE ITEMS OPTION ; 22-MAY-1996

Source Information

Source file <IBCRED.m>

Entry Points

Name Comments DBIA/ICR reference
ENTER ; OPTION ENTRY POINT: delete charge items for a specific charge set, may be inactive by a date or all
DELETE(CS,INDT,SAVE) ; delete all charge items in a set inactive before a certain date
; Input: CS - set to delete charges from,
; INDT - charges not active on this date will be deleted, if ALL- all charges will be deleted from set
; SAVE - if true, charge items that would be deleted are entered into TMP array for printing instead
; Output: returns the count of the charge items deleted
DELCI(CI,SUB2) ; either save in TMP arry to print or delete
DATE(X) ;
TMPHDR(CS,INDT) ; set up array header for printed report
DEV ; get device for printed report
RPT ; print report - entry point for tasked jobs
CSDELETE(IBCS) ; delete a Charge Set, including all pointers to it, also delete region if not assigned to another set
CSDELQ
CSEMPTY(BR) ; delete Charge Sets that have no associated Charges (except VA Cost)
; Input: BR may be passed to limit the check for empty Charge Sets to specific Billing Rates
; only CS's of the passed Billing Rate will be checked and deleted if it has no charges
; - pointer to the Billing Rate (363.3) to check
; - first two characters of the Billing Rate Name (363.3,.01) to check
; - if no BR passed then all Charge Sets/Billing Rates are checked
; Returns: count of Charge Sets deleted

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ENTER+2
Function Call: WRITE
  • Prompt: !,?12,"**** DELETE INACTIVE CHARGE ITEMS FROM A CHARGE SET ****"
  • Line Location: ENTER+2
Function Call: WRITE
  • Prompt: !!,?5,"For a given Charge Set, this option allows deletion of all chargeable items",!,?5,"that have been inactivated or replaced before a certain date.",!
  • Line Location: ENTER+3
Function Call: WRITE
  • Prompt: !,?5,"Since all charges for a billing rate and date range may be deleted with",!,?5,"this option, caution is advised.",!
  • Line Location: ENTER+4
Function Call: WRITE
  • Prompt: !!,"The Charge Set to delete Charge items from:"
  • Line Location: ENTER+8
Function Call: WRITE
  • Prompt: !
  • Line Location: ENTER+10
Function Call: WRITE
  • Prompt: !,"No deletions",!
  • Line Location: ENTER+15
Function Call: WRITE
  • Prompt: !,"No deletions",!
  • Line Location: ENTER+22
Function Call: WRITE
  • Prompt: !,"Beginning Deletions"
  • Line Location: ENTER+25
Function Call: WRITE
  • Prompt: !,$$DELETE(IBCS,IBDT)," charges deleted."
  • Line Location: ENTER+25
Function Call: WRITE
  • Prompt: !!,$P(IBCS,U,2)," ",$P($$CSDELETE(+IBCS),U,2)
  • Line Location: ENTER+26

FileMan Files Accessed Via FileMan Db Call

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