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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: IBDFOSG1

Package: Automated Information Collection System

Routine: IBDFOSG1


Information

IBDFOSG1 ;ALB/MAF/AAS - SCANNED ENCOUNTERS WITH BILLING DATA CONT. ; JUL 6 1995

Source Information

Source file <IBDFOSG1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Accounts Receivable 1 $$TPR^PRCAFN  
Integrated Billing 1 $$INSURED^IBCNS1  
Registration 1 $$PRIM^VASITE  
VA FileMan 1 ^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Automated Information Collection System 1 IBDFOSG  

Entry Points

Name Comments DBIA/ICR reference
START ; -- Loop thru clinics
CHECK(CLIN) ;
; -- Check to see if clinic has a form and its one that
; is not for future use only.
CK(XCL) ; -- Check clinic, division, form
BLD ; -- scan appts
CK1 ; -- Check scheduling nodes, forms tracking, if scanned,
; patient insured, bill entered, bill printed,
; avg time from encounter to printed bill.
SET ; -- Set counters in temp arrays
; Piece 1 := Number bills entered
; Piece 2 := Number bills generated
; Piece 3 := Number of forms scanned for patients with INS
; Piece 4 := Number of forms scanned
; Piece 5 := Number of days from encounter date to bill printed
; Piece 6 := amount billed (for unique bill)
; Piece 7 := amount received (for unique bills)
; Piece 8 := number of unique bills
; Piece 9 := Number of visit dates on bills in 8
INC(PIECE,VALUE) ;
; -- increment counters,

External References

Name Field # of Occurrence
^%DTC CK1+31
$$INSURED^IBCNS1 CK1+11
$$TPR^PRCAFN CK1+25
$$PRIM^VASITE CK+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] CK+5
^DGCR(399 - [#399] CK1+12, CK1+13, CK1+14, CK1+15, CK1+24, CK1+27
^DPT - [#2] CK1+4, CK1+7
^IBD(357.96 - [#357.96] CK1+9, SET+11
^SC - [#44] START+4, CK+1, CK+3, BLD+1, BLD+2
^SD(409.95 - [#409.95] CHECK+5, CHECK+6, CHECK+7
^TMP("CTOT" CK+8*, SET+13, SET+27*
^TMP("DTOT" CK+9*, SET+14, SET+28*
^TMP("GTOT" START+3*, SET+15, SET+29*
^TMP("IBD-BILL" CK1+22, CK1+23*
^TMP("IBD-ENTERED" CK1+18*
^TMP("IBD-PRINTED" CK1+19*
^TMP("MCCR" SET+11*

Label References

Name Line Occurrences
$$CHECK CK+7
BLD START+4
CK START+4
CK1 BLD+2
INC SET+17, SET+18, SET+19, SET+20, SET+21, SET+22, SET+23, SET+24, SET+25
SET CK1+12, CK1+32

Naked Globals

Name Field # of Occurrence
^(0 BLD+2, CK1+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CLIN CHECK~, CHECK+5, CHECK+6
>> DFN BLD+2*, CK1+4, CK1+7, CK1+9, CK1+11, CK1+12, CK1+13, CK1+18, SET+11
HASFORM CHECK+3~, CHECK+4*, CHECK+8
>> IBDFBEG BLD+1
IBDFCL CHECK+3~, CHECK+6*, CHECK+7
IBDFCLIN START+1~, START+4*, BLD+1, BLD+2, SET+11
>> IBDFDA BLD+2*
>> IBDFEND BLD+1
>> IBDFIFN CK1+9*, SET+11
>> IBDFMUL CK+5
IBDFNODE CHECK+3~, CHECK+7*, CK+3*, CK+4, CK+5, CK+6, CK+8, CK1+6, SET+13, SET+27
>> IBDFNUM CK1+13*, CK1+14, CK1+15, CK1+18, CK1+19, CK1+22, CK1+23, CK1+24, CK1+25, CK1+27
>> IBDFSA BLD+2*
>> IBDFT BLD+1*, BLD+2, CK1+4, CK1+9, CK1+11, CK1+12, CK1+13, CK1+31, SET+11
>> IBDFTMP SET+13*, SET+27, INC+2*
>> IBDFTMP1 SET+14*, SET+28, INC+3*
>> IBDFTMP2 SET+15*, SET+29, INC+4*
IBDFXPC CK1+5~, CK1+6*, SET+11
IBDFYPC CK1+5~, CK1+7*, SET+11
>> IBDIVNM CK+5*, CK+8, CK+9, CK1+18, SET+11, SET+13, SET+14, SET+27, SET+28
>> IBFLG1 CK1+10*, CK1+17, CK1+18*, SET+17
>> IBFLG2 CK1+10*, CK1+13, CK1+19*, CK1+22, SET+18
>> IBFLG3 CK1+10*, CK1+11*, SET+19
>> IBFLG5 CK1+10*, CK1+31*, SET+21
>> IBFLG6 CK1+10*, CK1+24*, SET+22
>> IBFLG7 CK1+10*, CK1+25*, SET+23
>> IBFLG8 CK1+10*, CK1+26*, SET+24
>> IBFLG9 CK1+10*, CK1+27*, SET+25
>> IBMCNODE CK1+14*
>> IBMCSND CK1+15*, CK1+16, CK1+17, CK1+19, CK1+31
IBQUIT START+1~, START+2*, START+4, CK+2*, CK+7*
PIECE INC~, INC+2, INC+3, INC+4
>> VADAT("W" CK1+31
VALUE INC~, INC+2, INC+3, INC+4
>> VAUTD CK+6
>> VAUTD( CK+6
>> X CK1+25*, CK1+31
>> X1 CK1+31*
>> X2 CK1+31*
XCL CK~, CK+1, CK+3, CK+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All