Routine: IBY400PO

Package	Total	Call Graph
VA FileMan	7	(CREIXN,DELIX)^DDMOD $$FIND1^DIC FILE^DICN FILE^DIE EN^DIEZ (,ENALL)^DIK $$VFIELD^DILFD
Kernel	6	($$FMADD,$$FMTE,$$NOW)^XLFDT UPDATE^XPDID (BMES,MES)^XPDUTL $$PROD^XUPROD $$TAXORG^XUSTAX (OPTSTAT,RESCH)^XUTMOPT
Integrated Billing	2	$$FT^IBCEF $$B^IBCEF79
MailMan	1	SENDMSG^XMXAPI
Registration	1	$$SITE^VASITE

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
EX	;
PPS	; Fire new FileMan trigger to set the new PPS field on all applicable claims
PPSX	;
BP	; Populate the list of billing provider facility types
BPX	;
ERR(TYPE,IEN)	; log an error in MSG array
ERRX	;
BFLD	; remove obsolete fields in files 399 and 350.9 dealing with printing of data in boxes 32/33 on a CMS-1500 claim
BFLDX	;
XREFCL	; Build a new-style x-ref in file 399 for the default taxonomy codes
XREFCLX	;
XREFRX	; Build a new-style x-ref in file 362.4 for the default taxonomy codes
XREFRXX	;
BPTAX	; manually set the new field# 252 - billing provider taxonomy code field ; set for non-cancelled claims in cases of retransmission of existing claims - go back 1 year
BPTAXX	;
RIT	; Recompile input templates for billing screens ; Billing screen 4 is included here because of field# 158 which was modified. ; There were no changes to this input template, but it has to be recompiled at the target facility ; in order for the changes to become effective.
RITX	;
VC	; Add value codes to file 399.1
VCX	;
TMOPT	; Schedule the TaskMan option to run once a month
TMOPTX	;
TMDISP(T)	; display task information

External References

Name	Field # of Occurrence
CREIXN^DDMOD	XREFCL+44, XREFRX+42
DELIX^DDMOD	XREFCL+48, XREFCL+49, XREFCL+50, XREFCL+51, XREFCL+52, XREFCL+53, XREFCL+54, XREFCL+58
$$FIND1^DIC	BP+20, RIT+8
FILE^DICN	BP+26, VC+32
FILE^DIE	VC+44
EN^DIEZ	RIT+9
^DIK	BFLD+8, BFLD+11
ENALL^DIK	PPS+21
$$VFIELD^DILFD	BFLD+5
$$FT^IBCEF	PPS+10
$$B^IBCEF79	BPTAX+25
$$SITE^VASITE	BP+33
$$FMADD^XLFDT	BPTAX+21, TMOPT+14
$$FMTE^XLFDT	TMDISP+3
$$NOW^XLFDT	TMOPT+12
SENDMSG^XMXAPI	BP+44
UPDATE^XPDID	PPSX+2, BPX+2, BFLDX+2, XREFCLX+2, XREFRXX+2, BPTAXX+2, RITX+2, VCX+3, TMOPTX+2
BMES^XPDUTL	PPS+2, BP+2, BFLD+2, XREFCL+2, XREFRX+2, BPTAX+3, RIT+5, VC+2, TMOPT+3
MES^XPDUTL	PPS+3, PPS+4, PPS+16, PPSX+1, BP+3, BP+4, BP+45, BPX+1, BFLD+3, BFLD+4 , BFLD+5, BFLDX+1, XREFCL+3, XREFCL+4, XREFCLX+1, XREFRX+3, XREFRX+4, XREFRXX+1, BPTAX+4, BPTAX+5 , BPTAX+16, BPTAX+19, BPTAX+30, BPTAXX+1, RIT+6, RIT+7, RITX+1, VC+3, VC+4, VC+29 , VC+33, VCX+1, VCX+2, TMOPT+4, TMOPT+5, TMOPT+7, TMOPT+12, TMOPT+16, TMOPTX+1, TMDISP+1 , TMDISP+2, TMDISP+3, TMDISP+4
$$PROD^XUPROD	BP+31, TMOPT+7
$$TAXORG^XUSTAX	BPTAX+26
OPTSTAT^XUTMOPT	TMOPT+10, TMOPT+18
RESCH^XUTMOPT	TMOPT+15

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "." Line Location: BPTAX+23
Routine Call	DIC Line Location: BP+20 RIT+8
Routine Call	DIE Line Location: VC+44

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIE - [#.402]	FIND1^DIC
^IBE(350.9 - [#350.9]	Classic Fileman Calls
^DGCR(399 - [#399]	Classic Fileman Calls, DELIX^DDMOD, VFIELD^DILFD
^DGCR(399.1 - [#399.1]	Classic Fileman Calls
^DIC(4.1 - [#4.1]	FIND1^DIC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCR(399 - [#399]	PPS+9, PPS+13, BPTAX+9, BPTAX+10, BPTAX+13, BPTAX+22, BPTAX+24, BPTAX+28*
^DGCR(399.1 - [#399.1]	VC+28, VC+29
^IBE(350.9 - [#350.9]	BP+22, BFLD+12, BFLD+15

Label References

Name	Line Occurrences
BFLD	EN+4
BFLDX	BFLD+5
BP	EN+3
BPTAX	EN+5
BPTAXX	BPTAX+16
BPX	BP+30, BP+31
ERR	BP+21, BP+27
PPS	EN+2
PPSX	PPS+16
RIT	EN+8
TMDISP	TMOPT+12, TMOPT+20
TMOPT	EN+10
TMOPTX	TMOPT+7, TMOPT+12
VC	EN+9
XREFCL	EN+6
XREFRX	EN+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BPTAX	BPTAX+2~, BPTAX+26*, BPTAX+27, BPTAX+28
BPZ	BP+1~, BPTAX+2~, BPTAX+25*, BPTAX+26
BPZ(	BP+18, BP+25
BPZ("CBOC"	BP+7*
BPZ("HCS"	BP+8*
BPZ("M&ROC"	BP+9*
BPZ("OC"	BP+10*
BPZ("OPC"	BP+11*
BPZ("PHARM"	BP+12*
BPZ("RO-OC"	BP+13*
BPZ("VAMC"	BP+14*
CNT	PPS+1~, PPS+8, PPS+11, PPS+12, BPTAX+2~, BPTAX+8, BPTAX+11, BPTAX+12, BPTAX+20, BPTAX+23 , BPTAX+30
CODE	VC+1~, VC+24, VC+25, VC+28, VC+29, VC+32, VC+33, VC+38, VC+40
DA	BP+19~, BFLD+1~, BFLD+8, BFLD+11
DA(1	BP+24, BFLD+8, BFLD+11*
DIC	BP+19~, BP+24, VC+1~, VC+32
DIC("DR"	BP+25*
DIC(0	BP+24, VC+32
DIFROM	TMOPT+2~
DIK	PPS+1~, PPS+19, BFLD+1~, BFLD+8, BFLD+11*
DIK(1	PPS+20*
DLAYGO	BP+19~, BP+24, VC+1~, VC+32
DMAX	RIT+4~, RIT+8*
DO	BP+19~, VC+1~
DT	BPTAX+21, TMOPT+14
DUZ	BP+44
FOUND	PPS+1~, PPS+8, PPS+9, PPS+13, PPS+16, BPTAX+2~, BPTAX+8, BPTAX+9, BPTAX+13, BPTAX+16
FST	TMOPT+2~, TMOPT+14*, TMOPT+15
HLPTXT	VC+1~, VC+37!, VC+38*
IBCNT	VC+1~, VC+6, VC+34, VCX+1
IBIFN	PPS+1~, PPS+9, PPS+10, PPS+13, BPTAX+2~, BPTAX+9, BPTAX+10, BPTAX+13, BPTAX+22*, BPTAX+24 , BPTAX+25, BPTAX+28
IBVCACA	VC+1~, VC+37!
IBVCACA(	VC+40, VC+41, VC+42, VC+43
IBVCDB	VC+1~, VC+28*, VC+29
IBVCIEN	VC+1~, VC+34*, VC+39
IBXR	XREFCL+1~, XREFCL+44, XREFRX+1~, XREFRX+42
IBXR("ACTIVITY"	XREFCL+15, XREFRX+15
IBXR("DESCR"	XREFCL+17, XREFCL+18, XREFCL+19, XREFCL+20, XREFCL+21, XREFCL+22, XREFCL+23, XREFCL+24, XREFCL+25, XREFCL+26 , XREFCL+27, XREFCL+28, XREFCL+29, XREFCL+30, XREFCL+31, XREFCL+32, XREFCL+33, XREFRX+17, XREFRX+18, XREFRX+19 , XREFRX+20, XREFRX+21, XREFRX+22, XREFRX+23, XREFRX+24, XREFRX+25, XREFRX+26, XREFRX+27, XREFRX+28, XREFRX+29 , XREFRX+30, XREFRX+31, XREFRX+32, XREFRX+33, XREFRX+34, XREFRX+35, XREFRX+36, XREFRX+37
IBXR("EXECUTION"	XREFCL+14, XREFRX+14
IBXR("FILE"	XREFCL+5, XREFRX+5
IBXR("KILL"	XREFCL+35, XREFRX+39
IBXR("NAME"	XREFCL+6, XREFRX+6
IBXR("SET"	XREFCL+34, XREFRX+38
IBXR("SHORT D	ESCR" , XREFCL+16, XREFRX+16
IBXR("TYPE"	XREFCL+12, XREFRX+12
IBXR("USE"	XREFCL+13, XREFRX+13
IBXR("VAL"	XREFCL+36, XREFCL+37, XREFCL+38, XREFCL+39, XREFCL+40, XREFCL+41, XREFCL+42, XREFCL+43, XREFRX+40, XREFRX+41
IBZ	TMOPT+2~, TMOPT+10, TMOPT+17!, TMOPT+18
IBZ(1	TMOPT+11, TMOPT+19
IEN	BP+19~, BP+20, BP+21, BP+22, BP+23, BP+27, ERR~, ERR+3, BFLD+1~, VC+1~ , VC+28
IENS	VC+1~, VC+39*, VC+40, VC+41, VC+42, VC+43
LN	BP+1~, BP+37, BP+38, BP+39, BP+40, BP+41, BP+42, BP+43*
MSG	BP+1~, BP+16!, BP+30, BP+45
MSG(	BP+38, BP+39, BP+40, BP+41, BP+42, BP+43, ERR+2, ERR+3
MSG(""	BP+37, ERR+1
OPTNM	TMOPT+2~, TMOPT+9*, TMOPT+10, TMOPT+15, TMOPT+18, TMDISP+1
PCE	BFLD+1~, BFLD+15*
SITE	BP+1~, BP+33*, BP+34
STEVD	BPTAX+2~, BPTAX+21, BPTAX+22
STOP	PPS+1~, PPS+8, PPS+9, PPS+12, BPTAX+2~, BPTAX+8, BPTAX+9, BPTAX+12
SUBJ	BP+1~, BP+34, BP+35, BP+44
T	TMOPT+2~, TMOPT+11, TMOPT+12, TMOPT+19, TMOPT+20, TMDISP~, TMDISP+2, TMDISP+3, TMDISP+4
TMERR	TMOPT+2~, TMOPT+15, TMOPT+16
TYPE	BP+1~, BP+17, BP+18, BP+20, BP+21, BP+25, BP+27, ERR~, ERR+2
U	PPS+13, BP+27, BP+34, BFLD+12, BFLD+15, BPTAX+10, BPTAX+13, BPTAX+24, BPTAX+26, BPTAX+28 , VC+28, VC+29, TMOPT+12, TMDISP+2, TMDISP+3, TMDISP+4
VAL	XREFCL+1~, XREFRX+1~
VCD	VC+1~
VCD(	VC+25, VC+32, VC+33
VCD(80	VC+10*
VCD(81	VC+14*
VCD(82	VC+17*
VCH	VC+1~
VCH(	VC+38
VCH(80	VC+11, VC+12
VCH(81	VC+15*
VCH(82	VC+18, VC+19, VC+20, VC+21
X	BP+19~, BP+23, RIT+4~, RIT+8, VC+1~, VC+32*
XMTO	BP+1~, BP+44
XMTO("Eric.Gustafson@domain.ext"	BP+36*
XPDIDTOT	EN+1~*, PPS+2, BP+2, BFLD+2, XREFCL+2, XREFRX+2, BPTAX+3, RIT+5, VC+2, TMOPT+3
Y	BP+19~, BP+27, RIT+4~, RIT+8*, RIT+9, VC+1~, VC+33, VC+34
Z	ERR+1~*, ERR+2, ERR+3
>> ZTQUEUED	BPTAX+19, BPTAX+23

Customize PDF page

Package: Integrated Billing

Routine: IBY400PO

Information

Source Information

Call Graph

Call Graph Total: 17

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: