Routine: IBAMTED1

Package	Total	Call Graph
Integrated Billing	7	^IBAERR ($$RXST,$$STDATE)^IBARXEU ($$LSTAC,$$ON,$$PLUS)^IBARXEU0 ($$AUTOST,$$INCDT,$$NETW,$$STATUS)^IBARXEU1 ($$MTCOMP,MOSTR)^IBARXEU5 (ADDEX,ADDP)^IBAUTL6 $$DAT1^IBOUTL

Package	Total	Caller Graph
Integrated Billing	2	IBAMTED IBARXEU5

Entry Points

Name	Comments	DBIA/ICR reference
CODE(TEST)	; -- return means test category
DELQ
EN
STA	; -- status change
ADDQ
ADJ	; -- means test adjudication
AEX	; -- add exemption logic
CAT	; -- category change
EDITQ
ENQ	; -- exit copay exemption creation
ADD	; -- adding a new test
AUTOQ
DEL	; -- means test deleted
EDT	; -- editing an old means test
AUTO	; -- if auto status patient
COM	; -- complete a required means test
ADJQ

Name	Field # of Occurrence
^IBAERR	ENQ+1
$$RXST^IBARXEU	AUTO+4
$$STDATE^IBARXEU	EN+15, EN+16
$$LSTAC^IBARXEU0	EN+27
$$ON^IBARXEU0	EN+4
$$PLUS^IBARXEU0	EN+15, EN+16, DEL+11, AUTO+5
$$AUTOST^IBARXEU1	AUTO+3
$$INCDT^IBARXEU1	AEX+12, AEX+13
$$NETW^IBARXEU1	AEX+12, AEX+13, ADJ+4
$$STATUS^IBARXEU1	DEL+8
$$MTCOMP^IBARXEU5	AEX+12
MOSTR^IBARXEU5	AEX+16
ADDEX^IBAUTL6	AEX+17, DEL+11, DEL+14, ADJ+9, ADJ+12, ADJ+14, AUTO+5, AUTO+6
ADDP^IBAUTL6	EN+22
$$DAT1^IBOUTL	ENQ+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Determining Medication Co-Payment Exemption" Line Location: EN+19
Function Call: WRITE	Prompt: !!,"Medication Copayment Exemption Status Updated: ",$P(^IBE(354.2,+IBADDE,0),"^")," ",$$DAT1^IBOUTL($P(IBADDE,"^",2)) Line Location: ENQ+2

Name	Line Occurrences (* Changed, ! Killed)
^DG(408.32 - [#408.32]	CODE+2
^IBA(354 - [#354]	EN+22
^IBA(354.1 - [#354.1]	DEL+5
^IBE(354.2 - [#354.2]	ENQ+2, AEX+9, DEL+8, DEL+11, ADJ+7, ADJ+12, ADJ+14, AUTO+6

Name	Field # of Occurrence
DA	EN+2~
>> DFN	EN+22, EN+27, DEL+5, DEL+8, AUTO+3, AUTO+4
>> DGMTA	EN+8, EN+9, EN+15, EN+27, EN+31, AEX+9, AEX+12, AEX+13, AEX+16, AEX+17 , EDT+2, ADJ+2, ADJ+5, ADJ+6, ADJ+9, ADJ+12, ADJ+14, AUTO+2
>> DGMTACT	EN+33, ADD+1
>> DGMTP	EN+8, EN+9, EN+16, EDT+2, DEL+5, DEL+6, DEL+8, DEL+11, ADJ+2, AUTO+2
DIC	EN+2~
DIE	EN+2~
DR	EN+2~
DT	DEL+11, AUTO+5
I	EN+2~
IBAD	EN~, AUTO+5, AUTO+6
IBADD	EN~
IBADDE	EN~, ENQ+2
IBAFY	EN+1~
IBAST	EN+1~
IBATYP	EN+1~
IBAUTO	EN~, EN+24, AUTO+3*, AUTO+5, AUTO+6
IBAX	EN~, ADJ+2*, ADJ+4, ADJ+5, ADJ+6, ADJ+12, ADJ+14
IBAX1	EN~, ADJ+2*, ADJ+4, ADJ+12, ADJ+14
IBBDT	EN+1~
IBCANDT	EN+1~
IBCHRG	EN+1~
IBCODA	EN+1~
IBCODP	EN+1~
IBCRES	EN+1~
IBDEPEN	EN+1~
IBDT	EN~, AUTO+2*, AUTO+3, AUTO+4, AUTO+6
>> IBEVT	EN+12
IBEXERR	EN~, EN+22, ENQ+1
IBEXREA	EN~, AEX+3, AEX+9, AEX+12, AEX+13, AEX+16, AEX+17, DEL+8, DEL+11, DEL+14 , ADJ+5, ADJ+6, ADJ+7, ADJ+8, ADJ+9
IBFAC	EN+1~
IBFORCE	DEL+4~, DEL+6*
IBIL	EN+1~
IBJOB	EN~, EN+5*
IBL	EN+1~
IBLDT	EN+1~
IBN	EN+1~
IBND	EN+1~
IBNN	EN+1~
IBNOW	EN+1~
IBOLDAUT	EN~, EN+27*, AEX+17
IBON	EN~, EN+4*
IBPARNT	EN+1~
IBPARNT1	EN+1~
IBSEQNO	EN+1~
IBSITE	EN+1~
>> IBSTAT	DEL+8*
>> IBTALK	EN+19, ENQ+2
IBUNIT	EN+1~
IBWHER	EN~, EN+5*
J	EN+2~
TEST	CODE~, CODE+1*, CODE+2
X	EN+2~, EN+27, EN+31, AEX+9, AUTO+4, AUTO+5, AUTO+6
X1	EN+2~
Y	EN+2~
>> ZTQUEUED	EN+19