Routine: IBEMTO

Package	Total	Call Graph
Integrated Billing	5	$$OLDRATE^IBAMTS1 TYPE^IBAUTL2 BULL^IBEMTO1 ($$DAT1,$$DAT2)^IBOUTL ^IBR
VA Fileman	2	NOW^%DTC ^DIR
Kernel	1	^%ZTLOAD

Package	Total	Caller Graph
Integrated Billing	3	IB MT REL HELD (RATE) CHARGES IBCBR IBEBR

Name	Comments	DBIA/ICR reference
CHG	; Pass a single charge to Accounts Receivable.
HQ	; Help for prompt
ENO	; Standalone option entry point
ENQ
ENR	; Enter/edit billing rates entry point
CHGQ
DQ	; Tasked job to bill all charges awaiting the new copay rate.

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: ENR+34
Routine Call	DIR Line Location: ENR+29

Name	Line Occurrences (* Changed, ! Killed)
^IB - [#350]	CHG+1, CHG+4*
^IB("AC"	ENR+6, ENR+15, ENR+26, ENQ, DQ+7, DQ+10, DQ+13, CHG+1!

Name	Field # of Occurrence
>> %	DQ+4, DQ+14
>> DFN	CHG+4*
DIR	ENR+29!
DIR("?"	ENR+28*
DIR("A"	ENR+28*
DIR(0	ENR+28*
>> DIRUT	ENR+29
DT	ENR+9, ENR+10, CHG+2
>> DUOUT	ENR+29
DUZ	DQ+1
IBATYP	ENQ+2!
IBCHG	ENQ+2!, DQ+16!, CHG+4
IBCNT	DQ+1, DQ+16!, CHG+5
IBDESC	ENQ+2!
IBDT	ENR+9, ENQ+2!, DQ+16!, CHG+2
>> IBDUZ	DQ+1*
IBEND	DQ+14*, DQ+16!
IBJ	ENR+26*, ENR+27, ENQ+2!
>> IBJOB	DQ+1*
IBN	ENR+26*, ENQ+2!
IBND	DQ+16!, CHG+1*, CHG+3, CHG+4
IBNOS	DQ+16!, CHG+5*
IBOPT	ENO+1*, ENR+6, ENR+10, ENR+15, ENR+20, ENR+25, ENR+32, ENQ+1, ENQ+2!
IBREF	DQ+10*, DQ+16!, CHG+1, CHG+4, CHG+5
IBRTED	ENR+10, ENR+11, ENQ+2!, CHG+3
IBRUN	ENR+3, ENR+34*, ENQ+1!
IBSEQNO	DQ+1, DQ+16!, CHG+4
IBSTART	DQ+4*, DQ+16!
IBT	DQ+16!
IBX	ENR+9, ENQ+2!, DQ+16!, CHG+2
XMDUZ	DQ+16!
XMSUB	DQ+16!
XMTEXT	DQ+16!
XMY	DQ+16!
XMZ	DQ+16!
>> Y	ENR+29, CHG+5
>> ZTDESC	ENR+33*
>> ZTDTH	ENR+32*
>> ZTIO	ENR+33*
>> ZTRTN	ENR+33*
ZTSK	ENR+34, ENQ+2!

Information