Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: IBECEAU

Package: Integrated Billing

Routine: IBECEAU


Information

IBECEAU ;ALB/CPM - Cancel/Edit/Add... Utilities ;11-MAR-93

Source Information

Source file <IBECEAU.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Integrated Billing 5 SITE^IBAUTL  SERV^IBAUTL2  (CLAMT,CLDSP,CLINP)^IBECEAU1  $$DAT1^IBOUTL  SCAN^IBSDU  
Kernel 1 ($$F2H,$$H2F)^XLFDT  
List Manager 1 CLEAR^VALM1  
VA FileMan 1 ^DIR  

Caller Graph

Caller Graph Total: 31

Package Total Caller Graph
Integrated Billing 31 IB20PT51  IBACUS1  IBACUS2  IBACVA1  IBAECU5  IBAKAT  IBAMTD1  IBAMTD2  
IBAMTEDU  IBAMTI  IBAMTS  IBAMTV  IBAMTV3  IBAMTV4  IBARXEU3  IBECEA  
IBECEA2  IBECEA21  IBECEA22  IBECEA3  IBECEA32  IBECEA33  IBECEA35  IBECEA4  
IBECEAU1  IBECEAU2  IBECEAU4  IBECEAU6  IBEFURF  IBNCPDP2  IBNCPDP6  

Entry Points

Name Comments DBIA/ICR reference
CHECK(TALK) ; Retrieve the institution and MAS Service pointer.
; Input: TALK -- 1 : do i/o (writes)
; 0 : no i/o
PAUSE ; Go to end of page to pause.
INPT(DAYS) ; Return a description for Billing Clock days.
; Input: DAYS -- Number of days in a billing clock
; Output: "1st", "2nd", "3rd", "4th"
LAST(PAR) ; Find last action filed for any parent action.
; Input: PAR -- Parent IB Action
; Output: Last action filed for parent (or parent if none)
BFO(DFN,DATE) ; Patient Billed For OPT Copay on a specified date?
; Input: DFN -- Pointer to the patient in file #2
; DATE -- Date of the Outpatient Visit
; Output: 0 -- Not billed the OPT copay on the visit date
; >0 -- Pointer to charge in file #350 that was billed
BFOQ
CNP(DFN,DATE) ; Did the patient have a C&P Exam on a specified date?
; Input: DFN -- Pointer to the patient in file #2
; DATE -- Date of the Outpatient Visit
; Output: 0 -- Patient did not have a C&P Exam on the visit date
; 1 -- Patient had a C&P Exam on the visit date
CNPQ
HDR(OPT) ; Display the header for an action
; Input: OPT -- Action Header
LINE() ; Write a line.
CLOCK(IBDOL,IBDAYPR,IBDAY) ; Display and update clock data.
; Input: IBDOL -- Dollar amount to add or subtract
; IBDAYPR -- Existing number of inpatient days
; IBDAY -- Inpatient days to add or subtract
; Also assumes that IBCLST,IBNAM, IBCLDA, and IBXA are defined.
BFCHK(DFN,DATE,EDATE) ;
; Input: DFN -- Pointer to the patient in file #2
; SDATE -- Start Date of the Patient Visit (inpatient or outpatient)
; EDATE -- (Optional) End Date of the Patient Visit (inpatient only)
BFCHKQ
CHKSTAT(IBSTAT) ; Check to see if the status on the copay allows for the copay to be checked for a duplicate

External References

Name Field # of Occurrence
^DIR PAUSE+4
SITE^IBAUTL CHECK+4
SERV^IBAUTL2 CHECK+5
CLAMT^IBECEAU1 CLOCK+6
CLDSP^IBECEAU1 CLOCK+5
CLINP^IBECEAU1 CLOCK+7
$$DAT1^IBOUTL HDR+9
SCAN^IBSDU CNP+13
CLEAR^VALM1 HDR+3
$$F2H^XLFDT BFCHK+20
$$H2F^XLFDT BFCHK+24

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PAUSE+2
Function Call: WRITE
  • Prompt: "ACTIVE BILLING CLOCK **"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: ?44,"Clock Begin Date: ",$$DAT1^IBOUTL(IBCLDT)
  • Line Location: HDR+9
Function Call: WRITE
  • Prompt: !,$$LINE,!
  • Line Location: HDR+10
Function Call: WRITE
  • Prompt: !,"** Please note that an active billing clock was not selected for updating **"
  • Line Location: CLOCK+5
Routine Call
  • DIR
  • Line Location:
    • PAUSE+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IB - [#350] BFO+8, HDR+4, BFCHK+30, BFCHK+56
^IB("AFDT" BFO+7, BFCHK+26, BFCHK+28
^IB("APDT" LAST+4
^IB("C" BFCHK+55
^IBE(350.1 - [#350.1] BFO+9, BFO+10, BFCHK+35, BFCHK+36, BFCHK+58, BFCHK+60
^TMP("DIERR" CNP+13!
^TMP("IBACMIDX" HDR+4

Label References

Name Line Occurrences
$$CHKSTAT BFCHK+61
$$LAST BFO+8, BFCHK+30
$$LINE HDR+6, HDR+10
BFCHKQ BFCHK+10, BFCHK+21
BFOQ BFO+6
CNPQ CNP+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADD HDR+2~*, HDR+4, HDR+5, HDR+6, HDR+7, HDR+8, HDR+9
DATE BFO~, BFO+6, BFO+7, CNP~, CNP+6, CNP+8, BFCHK~, BFCHK+10, BFCHK+13, BFCHK+20
, BFCHK+34, BFCHK+64
DATEH BFCHK+8~, BFCHK+20*, BFCHK+21
DATEL BFCHK+8~, BFCHK+31*
DAYS INPT~, INPT+3
DFN BFO~, BFO+6, BFO+7, CNP~, CNP+6, CNP+8, BFCHK~, BFCHK+10, BFCHK+26, BFCHK+28
, BFCHK+55
DIR PAUSE+1~, PAUSE+4!
DIR("A" PAUSE+3*
DIR(0 PAUSE+4*
DIRUT PAUSE+1~
DTOUT PAUSE+1~
DUOUT PAUSE+1~
EDATE BFCHK~, BFCHK+11*, BFCHK+12*, BFCHK+13*, BFCHK+20, BFCHK+33, BFCHK+63
EDATEH BFCHK+8~, BFCHK+20*, BFCHK+21
HDR HDR+2~, HDR+3*, HDR+5
I CNP+5~
IBAT BFCHK+8~, BFCHK+56*, BFCHK+57, BFCHK+58, BFCHK+60
IBATBG BFCHK+8~, BFCHK+58*, BFCHK+59
IBATYP BFO+5~, BFO+7, BFO+9*, BFO+10, BFCHK+8~, BFCHK+28, BFCHK+35*, BFCHK+36
IBATYPN BFO+5~, BFO+7, BFO+10*, BFCHK+8~, BFCHK+28, BFCHK+36*, BFCHK+37, BFCHK+40, BFCHK+41
IBATYPNM BFCHK+8~, BFCHK+41*, BFCHK+42
IBCBK CNP+5~, CNP+11*, CNP+13
>> IBCLDA HDR+7, HDR+9, CLOCK+6, CLOCK+7
>> IBCLDT HDR+9
>> IBCLST CLOCK+5, CLOCK+6
IBCNP CNP+5~, CNP+12*, CNP+14
IBD CNP+5~
IBDATA BFCHK+9~, BFCHK+56*
IBDAY CLOCK~, CLOCK+7
IBDAYPR CLOCK~, CLOCK+7
IBDOL CLOCK~, CLOCK+6
IBFDT BFCHK+9~, BFCHK+30*, BFCHK+32, BFCHK+33, BFCHK+56*, BFCHK+63
IBFILTER CNP+5~, CNP+10*, CNP+13
IBFLG BFCHK+8~, BFCHK+28, BFCHK+29*, BFCHK+32*, BFCHK+33*, BFCHK+34*, BFCHK+37*, BFCHK+40*, BFCHK+42*
>> IBIDX HDR+4*, HDR+6, HDR+8
IBJ BFCHK+9~, BFCHK+55*, BFCHK+56, BFCHK+65
IBL LAST+3~, LAST+4*, BFO+5~, BFO+7, BFO+8*, BFCHK+8~, BFCHK+28, BFCHK+30*
IBLAST LAST+3~, LAST+4*, LAST+5
IBLDT LAST+3~, LAST+4*
IBLPDT BFCHK+8~, BFCHK+21*, BFCHK+24
IBN BFO+5~, BFO+7*, BFO+8, HDR+4*, BFCHK+8~, BFCHK+28*, BFCHK+30
>> IBNAM HDR+6, HDR+8, CLOCK+5
>> IBNBR HDR+4, HDR+5
IBND BFO+5~, BFO+7, BFO+8*, BFO+9, HDR+4*, BFCHK+8~, BFCHK+28, BFCHK+30*, BFCHK+35
IBSD CNP+5~
IBSEQNM BFCHK+8~, BFCHK+60*, BFCHK+62
IBSTAT BFCHK+8~, BFCHK+56*, BFCHK+61, CHKSTAT~, CHKSTAT+6, CHKSTAT+7, CHKSTAT+8, CHKSTAT+9, CHKSTAT+10, CHKSTAT+11
IBTDT BFCHK+9~, BFCHK+30*, BFCHK+32, BFCHK+34, BFCHK+56*, BFCHK+64
IBTO BFCHK+9~, BFCHK+12
IBVAL CNP+5~, CNP+13
IBVAL("BDT" CNP+8*
IBVAL("DFN" CNP+8*
IBVAL("EDT" CNP+8*
>> IBXA CLOCK+6, CLOCK+7, BFCHK+16, BFCHK+37, BFCHK+39, BFCHK+40, BFCHK+47, BFCHK+50
IBY CHECK+3~*, CHECK+4*, CHECK+5, CHECK+6, HDR+3*
OPT HDR~, HDR+2, HDR+3
PAR LAST~, LAST+4, LAST+5
SDATE BFCHK+8~, BFCHK+24*, BFCHK+26*, BFCHK+27, BFCHK+28, BFCHK+31
TALK CHECK~, CHECK+4, CHECK+5
U BFCHK+28, BFCHK+30, BFCHK+35, BFCHK+36, BFCHK+37, BFCHK+40, BFCHK+41, BFCHK+56, BFCHK+58, BFCHK+60
X PAUSE+1~
Y CHECK+3~*, CHECK+4, PAUSE+1~, PAUSE+2*, BFO+5~, BFO+7*, BFOQ, CNP+5~, CNP+14*, CNPQ
, BFCHK+8~, BFCHK+21, BFCHK+22*, BFCHK+28*, BFCHK+54*, BFCHK+55, BFCHK+65*, BFCHKQ
Z CNP+5~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All