Routine: IBARXEC1

Package	Total	Call Graph
Integrated Billing	4	END^IBARXEC BUILD^IBARXEC4 PRINT^IBARXEC5 $$STDATE^IBARXEU
VA Fileman	4	^%DT (COMMA,H)^%DTC (D,DT)^DIQ ^DIR
Kernel	2	(,HOME)^%ZIS ^%ZTLOAD

Package

Total

Call Graph

Integrated Billing

END^IBARXEC BUILD^IBARXEC4 PRINT^IBARXEC5 $$STDATE^IBARXEU

VA Fileman

^%DT (COMMA,H)^%DTC (D,DT)^DIQ ^DIR

Kernel

(,HOME)^%ZIS ^%ZTLOAD

Package	Total	Caller Graph
Integrated Billing	3	IB RX PRINT RETRO CHARGES IBARXEC2 IBARXEC3

Package

Total

Caller Graph

Integrated Billing

IB RX PRINT RETRO CHARGES IBARXEC2 IBARXEC3

Entry Points

Name	Comments	DBIA/ICR reference
QUICQ
END
QUIC	; -- quick summary
BDT	; -get beginning date
ELAP	; -- calcualate elaplse running time
DEV
START	; -- entry point for running conversion report from option
EDT	; -get ending date
REPORT	; -- run report for conversion

External References

Name	Field # of Occurrence
^%DT	BDT+3, EDT+2
COMMA^%DTC	QUIC+11, QUIC+12, QUIC+13, QUIC+14, QUIC+15, QUIC+16, QUIC+17, QUIC+18, QUIC+19, QUIC+20 , QUIC+21
H^%DTC	ELAP+2, ELAP+3
^%ZIS	DEV+1
HOME^%ZIS	START+1, DEV+2, QUIC+1
^%ZTLOAD	DEV+2
D^DIQ	BDT+2, EDT+1
DT^DIQ	QUIC+8, QUIC+9
^DIR	EDT+5
END^IBARXEC	END+3
BUILD^IBARXEC4	REPORT+15
PRINT^IBARXEC5	REPORT+16
$$STDATE^IBARXEU	BDT+2, REPORT+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,?15,"Medication Copayment Charges Retroactively Canceled",!! Line Location: START+1
Function Call: WRITE	Prompt: !!,"This report cannot be run until the conversion has completed." Line Location: START+3
Function Call: WRITE	Prompt: ! Line Location: BDT+4
Function Call: WRITE	Prompt: *7," ??",!,"ENDING DATE must follow BEGINNING DATE." Line Location: EDT+2
Function Call: WRITE	Prompt: ! Line Location: EDT+3
Function Call: WRITE	Prompt: !!,"Please wait while I compile the report by patient...." Line Location: REPORT+4
Function Call: WRITE	Prompt: !!,"Conversion has not been started" Line Location: QUIC+6
Function Call: WRITE	Prompt: !!,"The conversion has been started ",$P(IBX,"^",3)," times" Line Location: QUIC+7
Function Call: WRITE	Prompt: !!,"Conversion was started on: " Line Location: QUIC+8
Function Call: WRITE	Prompt: !,"The conversion completed on: " Line Location: QUIC+9
Function Call: WRITE	Prompt: !,Y Line Location: QUIC+9
Function Call: WRITE	Prompt: X Line Location: QUIC+11
Function Call: WRITE	Prompt: X Line Location: QUIC+12
Function Call: WRITE	Prompt: X Line Location: QUIC+13
Function Call: WRITE	Prompt: X Line Location: QUIC+14
Function Call: WRITE	Prompt: X Line Location: QUIC+15
Function Call: WRITE	Prompt: X Line Location: QUIC+16
Function Call: WRITE	Prompt: X Line Location: QUIC+17
Function Call: WRITE	Prompt: X Line Location: QUIC+18
Function Call: WRITE	Prompt: X Line Location: QUIC+19
Function Call: WRITE	Prompt: X Line Location: QUIC+20
Function Call: WRITE	Prompt: X Line Location: QUIC+21
Routine Call	%ZIS Line Location: START+1 DEV+2 QUIC+1
Routine Call	DIR Line Location: EDT+5
Routine Call	%ZIS Line Location: DEV+1

Name	Line Occurrences (* Changed, ! Killed)
^IBE(350.9 - [#350.9]	START+3, EDT+1, REPORT+7, REPORT+11, QUIC+3
^TMP("IBCONV"	END!

Name	Line Occurrences
BDT	EDT+2
ELAP	QUIC+9
END	START+3, BDT+3, EDT+2, EDT+5, DEV+1, DEV+2
QUIC	REPORT+2, REPORT+14

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	BDT+3!, BDT+4!, EDT+2, EDT+3!
%DT("A"	BDT+3, EDT+2
%DT("B"	BDT+2, EDT+1
>> %H	ELAP+2, ELAP+3
>> %T	ELAP+2, ELAP+3
>> %ZIS	DEV+1*
DFN	END+2!
DIR	EDT+5!
DIR("A"	EDT+5*
DIR("B"	EDT+5*
DIR(0	EDT+5*
>> DIRUT	EDT+5
IBAMT	END+2!
IBBCNT	END+2!
IBBDT	BDT+1, BDT+3, EDT+2, REPORT+6, END+2!, ELAP+1~, ELAP+2, ELAP+4
IBCNT	END+2!
>> IBCONVER	REPORT+1
IBDAY	ELAP+1~, ELAP+4*
IBDT	END+2!
IBEDT	BDT+1, EDT+2, REPORT+7, END+2!, ELAP+1~, ELAP+3, ELAP+4
IBJ	END+2!
IBN	END+2!
IBNAM	END+2!
IBOK	END+2!
IBP	END+2!
IBPAG	END+2!
IBPCNT	END+2!
IBPDAT	END+2!
IBQUIC	EDT+5*, REPORT+14, END+2!
>> IBQUIT	REPORT+13*
IBTAMT	END+2!
IBTCNT	END+2!
IBX	END+2!, QUIC+2~, QUIC+3*, QUIC+6, QUIC+7, QUIC+8, QUIC+9, QUIC+10, QUIC+11, QUIC+12 , QUIC+13, QUIC+14, QUIC+15, QUIC+16, QUIC+17, QUIC+18, QUIC+19, QUIC+20, QUIC+21, ELAP+2 , ELAP+3
IO	REPORT+3, REPORT+10
IO("Q"	DEV+2
IO(0	REPORT+3
IOF	START+1, QUIC+1, QUIC+5
N	END+2!
N1	END+2!
O	END+2!
O1	END+2!
>> POP	DEV+1
X	END+2!, QUIC+2~, QUIC+11, QUIC+12, QUIC+13, QUIC+14, QUIC+15, QUIC+16, QUIC+17, QUIC+18 , QUIC+19, QUIC+20, QUIC+21, ELAP+1~, ELAP+2, ELAP+3, ELAP+4
X1	END+2!, QUIC+2~
X2	END+2!, QUIC+2~, QUIC+11, QUIC+12, QUIC+13, QUIC+14, QUIC+15, QUIC+16, QUIC+17, QUIC+18 , QUIC+19, QUIC+20, QUIC+21*
X3	QUIC+2~, QUIC+3*
Y	BDT+2, BDT+3, EDT+1, EDT+2, EDT+5, END+2!, QUIC+2~, QUIC+8, QUIC+9, ELAP+4*
>> ZTDESC	DEV+2*
>> ZTQUEUED	REPORT+4, END+1
>> ZTREQ	END+1*
>> ZTRTN	DEV+2*
>> ZTSAVE("IB*"	DEV+2*
ZTSK	DEV+2!

Customize PDF page

Package: Integrated Billing

Routine: IBARXEC1

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: