Routine: IBTRCD1

Package	Total	Call Graph
Integrated Billing	5	($$DAT1,PAUSE)^IBOUTL ^IBTRC QE1^IBTRC1 BLD^IBTRCD BLD^IBTRE
List Manager	2	EN^VALM (FULL,PAUSE)^VALM1
VA FileMan	2	^DIE ^DIK

Package	Total	Caller Graph
Integrated Billing	37	IBCNBMN IBCNSA2 IBCNSC02 IBCNSC1 IBCNSD1 IBCNSJ5 IBCNSJ51 IBCNSJ54 IBCNSM3 IBCNSM32 IBCNSP01 IBCNSP02 IBCNSP1 IBCNSP11 IBCNSP3 IBNCPDR1 IBTRC APPEAL/DENIALS IBTRC1 IBTRCD ACTION INFO IBTRCD APPEAL INFO IBTRCD COMMENT INFO IBTRCD CONTACT INFO IBTRCD EDIT PT. INS. IBTRCD INSURANCE INFO IBTRCD STATUS CHANGE IBTRD1 IBTRDD1 IBTRE VIEW PAT INS IBTRE3 IBTRE4 IBTRE5 IBTRED1 IBTRED2 IBTRP IBTRPR1 IBTRV2 IBTRVD1
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
QE	; -- Quick edit
NX(IBTMPNM,BLD)	; -- edit next template
EDIT(DR,BLD)	; -- edit entry point for claims tracking reviews ; -- Input IBTEMP = template name or dr string ; BLD = any non-zero value if calling routine is doing own ; rebuild
EDITQ
SAVE	; -- Save the global before editing
COMP	; -- Compare before editing with globals
UPDATE	; -- enter date and user if editing has taken place ; entry locked during edit lock not needed here
LOCKED	; -- write locked message
CON	; -- consistency checker for insurance reviews
NXRV	; -- check Next Review Dates
ASKDEL	; -- ask if okay to delete next review dates
10	;;1.07///@;.2///@;.21///@
20	;;.14///@;1.08///@;.2///@;21///@;2.02///@
30	;;.14///@;1.07///@;1.08///@;.2///@;21///@;2.02///@
40	;;.14///@;1.07///@;1.08///@;21///@;2.02///@
50	;;.14///@;1.07///@;1.08///@;.2///@;2.02///@
99	;;.14///@;1.07///@;1.08///@;.2///@;21///@;2.02///@

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EDIT+6
Function Call: WRITE	Prompt: !!,"Sorry, another user currently editing this entry." Line Location: LOCKED+4
Function Call: WRITE	Prompt: !,"Try again later." Line Location: LOCKED+5
Routine Call	DIE Line Location: EDIT+10 UPDATE+4
Routine Call	VALM Line Location: NX+2

FileNo	Call Tags
^IBT(356.2 - [#356.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	NXRV+7
^IBE(356.11 - [#356.11]	NXRV+7
^IBE(356.7 - [#356.7]	CON+3
^IBT(356.2 - [#356.2]	EDIT+9, EDIT+14, SAVE+2, SAVE+3, SAVE+4, SAVE+5, SAVE+6, SAVE+7, COMP+2, COMP+3 , COMP+4, COMP+5, COMP+6, COMP+7, CON+2, CON+3, CON+7, CON+11, CON+14, CON+15 , CON+19, CON+20, CON+23, CON+24, NXRV+2, NXRV+4, NXRV+5, NXRV+11, NXRV+16
^TMP($J	EDITQ!, SAVE+1!, SAVE+2, SAVE+3, SAVE+4, SAVE+5, SAVE+6, SAVE+7, COMP+2, COMP+3 , COMP+4, COMP+5, COMP+6, COMP+7, CON+7, CON+10, CON+11

Name	Field # of Occurrence
^(0	NXRV+6

Name	Field # of Occurrence
BLD	NX~, NX+3, NX+4, EDIT~, EDIT+15
DA	QE+1~, EDIT+5~, EDIT+8, EDIT+10!, UPDATE+2, UPDATE+4!, CON+1~, CON+20, CON+24
DA(1	CON+20, CON+24
DIC	QE+1~, EDIT+5~, EDIT+10!, UPDATE+4!, CON+1~
DIE	QE+1~, EDIT+5~, EDIT+8, EDIT+10!, UPDATE+2, UPDATE+4!, CON+1~
>> DIK	CON+20, CON+24
DIR	EDIT+5~
DIR("A"	NXRV+18*
DR	QE+1~, EDIT~, EDIT+10!, UPDATE+3, UPDATE+4!, CON+1~, CON+12, CON+13
DUZ	UPDATE+3
I	CON+1~
IBACTION	CON+1~, CON+3, CON+4, CON+14, CON+15, CON+19, CON+23
IBCON	EDIT+11!, CON+2*
IBDEL	CON+1~, NXRV+10, ASKDEL+1*
IBDIF	EDIT+5~, EDIT+13, COMP+1, COMP+2, COMP+3, COMP+4, COMP+5, COMP+6, COMP+7*
>> IBFASTXT	NX+3
IBI	CON+1~, CON+20, CON+24, NXRV+4*, NXRV+5, NXRV+7
IBI(	NXRV+7*, NXRV+11, NXRV+15, NXRV+16
IBI(0	NXRV+10, NXRV+11
IBI0	NXRV+1~, NXRV+6*, NXRV+7
IBIX	NXRV+1~, NXRV+15*, NXRV+16
>> IBSUPRES	LOCKED+3
IBTLST	EDIT+5~
IBTMPNM	NX~, NX+2, NX+4
>> IBTRC	EDIT+8, EDIT+9, EDIT+14, SAVE+2, SAVE+3, SAVE+4, SAVE+5, SAVE+6, SAVE+7, COMP+2 , COMP+3, COMP+4, COMP+5, COMP+6, COMP+7, UPDATE+2, CON+2, CON+3, CON+7, CON+10 , CON+11, CON+14, CON+15, CON+19, CON+20, CON+23, CON+24, NXRV+2, NXRV+11
IBTRN	NXRV+2~*, NXRV+3, NXRV+4
IBXX	QE+1~, NX+1~
IOM	NXRV+14, NXRV+18
J	CON+1~
U	NXRV+7, NXRV+11, NXRV+16
>> VALMBCK	QE+4, NX+5, EDITQ+1*
VALMY	QE+1~, NX+1~
X	EDIT+5~, CON+1~
Y	EDIT+5~, CON+1~
>> ZTQUEUED	LOCKED+1

Name	Field # of Occurrence
$T(@(1)	CON+12