Routine: IBTRED2

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

IBTRED2 ;ALB/AAS - CLAIMS TRACKING EDIT BILLING INFORMATION; 06-JUL-93

Source Information

Source file <IBTRED2.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Integrated Billing	5	PAT^IBCNSM LOCKED^IBTRCD1 TEST^IBTRE2 (COMP,SAVE,UPDATE)^IBTRED1 TRAC^IBTRV
VA FileMan	3	DT^DICRW ^DIE ^DIR
Kernel	2	HOME^%ZIS $$FMADD^XLFDT

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Integrated Billing	1	IBT EDIT REASON NOT BILLABLE

Entry Points

Name	Comments	DBIA/ICR reference
PAT	; -- select patient
CT	; -- select claims tracking entry
END
EDIT(IBTEMP)	; -- edit without list manager ; -- Input IBTEMP = template name or dr string
EDITQ
ADD	; -- ask if want to add a new tracking id
ADDQ

External References

Name	Field # of Occurrence
HOME^%ZIS	%+1
DT^DICRW	%
^DIE	EDIT+9
^DIR	ADD+6
PAT^IBCNSM	PAT+2
LOCKED^IBTRCD1	EDIT+5
TEST^IBTRE2	ADD+13
COMP^IBTRED1	EDIT+10
SAVE^IBTRED1	EDIT+6
UPDATE^IBTRED1	EDIT+11
TRAC^IBTRV	CT+1
$$FMADD^XLFDT	ADD+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,?15,"Assign Reason Not Billable to Claims Tracking Entry",!! Line Location: IBTRED2+6
Function Call: WRITE	Prompt: !! Line Location: CT+5
Function Call: WRITE	Prompt: ! Line Location: ADD+3
Function Call: WRITE	Prompt: ! Line Location: ADD+12
Function Call: WRITE	Prompt: ! Line Location: ADDQ+0
Routine Call	%ZIS Line Location: %+1
Routine Call	DIE Line Location: EDIT+9
Routine Call	DIR Line Location: ADD+6

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^IBT(356 - [#356]	EDIT+5, EDIT+12
^TMP($J	EDITQ!

Label References

Name	Line Occurrences
ADD	CT+2
ADDQ	ADD+2, ADD+7
EDIT	CT+4
EDITQ	EDIT+4, EDIT+5
END	PAT+1, PAT+2, CT+2
PAT	CT+3, CT+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	EDIT+3~, EDIT+7*
DFN	PAT+2, END!, ADD+2
DIC	EDIT+3~
DIE	EDIT+3~, EDIT+7*
DIR	ADD+1~, ADD+6!
DIR("?"	ADD+5*
DIR("A"	ADD+4*
DIR("B"	ADD+4*
DIR(0	ADD+4*
DR	EDIT+3~, EDIT+8*
DT	%, ADD+11
I	EDIT+3~
>> IBDIF	EDIT+11
IBOK	ADD+1~, ADD+6*, ADD+7
>> IBQUIT	%+3*, PAT+1, CT+2
>> IBTASS	ADD+10*
>> IBTBDT	ADD+11*
>> IBTEDT	ADD+11*
IBTEMP	EDIT~, EDIT+8
IBTRN	CT+3, END!, EDIT+4, EDIT+5, EDIT+7, EDIT+12, ADD+1!
IBY	CT+2, END!
IOF	%+1, %+2
J	EDIT+3~
VALMQUIT	PAT+2, END!
X	EDIT+3~
Y	EDIT+3~, ADD+6