Routine: IBTRE4

Package	Total	Call Graph
Integrated Billing	5	$$DAT1^IBOUTL LOCKED^IBTRCD1 ^IBTRE $$TRTP^IBTRE1 $$DGPM^IBTRE3
VA Fileman	5	^DIC FILE^DICN ^DIE IX1^DIK ^DIR
Kernel	1	ENDR^%ZISS
Registration	1	($$UPPER,FULL,PAUSE)^VALM1

Package

Total

Call Graph

Integrated Billing

$$DAT1^IBOUTL LOCKED^IBTRCD1 ^IBTRE $$TRTP^IBTRE1 $$DGPM^IBTRE3

VA Fileman

^DIC FILE^DICN ^DIE IX1^DIK ^DIR

Kernel

ENDR^%ZISS

Registration

($$UPPER,FULL,PAUSE)^VALM1

Package	Total	Caller Graph
Integrated Billing	9	IBTOBI4 IBTRC1 IBTRE1 IBTRE3 IBTRE5 IBTRPR2 IBTRV1 IBTRV2 IBTRV3

Package

Total

Caller Graph

Integrated Billing

IBTOBI4 IBTRC1 IBTRE1 IBTRE3 IBTRE5 IBTRPR2 IBTRV1 IBTRV2
IBTRV3

Entry Points

Name	Comments	DBIA/ICR reference
ADD(IBTRN,TYPE)	; -- Add a new procedure
NXT
ASKQ
ADDQ
NEW(ICDI,IBTRN,TYPE)	; -- file new entry
EDTQ
EN(IBTRN)	; -- entry point for protocols
EDT(IBADG,IBDR)	; -- edit entry
ENQ	;
SET(IBTRN)	; -- set array
PROC(IBTRN,IBETYP)	; -- add/edit procedure
SETQ
ASK(IBCNT,IBPAR,IBSELDF)	;Ask user to select from list
REASK
NEWQ
PROCQ
LIST(IBXY)	;List Diagnosis Array

External References

Name	Field # of Occurrence
ENDR^%ZISS	PROC+7
^DIC	NXT+3
FILE^DICN	NEW+4
^DIE	EDT+8
IX1^DIK	NEW+5
^DIR	REASK+3
$$DAT1^IBOUTL	LIST+7
LOCKED^IBTRCD1	EDT+5
^IBTRE	%
$$TRTP^IBTRE1	EN+9
$$DGPM^IBTRE3	NXT+4, NEW+5, SET+2
$$UPPER^VALM1	REASK+4
FULL^VALM1	EN+5
PAUSE^VALM1	EN+10, PROC+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Clinical Information comes from the parent package." Line Location: EN+10
Function Call: WRITE	Prompt: !!,"You can only enter a procedure for an admission",! Line Location: PROC+5
Function Call: WRITE	Prompt: !!,*7,$P(Y,"^",2)," is already a procedure.",! Line Location: NXT+4
Routine Call	DIE Line Location: EDT+8
Routine Call	DIC Line Location: NXT+3
Routine Call	DIR Line Location: REASK+3

FileNo	Call Tags
^IBT(356.91 - [#356.91]	Classic Fileman Calls
^ICD0 - [#80.1]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^IBT(356 - [#356]	EN+7, NEW+5
^IBT(356.91 - [#356.91]	NXT+4, NEW+5*, EDT+5, EDT+6, EDT+7, SET+4, LIST+6
^ICD0 - [#80.1]	LIST+5

Name	Line Occurrences
$$ASK	PROC+10
$$NEW	NXT+6
ADD	PROC+12
ADDQ	NXT+3
ASKQ	REASK+3, REASK+5, REASK+6, REASK+7
EDT	PROC+13, NXT+7
EDTQ	EDT+5
ENQ	EN+10, EN+13
LIST	PROC+10
NXT	NXT+7
PROC	EN+19
PROCQ	PROC+5, PROC+11
REASK	REASK+8
SET	PROC+10

Name	Field # of Occurrence
^(	SET+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	PROC+3~, NEW+2~, NEW+5, EDT+2~, EDT+4, EDT+6
DD	NEW+2~
DIC	PROC+3~, ADD+2~, NXT+2, NXT+3!, NEW+2~, NEW+3
DIC("A"	NXT*
DIC("S"	NXT+1*
DIC(0	NXT+2, NEW+3
DIE	PROC+3~, EDT+2~, EDT+4*
DIK	NEW+2~, NEW+3*
DINUM	NEW+2~
DIR	ASK+5~
DIR("?"	REASK*, REASK+8
DIR("A"	REASK+1*
DIR(0	REASK+2*
DIRUT	ASK+5~
DLAYGO	NEW+2~, NEW+3*
DO	NEW+2~
DR	PROC+3~, EDT+2~, EDT+3*
DTOUT	ADD+2~, ASK+5~, REASK+3
DUOUT	ASK+5~, REASK+3
DUTOU	ADD+2~
I	NEW+2~, LIST+3~, LIST+5*, LIST+6, LIST+7
IBADG	NXT+6, NXT+7, NEW+4, NEW+5, NEWQ, EDT~, EDT+4, EDT+5, EDT+7
IBCNT	EN+4~, PROC+10, ADD+3, NXT, NXT+3, NXT+5, SET+3, SET+5, SET+6, ASK~ , REASK, REASK+1, REASK+5
>> IBDA	SET+4*, SET+6
IBDGPM	EN+4~, EN+7, EN+18, PROC+5, SET+1~, SET+2, SET+4
IBDR	EDT~, EDT+3
IBETYP	EN+4~, EN+9*, EN+10, EN+13, EN+19, PROC~, PROC+2, PROC+5
IBICD	SET+1~, SET+3, SET+4, SET+6
IBPAR	ASK~, REASK, REASK+1, REASK+6
>> IBQUIT	PROC+11*
>> IBSEL	PROC+9, PROC+10, PROC+11, PROC+12, PROC+13
IBSELDF	ASK~, REASK, REASK+1, REASK+7
>> IBTNOD	LIST+6*, LIST+7
IBTRN	EN~, EN+7, EN+9, EN+19, PROC~, PROC+1, PROC+10, PROC+12, ADD~, NXT+4 , NXT+6, NEW~, NEW+5, SET~, SET+2
IBTRND	EN+4~, EN+7*
IBXD	LIST+3~, LIST+5*, LIST+7
IBXY	EN+4~, PROC+10, LIST~
IBXY(	PROC+13, SET+6*, LIST+5, LIST+6
ICDI	NEW~, NEW+3
>> IOINHI	PROC+8
>> IOINORM	PROC+8
J	NEW+2~
TYPE	ADD~, ADD+4*, NXT+6, NXT+7, NEW~
>> VALMBCK	EN+6, EN+15, EN+19*
X	PROC+7, ADD+2~, NXT+2, NEW+2~, NEW+3*, ASK+5~
Y	ADD+2~, NXT+3, NXT+4, NXT+6, NEW+2~, NEW+4, ASK+5~, REASK+3, REASK+4, REASK+5 , REASK+6, REASK+7, ASKQ

Customize PDF page

Package: Integrated Billing

Routine: IBTRE4

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: