Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^IBT(356.399

Package: Integrated Billing

Global: ^IBT(356.399


Information

FileMan FileNo FileMan Filename Package
356.399 CLAIMS TRACKING/BILL Integrated Billing

Description

Directly Accessed By Routines, Total: 5

Package Total Routines
Integrated Billing 5 IBCDC    IBCU8    IBPU2    IBTRED1    ^IBT(356.399    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Integrated Billing 2 IBCDC    IBPU2    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Integrated Billing 2 BILL/CLAIMS(#399)[.02]    CLAIMS TRACKING(#356)[.01]    

Fields, Total: 2

Field # Name Loc Type Details
.01 CLAIM TRACKING ID 0;1 POINTER TO CLAIMS TRACKING FILE (#356)
************************REQUIRED FIELD************************
CLAIMS TRACKING(#356)

  • 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.
.02 BILL NUMBER 0;2 POINTER TO BILL/CLAIMS FILE (#399)
************************REQUIRED FIELD************************
BILL/CLAIMS(#399)

  • LAST EDITED:  OCT 29, 1993
  • 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=$S('$D(^DGCR(399,+$P(Y(101),U,11),0)):"",1:$P(^(0),U,1)) S D0=I(0,0) S DIU=X K Y X ^DD(356.399,.02,1,3,1.1) X ^DD(356.399,.02,1,3,1.4)
    1.1)= S X=DIV S X=$P(^IBT(356.399,DA,0),U,2)
    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=$S('$D(^DGCR(399,+$P(Y(101),U,11),0)):"",1:$P(^(0),U,1))="" S D0=I(0,0)
    1.4)= S DIH=$S($D(^IBT(356,DIV(0),0)):^(0),1:""),DIV=X I $D(^(0)) S $P(^(0),U,11)=DIV,DIH=356,DIG=.11 D ^DICR:$N(^DD(DIH,DIG,1,0))>0
    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=$S('$D(^DGCR(399,+$P(Y(101),U,11),0)):"",1:$P(^(0),U,1)) 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=$S('$D(^DGCR(399,+$P(Y(101),U,11),0)):"",1:$P(^(0),U,1))=$S('$D(^DGCR(399,+$P(Y(1),U,2),0)):"",1:$P(^(0),U,1)) S D0=I(0,0)
    2.4)= S DIH=$S($D(^IBT(356,DIV(0),0)):^(0),1:""),DIV=X I $D(^(0)) S $P(^(0),U,11)=DIV,DIH=356,DIG=.11 D ^DICR:$N(^DD(DIH,DIG,1,0))>0
    69.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^IBT(356.399,D0,0)):^(0),1:""),D0=$P(Y(1),U,1) S:'$D(^IBT(356,+D0,0)) D0=-1 S Y(101)=$S($D(^IBT(356,D0,0)):^(0),1:"")
    79.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^IBT(356.399,D0,0)):^(0),1:""),D0=$P(Y(1),U,1) S:'$D(^IBT(356,+D0,0)) D0=-1 S Y(101)=$S($D(^IBT(356,D0,0)):^(0),1:"")
    89.2)= S I(0,0)=$S($D(D0):D0,1:""),Y(1)=$S($D(^IBT(356.399,D0,0)):^(0),1:""),D0=$P(Y(1),U,1) S:'$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.

External References

Name Field # of Occurrence
^DICR .02(XREF 3n1.4), .02(XREF 3n2.4)
Y^DIQ ID.02+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( .02(XREF 3n1.4), .02(XREF 3n2.4)
^DD(356.399 .02(XREF 3S), .02(XREF 3n1.3), .02(XREF 3K), .02(XREF 3n2.3)
^DD(399 ID.02+1
^DGCR(399 - [#399] ID.02+1, .02(XREF 3S), .02(XREF 3n1.3), .02(XREF 3K), .02(XREF 3n2.3)
^IBT(356 - [#356] .02(XREF 3n1.4), .02(XREF 3n2.4), .02(XREF 3n69.2), .02(XREF 3n79.2), .02(XREF 3n89.2)
^IBT(356.399 - [#356.399] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3n1.1), .02(XREF 3n69.2)
.02(XREF 3n79.2), .02(XREF 3n89.2)

Naked Globals

Name Field # of Occurrence
^(0 ID.02+1, .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .02(XREF 3S), .02(XREF 3n1.3), .02(XREF 3n1.4), .02(XREF 3K), .02(XREF 3n2.3)
.02(XREF 3n2.4), .02(XREF 3n69.2), .02(XREF 3n79.2), .02(XREF 3n89.2)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%I ID.02+1*!
>> C ID.02+1*
>> D0 .02(XREF 3S), .02(XREF 3n1.3), .02(XREF 3K), .02(XREF 3n2.3), .02(XREF 3n69.2), .02(XREF 3n79.2), .02(XREF 3n89.2)
>> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3n1.1), .02(XREF 3n1.3)
.02(XREF 3n2.3)
>> DIC ID.02+1
>> DIG .02(XREF 3n1.4), .02(XREF 3n2.4)
>> DIH .02(XREF 3n1.4), .02(XREF 3n2.4)
>> DIU .02(XREF 3S), .02(XREF 3K)
DIV .02(XREF 3S), .02(XREF 3n1.1), .02(XREF 3n1.3), .02(XREF 3n1.4), .02(XREF 3K), .02(XREF 3n2.3), .02(XREF 3n2.4)
DIV(0 .02(XREF 3n1.3), .02(XREF 3n1.4), .02(XREF 3n2.3), .02(XREF 3n2.4), .02(XREF 3n89.2)
>> I(0 .02(XREF 3S), .02(XREF 3n1.3), .02(XREF 3K), .02(XREF 3n2.3), .02(XREF 3n69.2), .02(XREF 3n79.2), .02(XREF 3n89.2)
U ID.02+1, .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .02(XREF 3S), .02(XREF 3n1.1), .02(XREF 3n1.3), .02(XREF 3n1.4), .02(XREF 3K)
.02(XREF 3n2.3), .02(XREF 3n2.4), .02(XREF 3n69.2), .02(XREF 3n79.2), .02(XREF 3n89.2)
>> X .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3n1.1)
.02(XREF 3n1.3), .02(XREF 3n1.4), .02(XREF 3K), .02(XREF 3n2.3), .02(XREF 3n2.4)
Y ID.02+1*, .02(XREF 3S), .02(XREF 3K)
Y(0 .02(XREF 3n1.3), .02(XREF 3n2.3)
Y(1 .02(XREF 3n2.3), .02(XREF 3n69.2), .02(XREF 3n79.2), .02(XREF 3n89.2)
Y(101 .02(XREF 3S), .02(XREF 3n1.3), .02(XREF 3K), .02(XREF 3n2.3), .02(XREF 3n69.2), .02(XREF 3n79.2), .02(XREF 3n89.2)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All