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

Package: Integrated Billing

Routine: IBCA


Information

IBCA ;ALB/MRL - ADD NEW BILLING RECORD ;01 JUN 88 12:00

Source Information

Source file <IBCA.m>

Entry Points

Name Comments DBIA/ICR reference
CHKID
OP
IP
CEOC
CEOC1
CHKINQ
READ
NREC
Q1
Q
SET
LASTDAY ;find last day of last month
; -set x to default last date
LDQ

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: CEOC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CEOC+2
Function Call: WRITE
  • Prompt: !
  • Line Location: CEOC+3
Function Call: WRITE
  • Prompt: !
  • Line Location: CEOC+3
Function Call: WRITE
  • Prompt: !,"Warning: Patient is an Inpatient on ",$$FMTE^XLFDT(IBIDS(.03),2),": ",$$FMTE^XLFDT(+X,2)," - "
  • Line Location: CEOC+4
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT(+$P(X,U,2),2)
  • Condition for execution: +$P(X,U,2)
  • Line Location: CEOC+4
Function Call: WRITE
  • Prompt: !
  • Line Location: CEOC+4
Function Call: WRITE
  • Prompt: !!,"Discharge bedsection of this PTF record is NOT billable!",!!!
  • Line Location: CEOC+5
Function Call: WRITE
  • Prompt: !?6,*7,"Sorry '^' not allowed!"
  • Line Location: READ+0

FileMan Files Accessed Via FileMan Db Call

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