Routine: IBOCHK

Package	Total	Call Graph
Kernel	4	(,HOME)^%ZIS ^%ZISC T1^%ZOSV ^%ZTLOAD
VA Fileman	2	^DIC D^DIQ
Integrated Billing	1	PAUSE^IBOUTL
Registration	1	PID^VADPT

Package

Total

Call Graph

Kernel

(,HOME)^%ZIS ^%ZISC T1^%ZOSV ^%ZTLOAD

VA Fileman

^DIC D^DIQ

Integrated Billing

PAUSE^IBOUTL

Registration

PID^VADPT

Package	Total	Caller Graph
Integrated Billing	1	IB OUTPUT VERIFY RX LINKS

Package

Total

Caller Graph

Integrated Billing

IB OUTPUT VERIFY RX LINKS

Name	Comments	DBIA/ICR reference
END	;
HDR	;
CHK
DEV
ST
TO
LINE	;
IBOERR	;error messages
DQ	; -entry point from queing

Name	Field # of Occurrence
^%ZIS	DEV+1
HOME^%ZIS	%+4
^%ZISC	END+5
T1^%ZOSV	END+2
^%ZTLOAD	DEV+2
^DIC	ST, TO
D^DIQ	DQ+3
PAUSE^IBOUTL	LINE+1
PID^VADPT	LINE+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,?24,"Verify IB - Pharmacy Co-Pay links",!! Line Location: IBOCHK+10
Function Call: WRITE	Prompt: *7,!!,"End must not be less than beginning number",! Line Location: TO+1
Function Call: WRITE	Prompt: ! Line Location: DEV+2
Function Call: WRITE	Prompt: !,IBLINE Line Location: HDR+6
Function Call: WRITE	Prompt: ?12,$E($P(^DPT(DFN,0),"^"),1,20),?34,VA("BID"),?40,$P($P(IBND,"^",8),"-"),?50,$P($P(IBSL,";",2),":",2),?58,IBSL,?80,$P(IBND,"^",11),?91,$P(IBND,"^",12) Line Location: LINE+4
Routine Call	%ZIS Line Location: %+4
Routine Call	DIC Line Location: ST TO
Routine Call	%ZIS Line Location: DEV+1

FileNo	Call Tags
^IB - [#350]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	LINE+4
^IB - [#350]	CHK+1, CHK+2, CHK+3
^IB("B"	DQ+5
^PSRX - [#52]	CHK+6, CHK+7, CHK+8, CHK+10, CHK+11, CHK+12

Name	Line Occurrences
CHK	DQ+5
END	ST, TO, DEV+1, DEV+2, DQ+6
HDR	DQ+3, LINE+1
LINE	CHK+1, CHK+3, CHK+6, CHK+7, CHK+8, CHK+10, CHK+11, CHK+12
ST	TO+1

Name	Field # of Occurrence
^("IB"	CHK+8
^(0	CHK+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	DEV+1*
>> %ZIS("A"	DEV+1*
>> DFN	LINE+3*, LINE+4
DIC	ST!, TO!
DIC("A"	ST, TO
DIC("B"	ST, TO
DIC(0	ST, TO
DT	DQ+3
IBCNT	DQ+3, CHK, END+4!
IBECNT	DQ+3, LINE+2, END+4!
IBEND	TO*, TO+1, DQ+5, HDR+4, END+4!
>> IBHDT	DQ+3*, HDR+3
IBLINE	HDR+6*!
IBN	DQ+5*, CHK+1, CHK+2, CHK+3, END+4!
IBND	CHK+1, CHK+2, LINE+3, LINE+4, END+4!
>> IBOERR	CHK+1, CHK+3, CHK+6, CHK+7, CHK+8, CHK+10, CHK+11, CHK+12
IBPAG	DQ+3, HDR+1, HDR+2, HDR+3, END+4!
IBQUIT	DQ+3*, DQ+5, LINE+1, END+4!
IBRNUM	DQ+4, DQ+5, END+4!
IBRXN	CHK+5*, CHK+6, CHK+7, CHK+8, CHK+10, CHK+11, CHK+12, END+4!
IBRXN1	CHK+5*, CHK+9, CHK+10, CHK+11, CHK+12, END+4!
IBSL	CHK+3*, CHK+4, CHK+5, LINE+4, END+4!
IBSTART	ST*, TO+1, DQ+4, HDR+4, END+4!
IHDT	END+4!
IO	DEV+4
IO("Q"	DEV+2!
IOF	%+4, HDR+2
IOM	HDR+3, HDR+6
IOSL	LINE+1
IOST	HDR+2
>> POP	DEV+1
>> VA("BID"	LINE+4
>> XRT0	END+2
>> XRTN	END+2*
>> Y	ST, TO, DQ+3*
>> ZTDESC	DEV+2*
>> ZTQUEUED	END+4
>> ZTRTN	DEV+2*
>> ZTSAVE("IB*"	DEV+2*

Customize PDF page

Package: Integrated Billing

Routine: IBOCHK

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items