Routine: IBOVOP1

Package	Total	Call Graph
Integrated Billing	4	$$INSURED^IBCNS1 $$PT^IBEFUNC $$STOP^IBOUTL (HDR,PRINT)^IBOVOP2
Scheduling	2	$$STATUS^SDAM1 CL^SDCO21
Registration	1	$$BIL^DGMTUB
VA Fileman	1	Y^DIQ

Package	Total	Caller Graph
Integrated Billing	2	IBAMTBU2 IBOVOP

Name	Comments	DBIA/ICR reference
END
APPT	; scan visits for NSC patients
REGS	; registrations for day
FLD3(Y)	; time - convert date/time to time only, no seconds
STOPCD	; scan ADD/EDIT STOP CODES for day
MAIN	; perform report for day(s)
FLD5(I)	; get appointment type name
FLD1(DFN)	; get patient name, l-4 ssn id, classification, insured?

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	FLD3+2
^DD(2.101	REGS+5, REGS+7
^DIC(40.7 - [#40.7]	STOPCD+8
^DPT - [#2]	APPT+10, REGS+4
^DPT("ADIS"	REGS+1, REGS+2, REGS+3
^SC - [#44]	APPT+6, APPT+7, APPT+8
^SC("AC"	APPT+6
^SD(409.1 - [#409.1]	FLD5+1
^SDV - [#409.5]	STOPCD+5, STOPCD+6, STOPCD+7
^TMP("IBOVOP"	END!, APPT+11, STOPCD+8, REGS+8*

Name	Field # of Occurrence
>> C	REGS+5, REGS+7
DFN	END!, APPT+8, APPT+9, APPT+10, APPT+11, STOPCD+5, STOPCD+8, REGS+2*, REGS+3, REGS+4 , REGS+8, FLD1~, FLD1+1, FLD1+2, FLD1+3, FLD1+7
I	STOPCD+6*, STOPCD+7, FLD5~, FLD5+1
IB	END!, STOPCD+6*
>> IBAIEN	REGS+3*, REGS+4
IBAPPT	END!
>> IBCL	APPT+5, APPT+6, APPT+7, APPT+8, APPT+11
>> IBDATA	STOPCD+7, STOPCD+8, REGS+4, REGS+5, REGS+7, REGS+8
>> IBDATE	APPT+7, STOPCD+4, STOPCD+5, REGS+1, FLD1+3, FLD1+7
>> IBFLD4	APPT+6, APPT+11, REGS+6, REGS+8
>> IBIEN	APPT+8*
IBJ	END!, APPT+7, APPT+8, APPT+9, APPT+10, APPT+11, STOPCD+4, STOPCD+5, STOPCD+6, STOPCD+7 , STOPCD+8, REGS+1, REGS+2, REGS+3, REGS+8
>> IBQUIT	MAIN+2*
>> IBSDATA	APPT+10*, APPT+11
>> IBSEQ	APPT+5, APPT+11, STOPCD+4, STOPCD+8*, REGS+8
IBX	FLD1+2~*, FLD1+7
IBY	FLD1+2~, FLD1+3
IBY(1	FLD1+4
IBY(2	FLD1+5
IBY(4	FLD1+6
IBZ	FLD1+2~, FLD1+4, FLD1+5, FLD1+6, FLD1+7
Y	REGS+5, REGS+6, REGS+7, REGS+8, FLD3~, FLD3+1, FLD3+2

Information