Routine: IBCDP

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC (,$$S)^%ZTLOAD ($$FMTE,$$HTE)^XLFDT
Integrated Billing	2	$$FMDATES^IBCU2 $$EXSET^IBEFUNC
VA FileMan	1	^DIR

Package	Total	Caller Graph
Integrated Billing	1	IBCDE

Entry Points

Name	Comments	DBIA/ICR reference
EN	; OPTION ENTRY POINT: Auto Biller Report - get parameters then run the report
RPT	;find, save, and print Auto Biller Report - entry for tasked jobs
EXIT	;clean up and quit
SORT1	; sort by Event Date in Claims Tracking ; for each CT entry within the selected date range check/get it's auto biller entries, if they meet the criteria
SORT2	; sort by Entry Date in Auto Biller ; for each AB entry within the selected date range check/get the entry, if they meet the criteria
GETLN(IBABFN)	; check and select auto biller entries that meet the criteria, Input: all select criteria ; Output: ^TMP($J,"IBCDP",sort date,event type,patient name_event date/time, AB FN) = CT FN
CHKBILL(IBCTFN)	; return first bill found if Claims Tracking event had a bill created for it
PRINT	;print the report from the temp sort file to the appropriate device
GETHDR	; set up header lines
HDR()	;print the report header
HDRQ
PAUSE	;pause at end of screen if being displayed on a terminal
DEV	;get the device
STOP()	; determine if user has requested the queued report to stop

External References

Name	Field # of Occurrence
^%ZIS	DEV+1
^%ZISC	EXIT+2
^%ZTLOAD	DEV+2
$$S^%ZTLOAD	STOP+1
^DIR	EN+11, EN+19, EN+24, EN+29, EN+33, PAUSE+1
$$FMDATES^IBCU2	EN+14
$$EXSET^IBEFUNC	PRINT+24, PRINT+25
$$FMTE^XLFDT	PRINT+7, PRINT+22, PRINT+26, PRINT+27, GETHDR+1
$$HTE^XLFDT	GETHDR+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!,"Auto Biller Results Report" Line Location: EN+2
Function Call: WRITE	Prompt: !,"This report contains results of the activity from the Third Party Auto Biller." Line Location: EN+3
Function Call: WRITE	Prompt: !,"The Third Party Auto Biller processes Claims Tracking entries and may create a" Line Location: EN+4
Function Call: WRITE	Prompt: !,"bill. This report will provide detail for all processed entries, including the" Line Location: EN+5
Function Call: WRITE	Prompt: !,"bill number if a bill was created or the reason a bill could not be created." Line Location: EN+6
Function Call: WRITE	Prompt: ! Line Location: EN+27
Function Call: WRITE	Prompt: !!,"Report requires 132 columns.",! Line Location: EN+35
Function Call: WRITE	Prompt: !,?20,$S(IBSDR=1:"Event Date: ",1:"Auto Bill Date: "),$$FMTE^XLFDT(IBS1),! Line Location: PRINT+7
Function Call: WRITE	Prompt: ! Line Location: PRINT+9
Function Call: WRITE	Prompt: !,$E(IBDFNN,1,20),?22,$E(IB1U4N,1,6),?30,$E(IBTYP,U,4),?37,$P(IBEVDT,":",1,2),?60,IBBILL,?70,$E(IBBSTAT,1,7),?82,$E(IBBTF,1,15),?102,IBBSF,?117,IBBST Line Location: PRINT+29
Function Call: WRITE	Prompt: !,?37,IBX Line Location: PRINT+32
Function Call: WRITE	Prompt: @IOF Line Location: HDR+6
Function Call: WRITE	Prompt: !,IBHDR1,IBPGN,!,IBHDR2,!,IBHDR3,!,IBHDR4 Line Location: HDR+8
Function Call: WRITE	Prompt: !,"*TASK STOPPED BY USER*" Line Location: STOP+1
Routine Call	%ZIS Line Location: DEV+1
Routine Call	DIR Line Location: EN+11 EN+19 EN+24 EN+29 EN+33 PAUSE+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	PRINT+17
^DPT - [#2]	GETLN+9, PRINT+15
^IBA(362.1 - [#362.1]	SORT1+9, SORT2+6, SORT2+7, GETLN+5, CHKBILL+2, CHKBILL+3, PRINT+13, PRINT+31, PRINT+32
^IBE(356.6 - [#356.6]	PRINT+21
^IBT(356 - [#356]	SORT1+6, SORT1+7, GETLN+6, PRINT+14
^TMP($J	EN+1!, EXIT+1!, GETLN+34*, PRINT+6, PRINT+9, PRINT+10, PRINT+11

Label References

Name	Line Occurrences
$$CHKBILL	GETLN+23
$$HDR	PRINT+4, PRINT+11
$$STOP	HDR+2
DEV	EN+36
EXIT	EN+36
GETHDR	PRINT+4
GETLN	SORT1+11, SORT2+11
HDRQ	HDR+2, HDR+3, HDR+4
PAUSE	PRINT+34, HDR+4
PRINT	RPT+5
SORT1	RPT+2
SORT2	RPT+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	DEV+1*
>> %ZIS("A"	DEV+1*
DFN	GETLN+2~, GETLN+9, PRINT+1~, PRINT+15
DIR	EN+1~, EN+11!, EN+19!, EN+24!, EN+29!, EN+33!, PAUSE+1!
DIR("?"	EN+9, EN+17, EN+22, EN+27, EN+31*
DIR("A"	EN+10, EN+18, EN+23, EN+28, EN+32*
DIR("B"	EN+10, EN+18, EN+23, EN+28, EN+32*
DIR(0	EN+10, EN+18, EN+23, EN+28, EN+32, PAUSE+1
DIROUT	EN+1~
DIRUT	EN+1~, EN+11, EN+19, EN+24, EN+29, EN+33, PAUSE+1
DTOUT	EN+1~
DUOUT	EN+1~, PAUSE+1
IB1U4N	PRINT+2~, PRINT+20*, PRINT+29
IBAB0	GETLN+2~, GETLN+5, GETLN+6, GETLN+10, CHKBILL+1~, CHKBILL+3, PRINT+1~, PRINT+13*, PRINT+14, PRINT+16
IBABC	PRINT+2~, PRINT+31*, PRINT+32
IBABDT	GETLN+2~, GETLN+10*, GETLN+17, GETLN+31
IBABFN	SORT1+2~, SORT1+9, SORT1+11, SORT2+2~, SORT2+6, SORT2+7, SORT2+11, GETLN~, GETLN+5, GETLN+34 , CHKBILL+1~, CHKBILL+2, CHKBILL+3, PRINT+1~, PRINT+11, PRINT+13, PRINT+31, PRINT+32
IBBEG	SORT1+2~, SORT1+4, SORT1+6, SORT2+2~, SORT2+4, SORT2+9
IBBILL	PRINT+2~, PRINT+23*, PRINT+29
IBBL0	PRINT+1~, PRINT+16, PRINT+17, PRINT+23, PRINT+24, PRINT+25
IBBLFN	PRINT+1~, PRINT+16*, PRINT+17
IBBLU	PRINT+1~, PRINT+16, PRINT+17, PRINT+26, PRINT+27
IBBSF	PRINT+2~, PRINT+26*, PRINT+29
IBBST	PRINT+2~, PRINT+27*, PRINT+29
IBBSTAT	PRINT+2~, PRINT+24*, PRINT+29
IBBTF	PRINT+2~, PRINT+25*, PRINT+29
IBCT0	GETLN+2~, GETLN+6, GETLN+8, GETLN+9, PRINT+1~, PRINT+14, PRINT+15, PRINT+21, PRINT+22
IBCTDT	GETLN+2~, GETLN+8*, GETLN+16, GETLN+31, GETLN+32
IBCTFN	SORT1+2~, SORT1+7, SORT1+9, GETLN+2~, GETLN+6, GETLN+23, GETLN+34, CHKBILL~, CHKBILL+2, PRINT+1~ , PRINT+14*
IBCTTY	GETLN+2~, GETLN+8*, GETLN+19, GETLN+20, GETLN+21, GETLN+34
IBDATES	EN+1~, EN+14*, SORT1+2, SORT1+4, SORT2+2, SORT2+4, GETLN+3, GETLN+12, GETHDR+1
IBDFN0	PRINT+1~, PRINT+15*, PRINT+19, PRINT+20
IBDFNN	GETLN+2~, GETLN+9, GETLN+27, GETLN+28, GETLN+32, PRINT+2~, PRINT+19, PRINT+29
IBDTBEG	GETLN+2~, GETLN+12*, GETLN+16, GETLN+17
IBDTEND	GETLN+2~, GETLN+12*, GETLN+16, GETLN+17
IBEND	SORT1+2~, SORT1+4, SORT1+6, SORT2+2~, SORT2+4, SORT2+9
IBETDT	SORT2+2~, SORT2+7*, SORT2+9
IBEVDT	SORT1+2~, SORT1+6, SORT1+7, PRINT+2~, PRINT+22, PRINT+29
IBHDR1	PRINT+2~, GETHDR+1, GETHDR+2, HDR+8
IBHDR2	PRINT+2~, GETHDR+3*, HDR+8
IBHDR3	PRINT+2~, GETHDR+4*, HDR+8
IBHDR4	PRINT+2~, GETHDR+5*, HDR+8
IBLN	PRINT+1~, PRINT+4, PRINT+7, PRINT+9, PRINT+29, PRINT+32, HDR+3, HDR+5
IBPATS	EN+1~, EN+29, EN+32, EN+33, GETLN+3*, GETLN+13
IBPGN	PRINT+1~, PRINT+4, HDR+4, HDR+5, HDR+6, HDR+8, STOP+1
IBPTBEG	GETLN+2~, GETLN+13*, GETLN+27
IBPTEND	GETLN+2~, GETLN+13*, GETLN+28
IBQUIT	EN+1~, EN+36, PRINT+1~, PRINT+4, PRINT+6, PRINT+9, PRINT+10, PRINT+11, PRINT+34, HDR+1~ , HDR+2, HDR+4, HDRQ, PAUSE+1, DEV+1, DEV+2
IBS1	PRINT+1~, PRINT+6*, PRINT+7, PRINT+9, PRINT+10, PRINT+11
IBS2	PRINT+1~, PRINT+9*, PRINT+10, PRINT+11
IBS3	PRINT+1~, PRINT+10*, PRINT+11
IBSBC	EN+1~, EN+24, GETLN+3, GETLN+23, GETLN+24, GETLN+25
IBSCRPT	PRINT+1~, PRINT+4*, PRINT+6, PRINT+9, PRINT+10, PRINT+11
IBSDR	EN+1~, EN+11*, EN+14, RPT+2, RPT+3, GETLN+3, GETLN+16, GETLN+17, GETLN+31, PRINT+7
IBSEV	EN+1~, EN+19, GETLN+3, GETLN+19, GETLN+20, GETLN+21
IBSORT1	GETLN+2~, GETLN+31*, GETLN+34
IBSORT3	GETLN+2~, GETLN+32*, GETLN+34
IBTYP	PRINT+2~, PRINT+21*, PRINT+29
IBX	GETLN+2~, GETLN+23, GETLN+24, GETLN+25, CHKBILL+1~, CHKBILL+2, CHKBILL+3, CHKBILL+4, PRINT+1~, PRINT+32
IO	PRINT+3
IO("Q"	DEV+2!
IOF	HDR+6
IOM	GETHDR+2, GETHDR+5
IOSL	HDR+3
IOST	HDR+6, PAUSE+1
>> POP	DEV+1
U	EN+33, SORT1+4, SORT2+4, SORT2+7, GETLN+6, GETLN+8, GETLN+9, GETLN+10, GETLN+12, GETLN+13 , CHKBILL+3, PRINT+14, PRINT+15, PRINT+16, PRINT+19, PRINT+20, PRINT+21, PRINT+22, PRINT+23, PRINT+24 , PRINT+25, PRINT+27, PRINT+29, GETHDR+1
X	EN+1~, HDR+1~
Y	EN+1~, EN+11, EN+19, EN+24, EN+29, EN+33*, HDR+1~
>> ZTDESC	DEV+2*
>> ZTQUEUED	EXIT+1, PRINT+3, STOP+1
ZTREQ	STOP+1!
>> ZTRTN	DEV+2*
>> ZTSAVE("IB*"	DEV+2*
>> ZTSTOP	STOP+1*, STOP+2

Customize PDF page

Package: Integrated Billing

Routine: IBCDP

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: