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 |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: IBPF1

Package: Integrated Billing

Routine: IBPF1


Information

IBPF1 ;ALB/CPM - FIND BILLING DATA TO ARCHIVE (CON'T.) ; 20-APR-92

Source Information

Source file <IBPF1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Accounts Receivable 2 $$PUR^PRCAFN  $$BIEN^RCFN03  
Integrated Billing 1 $$FILE^IBRXUTL  

Entry Points

Name Comments DBIA/ICR reference
BILL ; Find all UB-82's which may be archived. Check only those bills
; whose First Printed Date is prior to the last date on which a
; bill must have been closed out in Accounts Receivable.
IB ; Find Pharmacy Co-pay IB Actions which may be archived. Check
; only those Pharmacy Co-pay IB Actions which have been added to the
; database prior to the last date on which a bill must have been
; closed out in Accounts Receivable. Only "parent actions" will
; be checked, and if the parent action may be archived, the parent
; and its "children" will all be marked for archiving.
RXFILE(IBND) ; Is the prescription still resident on-line?
; Input: IBND -- zeroth node of IB Action
; Output: 1 -- the rx is still on file
; 0 -- the rx is no longer on file (archived)
ALL(IBN,DATE) ; Are all bills for an episode of care closed before DATE?
; Input: IBN -- ien of bill in file #399
; DATE -- the date by which the bills must be closed
; Output: 1 -- all bills are closed
; 0 -- at least one bill is not closed
CLO(IBN,DATE) ; Is the bill closed before DATE?
; Input: IBN -- ien of bill in file #399
; DATE -- the date by which the bill must be closed
; Output: 1 -- the bill is closed
; 0 -- the bill is not closed
PSO ; Pharmacy Co-pay Action Types

External References

Name Field # of Occurrence
$$FILE^IBRXUTL RXFILE+7
$$PUR^PRCAFN CLO+5
$$BIEN^RCFN03 IB+23

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" IB+22
^DGCR(399 - [#399] BILL+9, ALL+7
^DIBT - [#.401] BILL+9*, IB+24*
^IB - [#350] IB+18
^IB("AD" IB+17, IB+24
^IB("D" IB+16, IB+17
^IBE(350.1 - [#350.1] IB+12
^PRCA(430 - [#430] IB+23

Label References

Name Line Occurrences
$$ALL BILL+9
$$CLO IB+24, ALL+6, ALL+7
$$RXFILE IB+20

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLO CLO+5~*, CLO+6
DA IB+24*, IB+27!
DATE ALL~, ALL+6, ALL+7, CLO~, CLO+6
I IB+12*, ALL+5~, ALL+7*
IBA IB+12!, IB+27!
IBA( IB+12*, IB+19
IBAR IB+21*, IB+23*, IB+24, IB+27!
IBATYP IB+12*, IB+27!
IBATYPN IB+12*, IB+27!
IBCLO BILL+10!, IB+27!
>> IBCNT BILL+8*, BILL+9*, IB+15*, IB+24*
IBDT BILL+8*, BILL+9*, BILL+10!, IB+15*, IB+16*, IB+17, IB+27!
>> IBEDT BILL+9, IB+16, IB+24
IBN BILL+8*, BILL+9*, BILL+10!, IB+15*, IB+17*, IB+18, IB+24, IB+27!, ALL~, ALL+6
, ALL+7, CLO~, CLO+5
IBND IB+18*, IB+19, IB+20, IB+21, IB+27!, RXFILE~, RXFILE+5
IBSL RXFILE+4~, RXFILE+5*, RXFILE+6*, RXFILE+7
>> IBTMPL BILL+9, IB+24
RXCHK RXFILE+4~, RXFILE+7*, RXFILE+8
X IB+22*, IB+27!, ALL+5~, ALL+6*, ALL+7*, ALL+8

Marked Items

Name Field # of Occurrence
$T(PSO+I IB+12
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All