Routine: IBRREL

Package	Total	Call Graph
Integrated Billing	4	$$PT^IBEFUNC $$DAT1^IBOUTL ^IBR $$IB^IBRUTL
VA Fileman	2	^DIC ^DIR
Kernel	1	HOME^%ZIS

Package	Total	Caller Graph
Integrated Billing	1	IB MT RELEASE CHARGES

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Entry point for stand-alone 'release' option
END
HDR	; Display charge header.
ERR	; Display error message.
RESUME
HLP	; Display basic help message.
HLP1	; Display all patients with charges 'on hold.'
LST	; Display individual IB Action.
AR	; Accounts Receivable entry point to release charges.
ASK	;
HELP	; Help for the 'Select' prompt.

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There are no patients with charges 'on hold' at this time.",! Line Location: EN+1
Function Call: WRITE	Prompt: !!,"This patient does not have any charges 'on hold.'",! Line Location: ASK+12
Function Call: WRITE	Prompt: @IOF,$P(IBPT,"^")," Pt ID: ",$P(IBPT,"^",2),! Line Location: ASK+14
Function Call: WRITE	Prompt: I Line Location: ASK+14
Function Call: READ	Prompt: "Enter RETURN to continue or '^' to stop: " Formatting: ! Timeout: DTIME Variable: X Line Location: RESUME+2
Function Call: WRITE	Prompt: ! Line Location: RESUME+6
Function Call: WRITE	Prompt: ! Line Location: RESUME+11
Function Call: WRITE	Prompt: !! Line Location: RESUME+18
Function Call: WRITE	Prompt: ! Line Location: RESUME+18
Function Call: WRITE	Prompt: !?3,$P(PID,"^"),$J("",10),$P(PID,"^",2) Line Location: HLP1+3
Function Call: READ	Prompt: "Enter RETURN to continue or '^' to stop: " Formatting: ! Timeout: DTIME Variable: X Line Location: HLP1+4
Routine Call	%ZIS Line Location: EN+3
Routine Call	DIC Line Location: ASK+8
Routine Call	DIR Line Location: RESUME+6 RESUME+11 RESUME+18

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^IB - [#350]	LST+1
^IB("AH"	EN+1, ASK+11, HLP1+3
^IBE(350.1 - [#350.1]	LST+2

Name	Line Occurrences
ASK	ASK+6, ASK+7, ASK+8, ASK+12, RESUME+6, RESUME+11, RESUME+18
END	ASK+5, RESUME+6, RESUME+11, RESUME+18
ERR	RESUME+15
HDR	RESUME, RESUME+14
HLP	ASK+7
HLP1	ASK+6
LST	RESUME+1, RESUME+15
RESUME	AR+2

Name	Field # of Occurrence
DFN	ASK+8, ASK+11, ASK+14, END+3!, HLP1+1~, HLP1+3
DIC	ASK+8*!, END!
DIC(0	ASK+8*
DIR	RESUME+6!, RESUME+11!, RESUME+18!
DIR("?"	RESUME+5*
DIR("A"	RESUME+5, RESUME+10
DIR(0	RESUME+5, RESUME+10, RESUME+18*
DIRUT	RESUME+6, RESUME+11, END!
DTIME	ASK+5, RESUME+2, HLP1+4
DTOUT	END!
DUOUT	RESUME+6, RESUME+11, END!
DUZ	RESUME+8
I	ASK+14!, HLP1+1~, HLP1+3
IBA	ASK+10!, ASK+12, END!
IBA(	ASK+11*, RESUME+1, RESUME+15
IBAFY	END!
IBARTYP	END!
IBATYP	END!
IBCTR	RESUME+15*, END!
IBDA	END!
IBDUZ	RESUME+8*, END!
IBFAC	END+1!
IBI	ASK+11*, END+1!
IBIL	END+1!
IBLINE	HDR+1~*, HDR+2, HDR+3
IBN	RESUME+1, RESUME+15, END!, LST+1
IBND	LST+1~*, LST+2, LST+3, LST+4
IBNOS	RESUME+15*, END+1!
IBNUM	ASK+11, RESUME+1, RESUME+5, RESUME+15*, END+1!, LST+2, ERR+1, HELP+2
IBPT	ASK+14*, END+1!
IBQ	RESUME+1, RESUME+2, END+1!, HLP1+1~, HLP1+3, HLP1+4
IBRANGE	RESUME+8*, RESUME+15, RESUME+16, END+1!
IBSEQNO	RESUME+8*, END+1!
IBSERV	END+1!
IBSITE	END+1!
IBTOTL	END+2!
IBTRAN	END+2!
IBWHER	END+2!
IOF	ASK+14
PID	HLP1+1~, HLP1+3*
PRCABN	ASK+10!, RESUME, RESUME+6, RESUME+11, RESUME+18, END+3, AR+2
VA	END+2!
VADM	END+2!
VAERR	END+2!
>> X	ASK+5, ASK+6, ASK+7, RESUME+2, HLP1+4*
>> Y	ASK+8, RESUME+8, RESUME+10, RESUME+11, RESUME+15