Routine: IBOVOP

Package	Total	Caller Graph
Integrated Billing	1	IB OUTPUT EVENTS REPORT

Name	Comments	DBIA/ICR reference
END2
END
CPMVST	; Find scheduled appointments for Category C veterans
INIT	;
QUE	;entry point if queued
PRINT	; write visit output

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$S($D(ZTSK):"This job has been queued. The task number is "_ZTSK_".",1:"Unable to queue this job.") Line Location: INIT+11
Function Call: WRITE	Prompt: !!,$P(^DPT(DFN,0),"^") Line Location: PRINT+1
Routine Call	%ZIS Line Location: INIT+4 INIT+12
Routine Call	DIR Line Location: INIT+6 INIT+7
Routine Call	%ZIS Line Location: INIT+8

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	CPMVST+2, PRINT+1, PRINT+3
^DPT("ACS"	CPMVST+2
^TMP("IBOVOP"	QUE+6!

Name	Field # of Occurrence
>> %ZIS	INIT+8*
DFN	CPMVST+2*, END2!, PRINT+1, PRINT+3
DIR	INIT+6!, INIT+7!
DIR("A"	INIT+6, INIT+7
DIR(0	INIT+6, INIT+7
>> DIRUT	INIT+6, INIT+7
IBACT	INIT+5~
IBADFN	INIT+5~
IBAIEN	INIT+5~
IBAMT	INIT+5~
IBAPPT	INIT+5~
IBBDT	INIT+6*, END!, QUE+5, CPMVST+1, CPMVST+2, END2!
IBCKIN	INIT+5~
IBCL	INIT+5~
IBDATA	INIT+5~
IBDATE	INIT+5~, QUE+5, QUE+6, CPMVST+2*, END2!, PRINT+2, PRINT+3
IBEDT	INIT+7*, END!, QUE+6, CPMVST+1, CPMVST+2, END2!
IBEL	INIT+5~
IBFLAG	CPMVST+2, END2!, PRINT+1
IBFLD1	INIT+5~
IBFLD2	INIT+5~
IBFLD3	INIT+5~
IBFLD4	INIT+5~
IBFLD5	INIT+5~
IBFLD6	INIT+5~
IBIEN	INIT+5~
IBJ	INIT+5~
IBLINE	INIT+5~
IBPAGE	INIT+5~, QUE+4*
IBPRNT	INIT+5~
IBQUIT	INIT+4*, END!, QUE+5, QUE+6
IBSDATA	INIT+5~
IBSEQ	INIT+5~
IBSTART	INIT+5~
IBSTAT	INIT+5~
IBTITLE	INIT+5~
IO	INIT+13
IO("Q"	INIT+9, INIT+12!
>> POP	INIT+8
>> X	QUE+6
>> X1	QUE+6*
>> X2	QUE+6*
>> Y	INIT+6, INIT+7
>> ZTDESC	INIT+10*
>> ZTQUEUED	QUE+11
>> ZTREQ	QUE+11*
>> ZTRTN	INIT+10*
>> ZTSAVE("IB*"	INIT+10*
ZTSK	INIT+11, INIT+12!

Information