Routine: IBEFUNC2

Package	Total	Call Graph
Integrated Billing	1	$$CPTBSTAT^IBEFUNC1
Scheduling	1	STATUS^SDAMBAE4

Package

Total

Call Graph

$$CPTBSTAT^IBEFUNC1

STATUS^SDAMBAE4

Package	Total	Caller Graph
Integrated Billing	8	IBERS1 ^IBE(350.7 IBERS IBERSE IBERSI IBERSP1 IBOCOSI ^IBE(350.71

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
ENDP
FFMT	;
PO(DA,X)	;check that the print order entered has not already been used for the group/sub-header
FPO	;
ENDFMT
TDG(SSN)	;reformat SSN into terminal digit order
CPTSTAT(CPT,DATE)	;determine the overall status for a CPT for given date, assumes today if no date given
FORMAT(GRP,CP)	;calculate spacing format for clinic CPT list
CEND
ENDPO

Name	Field # of Occurrence
$$CPTBSTAT^IBEFUNC1	CPTSTAT+18
STATUS^SDAMBAE4	CPTSTAT+16

Name	Line Occurrences (* Changed, ! Killed)
^IBE(350.7 - [#350.7]	FORMAT+13
^IBE(350.71 - [#350.71]	FORMAT+12, PO+6, PO+7, PO+8, PO+9
^ICPT - [#81]	CPTSTAT+14, CPTSTAT+15

Name	Field # of Occurrence
CD	FORMAT+9~, FORMAT+11, FORMAT+14, FORMAT+15
CHK	FORMAT+9~, FORMAT+11, FORMAT+14, FORMAT+15
COL	FORMAT+9~, FORMAT+13*, FORMAT+14, FORMAT+15
CP	FORMAT~, FORMAT+10*, FORMAT+12
CPT	CPTSTAT~, CPTSTAT+13*, CPTSTAT+14, CPTSTAT+15, CPTSTAT+16, CPTSTAT+18
DA	FPO+1, PO~, PO+6, PO+7
DATE	CPTSTAT~, CPTSTAT+13*, CPTSTAT+15, CPTSTAT+16, CPTSTAT+18
DCHG	FORMAT+9~, FORMAT+11, FORMAT+14, FORMAT+15
DT	CPTSTAT+13, CPTSTAT+15
GRP	FORMAT~, FORMAT+10, FORMAT+12, FORMAT+13
H	FORMAT+9~, FORMAT+15*, ENDFMT
I	TDG+2~*
>> IBCPX	FFMT+1
>> IBGRPX	FFMT+1
>> IBLNGX	FFMT+1*
IC	FORMAT+9~, FORMAT+11*, FORMAT+15, ENDFMT
M	FORMAT+9~, FORMAT+11*, FORMAT+15
PN	FORMAT+9~, FORMAT+15*, ENDFMT
POST	CPTSTAT+12~, CPTSTAT+14, CPTSTAT+17, CPTSTAT+18, CEND
SSN	TDG~, TDG+2
X	CPTSTAT+12~, CPTSTAT+16, CPTSTAT+17, TDG+2~, FORMAT+9~, FORMAT+10, FORMAT+13, FORMAT+14, FORMAT+15, ENDFMT , FPO+1, PO~, PO+6, PO+8, PO+9, ENDPO
X1	CPTSTAT+12~, CPTSTAT+16*
Y	CPTSTAT+12~, CPTSTAT+14, CPTSTAT+15, CPTSTAT+17, CPTSTAT+18, CEND, TDG+2~, TDG+3, ENDP, PO+7~* , PO+8, PO+9

Information