Routine: IBCNEDE3

Package	Total	Call Graph
Integrated Billing	5	$$SYMBOL^IBCNBLL $$STRIP^IBCNEDE3 SAVETQ^IBCNEUT2 $$VALIDDT^IBCNINSU $$ZND^IBCNS1
Kernel	2	($$DT,$$FMADD,$$FMDIFF)^XLFDT ($$TRIM,$$UP)^XLFSTR
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Integrated Billing	4	IBCNBLA IBCNEDE2 IBCNEDE3 IBJPI3

Entry Points

Name	Comments	DBIA/ICR reference
STRIP(VALUE)	; check non-alpha numeric characters
STRIPX	;
UPDSD(PIEN,AIEN,SVDT)	;Update service date based on Payers allowed date range - Appointment Extract
ALL(DFN,VAR)	;Find all insurance data on a patient for the Appointment Extract
INSCHKQ	;
CHK(X,PIEN,PINS,Z)	; Check patient policy - logic from CHK^IBCNS1
CHKQ	;
TQUPDSV(DFN,PAYER,SRVDT,SUBID,GRPNUM)	; Update TQ service date for entries to be transmitted ; used by the Appointment Extract - logic from TQUPDSV^IBCNEUT5
TQUPDSVX	;TQUPDSV exit
TQCHKS(DFN,PAYER,SRVDT,SUBID,GRPNUM,FRESHNESS)	; Looks at the TQ file for an existing entry ; checks to see if a new entry can be added to the TQ - used by the Appointment Extract
TQCHKSX	;TQCHKS exit
ADDTQ(DFN,PAYER,SUBID,GRPNUM,SRVDT,FDAYS)	; Function - Returns flag (0/1) ; used by the Appointment Extract - logic from ADDTQ^IBCNEUT5 ; 1 - TQ File entry can be added as the service date for the patient ; and payer >= MAX TQ service date + Freshness Days ; 0 - otherwise
ADDTQX	; ADDTQ exit pt
TQMAXSV(DFN,PAYER,SUBID,GRPNUM)	; Returns MAX(TQ Service Date) for Patient & Payer
TQMAXSVX	;TQMAXSV exit
TQEXIST(DFN,PIEN,SUBID,GRPNUM,FRESHNESS)	;IB*827/CKB - Looks at the TQ file for an existing entry ; This tag is being used by the eIV Appointment Extract
TQEXIT	;TQEXIST exit
BFEXIST(DFN,INSNAME,SUBID,GRPNUM)	;Checks for the existence in the Buffer
BFEXIT	;BFEXIST exit
BFCHECK(DFN,INSNAME,SUBID,GRPNUM)	;IB*827/CKB - Checks for the existence in the Buffer ; if there is a Buffer entry perform additional checks
BFCHECKX	;BFCHECK Exit

Name	Field # of Occurrence
$$GET1^DIQ	UPDSD+17, ALL+31, ALL+32, CHK+15, CHK+16, CHK+17, CHK+23, CHK+25, TQUPDSV+15, TQUPDSV+18 , TQCHKS+15, TQCHKS+18, TQMAXSV+27, TQMAXSV+30, TQMAXSV+31, TQEXIST+25, TQEXIST+28, TQEXIST+30
$$SYMBOL^IBCNBLL	BFCHECK+38
$$STRIP^IBCNEDE3	TQUPDSV+15, TQCHKS+15, TQMAXSV+27, TQEXIST+25, BFEXIST+29, BFCHECK+32
SAVETQ^IBCNEUT2	TQUPDSV+35, TQUPDSV+37, TQUPDSV+42, TQUPDSV+43
$$VALIDDT^IBCNINSU	CHK+39, CHK+45, CHK+47
$$ZND^IBCNS1	ALL+22
$$DT^XLFDT	UPDSD+21, UPDSD+25, UPDSD+26
$$FMADD^XLFDT	UPDSD+25, UPDSD+26, ADDTQ+23
$$FMDIFF^XLFDT	TQUPDSV+41
$$TRIM^XLFSTR	BFEXIST+16, BFEXIST+25, BFCHECK+14, BFCHECK+27
$$UP^XLFSTR	BFEXIST+16, BFEXIST+26, BFCHECK+14, BFCHECK+28

FileNo	Call Tags
2.312	GET1^DIQ
^IBA(355.3 - [#355.3]	GET1^DIQ
^DIC(36 - [#36]	GET1^DIQ
^IBCN(365.1 - [#365.1]	GET1^DIQ
365.121	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DIC(36 - [#36]	CHK+21
^DPT - [#2]	ALL+19, ALL+20, ALL+23, ALL+24, ALL+25, ALL+26, ALL+27, ALL+28, ALL+29
^IBA(355.3 - [#355.3]	ALL+30
^IBA(355.33 - [#355.33]	BFEXIST+20, BFEXIST+22, BFEXIST+25, BFEXIST+29, BFEXIST+31, BFCHECK+17, BFCHECK+19, BFCHECK+22, BFCHECK+27, BFCHECK+32 , BFCHECK+34
^IBCN(365.1 - [#365.1]	TQUPDSV+9, TQUPDSV+11, TQUPDSV+20, TQUPDSV+31, TQCHKS+9, TQCHKS+11, TQCHKS+19, TQMAXSV+21, TQMAXSV+23, TQEXIST+21 , TQEXIST+22
^IBE(365.12 - [#365.12]	UPDSD+13

Name	Line Occurrences
$$ADDTQ	TQCHKS+23
$$CHK	ALL+20
$$TQMAXSV	ADDTQ+20
ADDTQX	ADDTQ+17, ADDTQ+21
BFCHECKX	BFCHECK+15, BFCHECK+17
BFEXIT	BFEXIST+17
CHKQ	CHK+21, CHK+23, CHK+25
STRIPX	STRIP+11
TQCHKSX	TQCHKS+5
TQEXIT	TQEXIST+17
TQMAXSVX	TQMAXSV+13
TQUPDSVX	TQUPDSV+5

Name	Field # of Occurrence
^(	ALL+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ADDTQ	TQCHKS+23, ADDTQ+15, ADDTQ+17, ADDTQ+23, ADDTQX+1
ADT	ALL+17~, ALL+18*, ALL+20
AIEN	UPDSD~, UPDSD+10, UPDSD+13, UPDSD+17
BSUBID	BFEXIST+14~, BFEXIST+29, BFEXIST+30, BFCHECK+12~, BFCHECK+20~, BFCHECK+32, BFCHECK+33
BUFFNAME	BFEXIST+14~, BFEXIST+25, BFEXIST+26, BFCHECK+12~, BFCHECK+20~, BFCHECK+27, BFCHECK+28
CSPAN	TQUPDSV+3~, TQUPDSV+41*, TQUPDSV+42, TQUPDSV+43
CSRVDT	TQUPDSV+3~, TQUPDSV+31, TQUPDSV+33, TQUPDSV+35, TQUPDSV+37*, TQUPDSV+40, TQUPDSV+41, TQUPDSV+42
DA	TQUPDSV+3~, TQUPDSV+10, TQUPDSV+11, TQUPDSV+15, TQUPDSV+18, TQUPDSV+20, TQUPDSV+27, TQUPDSV+31, TQUPDSV+35, TQUPDSV+37 , TQUPDSV+42, TQUPDSV+43, TQCHKS+3~, TQCHKS+10, TQCHKS+11, TQCHKS+15, TQCHKS+18, TQCHKS+19, TQEXIST+14~, TQEXIST+22* , TQEXIST+25, TQEXIST+28, TQEXIST+30
DATA	UPDSD+8~, UPDSD+13*, UPDSD+15
DFN	ALL~, ALL+19, ALL+20, ALL+22, ALL+23, ALL+24, ALL+25, ALL+26, ALL+27, ALL+28 , ALL+29, TQUPDSV~, TQUPDSV+5, TQUPDSV+9, TQUPDSV+11, TQCHKS~, TQCHKS+5, TQCHKS+9, TQCHKS+11, TQCHKS+23 , ADDTQ~, ADDTQ+17, ADDTQ+20, TQMAXSV~, TQMAXSV+13, TQMAXSV+21, TQMAXSV+23, TQEXIST~, TQEXIST+17, TQEXIST+21 , TQEXIST+22, BFEXIST~, BFEXIST+17, BFEXIST+20, BFCHECK~, BFCHECK+15, BFCHECK+17, BFCHECK+19
DT	UPDSD+21, ALL+18, TQUPDSV+33, TQUPDSV+35, TQUPDSV+37, TQUPDSV+40, TQUPDSV+41, TQEXIST+20
EFFDT	CHK+12~, CHK+15*, CHK+29, CHK+33, CHK+37, CHK+39, CHK+41, CHK+43, CHK+45, CHK+47
EVAL	CHK+12~, CHK+14, CHK+29, CHK+31, CHK+33, CHK+37, CHK+39, CHK+41, CHK+43, CHK+45* , CHK+47*, CHKQ+1
EXIST	TQEXIST+14~, TQEXIST+15, TQEXIST+21, TQEXIST+22, TQEXIST+32, TQEXIT+1, BFEXIST+14~, BFEXIST+15, BFEXIST+20, BFEXIST+33 , BFEXIT+1
EXPDT	CHK+12~, CHK+16*, CHK+31, CHK+33, CHK+37, CHK+39, CHK+41, CHK+43, CHK+45, CHK+47
FDAYS	UPDSD+8~, UPDSD+12, UPDSD+17, UPDSD+19, UPDSD+21, UPDSD+25, UPDSD+26, ADDTQ~, ADDTQ+17, ADDTQ+23
FRESHNESS	TQCHKS~, TQCHKS+23, TQEXIST~, TQEXIST+17, TQEXIST+20
>> FSCSEND	TQUPDSV+24, TQUPDSV+25
GRP	CHK+12~, CHK+17*, CHK+25
GRPNUM	TQUPDSV~, TQUPDSV+18, TQCHKS~, TQCHKS+18, TQCHKS+23, ADDTQ~, ADDTQ+20, TQMAXSV~, TQMAXSV+30, TQEXIST~ , TQEXIST+28, BFEXIST~, BFEXIST+31, BFCHECK~, BFCHECK+34
IBI	STRIP+10~, STRIP+14*
IBIENS	ALL+17~, ALL+29*, ALL+30, ALL+31, ALL+32
IBSP	ALL+17~
IBTQS	TQMAXSV+15~, TQMAXSV+31*, TQMAXSV+32
IBY	STRIP+10~, STRIP+13, STRIP+14, STRIP+16, STRIP+17, STRIP+18
IEN	BFEXIST+14~, BFEXIST+19, BFEXIST+20, BFEXIST+22, BFEXIST+25, BFEXIST+29, BFEXIST+31, BFCHECK+12~, BFCHECK+19*, BFCHECK+22 , BFCHECK+27, BFCHECK+32, BFCHECK+34, BFCHECK+38
IENS	TQMAXSV+15~
INSIEN	CHK+12~, CHK+20*, CHK+21, CHK+23
INSNAME	BFEXIST~, BFEXIST+16, BFEXIST+17, BFEXIST+26, BFCHECK~, BFCHECK+14, BFCHECK+15, BFCHECK+28
LASTBYP	TQMAXSV+15~, TQMAXSV+20, TQMAXSV+21, TQMAXSV+23, TQMAXSV+33
LEN	STRIP+10~, STRIP+12*, STRIP+14
MAXDT	ADDTQ+14~, ADDTQ+20*, ADDTQ+21, ADDTQ+23
PAYER	TQUPDSV~, TQUPDSV+5, TQUPDSV+9, TQUPDSV+11, TQCHKS~, TQCHKS+5, TQCHKS+9, TQCHKS+11, TQCHKS+23, ADDTQ~ , ADDTQ+17, ADDTQ+20, TQMAXSV~, TQMAXSV+13, TQMAXSV+21, TQMAXSV+23
PIEN	UPDSD~, UPDSD+10, UPDSD+13, UPDSD+17, CHK~, CHK+15, CHK+16, CHK+17, TQEXIST~, TQEXIST+17 , TQEXIST+21, TQEXIST+22
PINS	CHK~, CHK+15, CHK+16, CHK+17
SAVE	BFCHECK+12~, BFCHECK+13, BFCHECK+15, BFCHECK+17, BFCHECK+19, BFCHECK+22, BFCHECK+28, BFCHECK+33, BFCHECK+34, BFCHECK+40 , BFCHECK+42, BFCHECK+44, BFCHECKX+1
SPAN	TQUPDSV+3~, TQUPDSV+41*, TQUPDSV+42, TQUPDSV+43
SRVDT	TQUPDSV~, TQUPDSV+5, TQUPDSV+35, TQUPDSV+37, TQUPDSV+40, TQUPDSV+41, TQUPDSV+43, TQCHKS~, TQCHKS+5, ADDTQ~ , ADDTQ+17, ADDTQ+23
>> SRVICEDT	TQCHKS+23
STATLIST	TQMAXSV+15~, TQMAXSV+18*, TQMAXSV+32
STRNG	STRIP+10~, STRIP+11, STRIP+13, STRIP+18*, STRIPX+1
STS	TQUPDSV+3~, TQUPDSV+20, TQUPDSV+22, TQUPDSV+24, TQUPDSV+25, TQCHKS+3~, TQCHKS+19, TQCHKS+21, TQEXIST+23~, TQEXIST+30*
SUBID	TQUPDSV~, TQUPDSV+16, TQCHKS~, TQCHKS+16, TQCHKS+23, ADDTQ~, ADDTQ+20, TQMAXSV~, TQMAXSV+28, TQEXIST~ , TQEXIST+26, BFEXIST~, BFEXIST+30, BFCHECK~, BFCHECK+33
SVDT	UPDSD~, UPDSD+21, UPDSD+25, UPDSD+26, TQUPDSV+3~, TQUPDSV+8, TQUPDSV+9, TQUPDSV+11, TQCHKS+3~, TQCHKS+8* , TQCHKS+9, TQCHKS+11, TQEXIST+14~, TQEXIST+20, TQEXIST+21*, TQEXIST+22
SYMBOL	BFCHECK+20~, BFCHECK+38*, BFCHECK+40, BFCHECK+42
>> TQENT	TQUPDSV+27*
>> TQFOUND	TQUPDSV+11, TQUPDSV+26*
TQIEN	TQMAXSV+15~, TQMAXSV+22, TQMAXSV+23, TQMAXSV+27, TQMAXSV+30, TQMAXSV+31
TQMAXSV	TQMAXSV+11~, TQMAXSV+12, TQMAXSV+33, TQMAXSVX+1
TQNAME	TQEXIST+23~
TQSUBID	TQUPDSV+3~, TQUPDSV+15, TQUPDSV+16, TQCHKS+3~, TQCHKS+15, TQCHKS+16, TQMAXSV+15~, TQMAXSV+27, TQMAXSV+28, TQEXIST+23~ , TQEXIST+25, TQEXIST+26
U	ALL+31, ALL+32, TQUPDSV+20, TQUPDSV+31, TQCHKS+19, BFEXIST+22, BFEXIST+25, BFEXIST+29, BFEXIST+31, BFCHECK+22 , BFCHECK+27, BFCHECK+32, BFCHECK+34
VALUE	STRIP~, STRIP+11, STRIP+12, STRIP+14
VAR	ALL~, ALL+21, ALL+22, ALL+23, ALL+24, ALL+25, ALL+26, ALL+27, ALL+28, ALL+30 , ALL+31, ALL+32
X	ALL+17~, ALL+19*, ALL+20, ALL+22, ALL+23, ALL+24, ALL+25, ALL+26, ALL+27, ALL+28 , ALL+29, ALL+30, ALL+31, ALL+32, CHK~, CHK+20
XX	STRIP+10~
Z	CHK~, CHK+29, CHK+31, CHK+33, CHK+37, CHK+43, CHK+47

Customize PDF page

Package: Integrated Billing

Routine: IBCNEDE3

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 4

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: