STANDARD DATA DICTIONARY #356.399 -- CLAIMS TRACKING/BILL FILE 3/24/25 PAGE 1
STORED IN ^IBT(356.399, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file serves as a bridge between Claims Tracking and the Bill Claims file. An entry is created automatically by the billing
module to link the events being billed to the claims tracking entry. It serves as a cross-reference in a many to many relationship
for the entries in these two files. Entries should not normally be added or edited manualy in this file. It should be maintained
by the Billing Module.
Per VHA Directive 10-93-142, this file definition should not be modified.
DD ACCESS: @
RD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
AUDIT ACCESS: @
IDENTIFIED BY: BILL NUMBER (#.02)[R]
CROSS
REFERENCED BY: BILL NUMBER(ACB), CLAIM TRACKING ID(ACB1), CLAIM TRACKING ID(B), BILL NUMBER(C)
356.399,.01 CLAIM TRACKING ID 0;1 POINTER TO CLAIMS TRACKING FILE (#356) (Required)
LAST EDITED: AUG 02, 1993
HELP-PROMPT: The Claims Tracking ID to cross-reference with Bill Numbers.
DESCRIPTION:
This is the Claims Tracking entry that is associated with this bill.
CROSS-REFERENCE: 356.399^B
1)= S ^IBT(356.399,"B",$E(X,1,30),DA)=""
2)= K ^IBT(356.399,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 356.399^ACB1^MUMPS
1)= S:$P(^IBT(356.399,DA,0),U,2) ^IBT(356.399,"ACB",X,$P(^(0),U,2),DA)=""
2)= K:$P(^IBT(356.399,DA,0),U,2) ^IBT(356.399,"ACB",X,$P(^(0),U,2),DA)
Cross reference of bills and claims tracking entries. Used to find all bills associated with a
claims tracking entry.
356.399,.02 BILL NUMBER 0;2 POINTER TO BILL/CLAIMS FILE (#399) (Required)
LAST EDITED: JUN 14, 2004
HELP-PROMPT: The bill number associated with this Claims Tracking ID.
DESCRIPTION:
This is the Bill associated with this Claims Tracking Entry.
CROSS-REFERENCE: 356.399^ACB^MUMPS
1)= S:$P(^IBT(356.399,DA,0),U,1) ^IBT(356.399,"ACB",+^(0),X,DA)=""
2)= K:$P(^IBT(356.399,DA,0),U,1) ^IBT(356.399,"ACB",+^(0),X,DA)
Cross-reference of claims events and bills.
CROSS-REFERENCE: 356.399^C
1)= S ^IBT(356.399,"C",$E(X,1,30),DA)=""
2)= K ^IBT(356.399,"C",$E(X,1,30),DA)
CROSS-REFERENCE: ^^TRIGGER^356^.11
1)= X ^DD(356.399,.02,1,3,1.3) I X S X=DIV X ^DD(356.399,.02,1,3,89.2) S X=$P($G(^DGCR(399,+$P(Y(10
1),U,11),0)),U) S D0=I(0,0) S DIU=X K Y S X=DIV S X=$P(^IBT(356.399,DA,0),U,2) X ^DD(356.399,.02,1,
3,1.4)
1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(356.399,.02,1,3,69.2) S X=$P($G(^DGCR(399,+$P(Y(
101),U,11),0)),U)="" S D0=I(0,0)
1.4)= S DIH=$G(^IBT(356,DIV(0),0)),DIV=X I $D(^(0)) S $P(^(0),U,11)=DIV,DIH=356,DIG=.11 D ^DICR
2)= X ^DD(356.399,.02,1,3,2.3) I X S X=DIV X ^DD(356.399,.02,1,3,89.2) S X=$P($G(^DGCR(399,+$P(Y(10
1),U,11),0)),U) S D0=I(0,0) S DIU=X K Y S X="" X ^DD(356.399,.02,1,3,2.4)
2.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X X ^DD(356.399,.02,1,3,79.2) S X=$P($G(^DGCR(399,+$P(Y(
101),U,11),0)),U)=$P($G(^DGCR(399,+$P(Y(1),U,2),0)),U) S D0=I(0,0)
2.4)= S DIH=$G(^IBT(356,DIV(0),0)),DIV=X I $D(^(0)) S $P(^(0),U,11)=DIV,DIH=356,DIG=.11 D ^DICR
69.2)= S I(0,0)=$G(D0),Y(1)=$S($D(^IBT(356.399,D0,0)):^(0),1:""),D0=$P(Y(1),U,1) S:'D0!'$D(^IBT(356
,+D0,0)) D0=-1 S Y(101)=$S($D(^IBT(356,D0,0)):^(0),1:"")
79.2)= S I(0,0)=$G(D0),Y(1)=$S($D(^IBT(356.399,D0,0)):^(0),1:""),D0=$P(Y(1),U,1) S:'D0!'$D(^IBT(356
,+D0,0)) D0=-1 S Y(101)=$S($D(^IBT(356,D0,0)):^(0),1:"")
89.2)= S I(0,0)=$G(D0),Y(1)=$S($D(^IBT(356.399,D0,0)):^(0),1:""),D0=$P(Y(1),U,1) S:'D0!'$D(^IBT(356
,+D0,0)) D0=-1 S DIV(0)=D0 S Y(101)=$S($D(^IBT(356,D0,0)):^(0),1:"")
CREATE CONDITION)= CLAIM TRACKING ID:INITIAL BILL NUMBER=""
CREATE VALUE)= S X=$P(^IBT(356.399,DA,0),U,2)
DELETE CONDITION)= CLAIM TRACKING ID:INITIAL BILL NUMBER=BILL NUMBER
DELETE VALUE)= @
FIELD)= CLAIM TRACKING ID:INITIAL BILL NUMBER
Sets the events Initial Bill Number (356,.11) if that field does not already have a value. Deletes
the Initial Bill Number if that bill is being deleted from this entry.
FILES POINTED TO FIELDS
BILL/CLAIMS (#399) BILL NUMBER (#.02)
CLAIMS TRACKING (#356) CLAIM TRACKING ID (#.01)
BILL NUMBER (#.02)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):