Routine: IBCDE

Information

IBCDE ;ALB/ARH - AUTOMATED BILLER ERRORS ; 8/6/93

Source Information

Source file <IBCDE.m>

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
VA Fileman	6	^DIC FILE^DICN ^DIE ^DIK EN1^DIP ^DIR
Integrated Billing	1	$$FMDATES^IBCU2
Kernel	1	($$FMADD,$$FMTE)^XLFDT

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Integrated Billing	4	IB AUTO BILLER PARAMS IB CLEAN AUTO BILLER LIST IB OUTPUT AUTO BILLER IBCDC

Entry Points

Name	Comments	DBIA/ICR reference
COMM1E
COMM2E
FINDB(IFN)	;search for any entries for a particular bill, returns string of comment file entry numbers separated by "^"
EDIT	;edit auto bill parameters, OPTION
DELDTQ
PE
DELDT	;deletes entries from file (362.1) based on date and if they have a bill, OPTION
EDITQ
COMM2(IFNC,COMM,DEL)	;adds/deletes comments form a comment file entry, nothing returned
FIND(TRN,IFN)	;find an entry in the comments file, returns IFN of comment entry
SETCOMM	;sets errors/comments into file (362.1) based on array passed in
PRINT	;print error/comments file (362.1), OPTION
E2
COMM1(TRN,IFN)	;returns the comment entry number for event and bill, updates comment date and bill IFN

External References

Name	Field # of Occurrence
^DIC	E2
FILE^DICN	COMM1+5
^DIE	COMM1+7, COMM2+4, EDIT+1, E2+1
^DIK	DELDT+7
EN1^DIP	PRINT+5
^DIR	DELDT+4
$$FMDATES^IBCU2	PRINT+2
$$FMADD^XLFDT	DELDT+1
$$FMTE^XLFDT	PRINT+3, DELDT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "." Line Location: DELDT+7
Routine Call	DIE Line Location: COMM1+7 COMM2+4 EDIT+1 E2+1
Routine Call	DIC Line Location: E2
Routine Call	DIR Line Location: DELDT+4

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^IBE(350.9 - [#350.9]	Classic Fileman Calls
^IBE(356.6 - [#356.6]	Classic Fileman Calls
^IBA(362.1 - [#362.1]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	COMM1+2
^IBA(362.1 - [#362.1]	COMM1+4, COMM2+3, COMM2+4, COMM2+5, COMM2+6, COMM2+7, FIND+7, FINDB+2, DELDT+6
^IBT(356 - [#356]	COMM1+2
^TMP("IBCE"	SETCOMM+4, SETCOMM+5, SETCOMM+6, SETCOMM+7, SETCOMM+9

Label References

Name	Line Occurrences
$$COMM1	SETCOMM+8
$$FIND	COMM1+3
COMM1E	COMM1+2, COMM1+3
COMM2	SETCOMM+8, SETCOMM+10
COMM2E	COMM2+3
DELDTQ	DELDT+4
E2	E2+2
EDITQ	EDIT+1, E2
PE	PRINT+2

Naked Globals

Name	Field # of Occurrence
^(	SETCOMM+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BY	PRINT+4*, PE!
COMM	COMM2~, COMM2+5
DA	COMM1+7!, COMM2+4!, EDIT+1, E2+1, EDITQ!, DELDT+7*, DELDTQ!
DD	COMM1+5!
DEL	COMM2~, COMM2+4
DHD	PRINT+3*, PE!
DIC	COMM1+5!, COMM1+7!, COMM2+4!, PRINT+4, PE!, E2*, DELDTQ!
DIC("DR"	COMM1+5*
DIC(0	COMM1+5, E2
DIE	COMM1+7!, COMM2+4!, EDIT+1, E2+1, EDITQ!
DIK	DELDT+7*, DELDTQ!
DIOEND	PE!
DIR	DELDT+4!
DIR("?"	DELDT+1, DELDT+2
DIR("A"	DELDT+3*
DIR("B"	DELDT+1*
DIR(0	DELDT+3*
DIROUT	PE!
DIRUT	PE!
DO	COMM1+5!
DR	COMM1+5, COMM1+7!, COMM2+4!, EDIT+1, E2+1*, EDITQ!
DT	COMM1+5, COMM2+7, DELDT+1
DTOUT	PE!
DUOUT	PE!
FLDS	PRINT+4*, PE!
FR	PRINT+4*, PE!
IBCE	DELDT+6*, DELDT+7, DELDTQ!
IBDA	SETCOMM+8, SETCOMM+10, SETCOMM+11!, COMM1+2~, COMM1+3, COMM1+4, COMM1+5*, COMM1+7, COMM1E
IBDA1	COMM2+3~, COMM2+5, COMM2+6, COMM2+7
IBDATES	PRINT+2*, PRINT+3, PRINT+4, PE!
IBDT	SETCOMM+5, SETCOMM+6, SETCOMM+7, SETCOMM+9, SETCOMM+11!, DELDT+1, DELDT+3, DELDT+4*, DELDT+6
IBIFN	SETCOMM+7*, SETCOMM+8, SETCOMM+9, SETCOMM+11!
IBTRN	SETCOMM+6*, SETCOMM+7, SETCOMM+8, SETCOMM+9, SETCOMM+11!
IBX	SETCOMM+9*, SETCOMM+10, SETCOMM+11!
IFN	COMM1~, COMM1+2, COMM1+3, COMM1+7, FIND~, FIND+6, FIND+7, FINDB~, FINDB+1*, FINDB+2
IFNC	COMM2~, COMM2+3, COMM2+4, COMM2+5, COMM2+6, COMM2+7
L	PRINT+4*, PE!
TO	PRINT+4*, PE!
TRN	COMM1~, COMM1+2, COMM1+3, COMM1+5, FIND~, FIND+6, FIND+7, FINDB+1*
U	COMM1+4, COMM2+6, FIND+7, PRINT+3, PRINT+4, DELDT+6
X	SETCOMM+11!, COMM1+2~, COMM1+5, COMM2+3~, FIND+6~, FIND+7, FIND+8, FINDB+1~, FINDB+2, FINDB+3 , PE!, EDITQ!, DELDT+6, DELDTQ!
X1	FIND+6~, FIND+7*
Y	SETCOMM+11!, COMM1+2~, COMM1+5, COMM2+3~, FIND+6~, FIND+7, FINDB+1~, FINDB+2*, PE!, EDIT+1 , E2, E2+1, EDITQ!, DELDT+4, DELDTQ!

Customize PDF page

Package: Integrated Billing

Routine: IBCDE

Call Graph Total: 8

Caller Graph Total: 4