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 |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^IB

Package: Integrated Billing

Global: ^IB


Information

FileMan FileNo FileMan Filename Package
350 INTEGRATED BILLING ACTION Integrated Billing

Description

Directly Accessed By Routines, Total: 157

Package Total Routines
Integrated Billing 138 IB INCOMPLETE    IB20P202    IB20P663    IBACVA1    IBACVA2    IBAECN1    IBAECP1    IBAFIL
IBAKAT    IBAMTBU2    IBAMTC    IBAMTC1    IBAMTC2    IBAMTC3    IBAMTEDU    IBAMTS1
IBAMTS2    IBAMTV    IBAMTV2    IBAMTV32    IBAMTV4    IBAREP    IBARXEC4    IBARXEC5
IBARXEU3    IBARXMB    IBARXMO1    IBAUTL2    IBAUTL3    IBAUTL8B    IBCNBAR    IBCNSMR7
IBECEA1    IBECEA3    IBECEA31    IBECEA4    IBECEA5    IBECEAU    IBECEAU3    IBECEAU4
IBEMTO    IBFBNP1    IBJD    IBJTCA1    IBMHUT1    IBNCPDPR    IBNCPNB    IBOA32
IBOCDRPT    IBOCHK    IBOHCK    IBOHCT    IBOHLD1    IBOHLD2    IBOHLS1    IBOHPT1
IBOHTOT    IBOMTC1    IBOMTP1    IBOSCDC1    IBOVOP2    IBPUDEL    IBR    IBRFN
IBRFN1    IBRFN4    IBRREL    IBRSUTL    IBXA1    IBXA2    ^IBE(399.6    IB20P247
IB20P669    IB20PT51    IBAECI    IBAECU    IBAERR    IBAGMM1    IBAGMR1    IBAGMT
IBAMTD2    IBAMTI1    IBAMTV3    IBAMTV31    IBAPDX    IBAPDX0    IBARX    IBARX1
IBARXECA    IBARXMA    IBARXMI    IBARXMQ    IBARXMU    IBATUTL    IBAUTL    IBAUTL4
IBAUTL5    IBAUTL8    IBAUTL8A    IBAUTL8C    IBCA3    IBECEA0    IBECEA22    IBECEA34
IBECEA35    IBECEA51    IBECEAMH    IBECEAU6    IBEFSMUT    IBEFURF    IBEMTO1    IBINRPT
IBJDF41    IBJDF51    IBJDF61    IBMHVM    IBNCPDPH    IBNCPEB    IBNCPRR1    IBOHCR
IBOHDT    IBOHDT1    IBOHIST    IBOHLSE    IBOHPT2    IBOHRAR    IBOHRL    IBOLK
IBOMHC    IBOMTLTC    IBOST    IBPF1    IBRBUL    IBRCON1    IBYRPOST    ^IB
IBRCON2    IBRUTL    
Accounts Receivable 12 PRCA280    PRCAAPR1    PRCACDRP    PRCAXP    RCDMCR4B    RCDMCR5B    RCDMCR6A    RCDMCR7A
RCDMCR8B    RCDMCR8C    RCDPEWL6    RCXVDC5    
Patient Data Exchange 2 VAQPSE02    VAQPSE03    
Outpatient Pharmacy 1 PSOCPC    

Accessed By FileMan Db Calls, Total: 54

Package Total Routines
Integrated Billing 42 IB20PT51    IBAKAT    IBAMTC    IBAMTC2    IBAMTS3    IBAMTV2    IBAREP    IBARX1
IBARXEU3    IBARXMB    IBARXMI    IBAUTL    IBAUTL2    IBAUTL3    IBAUTL5    IBAUTL9
IBECEA1    IBECEA22    IBECEA3    IBECEA31    IBECEA34    IBECEA35    IBECEA36    IBECEA4
IBECEA51    IBECEAMH    IBECEAU3    IBECEAU4    IBECEAU6    IBEFSMUT    IBINRPT    IBJTCA1
IBJTCA2    IBMHRPT    IBMHVM    IBOCHK    IBODISP    IBOMHC    IBOMTLTC    IBR
IBRFN4    IBRUTL    
Accounts Receivable 10 RCCPCPS1    RCDMCR5B    RCDMCR8B    RCDMCR8C    RCDMCUT1    RCDPEAD3    RCDPEFA1    RCDPEFA3
RCDPTPLI    RCXVDC5    
Outpatient Pharmacy 2 PSO480P    PSOCPF1    

Pointed To By FileMan Files, Total: 9

Package Total FileMan Files
Integrated Billing 7 INTEGRATED BILLING ACTION(#350)[.09.16]    TRICARE PHARMACY TRANSACTIONS(#351.5)[.08]    IB COPAY TRANSACTIONS(#354.71)[.04]    IB NCPDP PRESCRIPTION(#366.15)[.04]    SPECIAL INPATIENT BILLING CASES(#351.2)[.04]    IB-FB INTERFACE TRACKING(#360)[1.04]    IB MH VISIT TRACKING(#351.83)[.08]    
Accounts Receivable 1 RCDPE FIRST PARTY CHARGE QUEUE(#344.74)[.01]    
Outpatient Pharmacy 1 PRESCRIPTION(#52)[106#52.07(13)#52.1(9)]

Pointer To FileMan Files, Total: 9

Package Total FileMan Files
Integrated Billing 6 INTEGRATED BILLING ACTION(#350)[.09.16]    IB COPAY TRANSACTIONS(#354.71)[.19]    IB ACTION TYPE(#350.1)[.03]    IB ACTION STATUS(#350.21)[.05]    IB CHARGE REMOVE REASONS(#350.3)[.1]    IB CLINIC STOP CODE BILLABLE TYPES(#352.5)[.2]    
Kernel 2 INSTITUTION(#4)[.13]    NEW PERSON(#200)[1113]    
Registration 1 PATIENT(#2)[.02]    

Fields, Total: 29

Field # Name Loc Type Details
.01 REFERENCE NUMBER 0;1 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999999)!(X<1000)!(X?.E1"."1N.N) X
  • LAST EDITED:  APR 11, 2002
  • HELP-PROMPT:  Type a Number between 1000 and 999999999999, 0 Decimal Digits
  • DESCRIPTION:  This is the station number concatenated with the internal number of this entry in this file. The purpose of this number is to provide a unique number for each entry for each station. Modifying this number may have
    serious consequences when and where centralized billing and accounting are taking place.
  • DELETE TEST:  1,0)= I 1 W !,"Deleting entries not allowed"
    UNEDITABLE
  • CROSS-REFERENCE:  350^B
    1)= S ^IB("B",$E(X,1,30),DA)=""
    2)= K ^IB("B",$E(X,1,30),DA)
.02 PATIENT 0;2 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • LAST EDITED:  APR 02, 2020
  • DESCRIPTION:  
    This is the patient that received services, care, or medications that caused this entry to be created. If the debtor is the patient, this patient is the debtor.
  • CROSS-REFERENCE:  350^C
    1)= S ^IB("C",$E(X,1,30),DA)=""
    2)= K ^IB("C",$E(X,1,30),DA)
  • CROSS-REFERENCE:  350^AFDT^MUMPS
    1)= I $D(^IB(DA,0)),$P(^(0),"^",17) S ^IB("AFDT",X,-$P(^(0),"^",17),DA)=""
    2)= I $D(^IB(DA,0)),$P(^(0),"^",17) K ^IB("AFDT",X,-$P(^(0),"^",17),DA)
    Cross-reference of all IB ACTION entries which represent inpatient/NHCU admissions by the patient field and the minus (negative or inverse) event date (#.17) field. A billable event may be located for a patient using this
    cross-reference. The "AFDT1" cross-reference on the event date (#.17) field is the companion to this cross-reference.
  • CROSS-REFERENCE:  350^APTDT^MUMPS
    1)= I $D(^IB(DA,1)),$P(^(1),"^",2) S ^IB("APTDT",X,$P(^(1),"^",2),DA)=""
    2)= I $D(^IB(DA,1)),$P(^(1),"^",2) K ^IB("APTDT",X,$P(^(1),"^",2),DA)
    Cross-reference of all IB ACTION entries by patient (#.02) and date entry added (#12) fields. The "APTDT1" cross-reference on the date entry added field is the companion to this cross-reference.
  • CROSS-REFERENCE:  350^AH1^MUMPS
    1)= I $D(^IB(DA,0)),$P(^(0),U,5)=8 S ^IB("AH",X,DA)=""
    2)= I $D(^IB(DA,0)),$P(^(0),U,5)=8 K ^IB("AH",X,DA)
    All mt bills in a hold status
  • CROSS-REFERENCE:  350^AI1^MUMPS
    1)= I $D(^IB(DA,0)),$P(^(0),U,5)=99 S ^IB("AI",X,DA)=""
    2)= I $D(^IB(DA,0)),$P(^(0),U,5)=99 K ^IB("AI",X,DA)
    COMPANION TO AI X-REF ON FIELD .05
  • CROSS-REFERENCE:  350^ACVA^MUMPS
    1)= I X,$D(^IB(DA,1)),$P(^(1),"^",5) S ^IB("ACVA",X,$P(^(1),"^",5),DA)=""
    2)= I X,$D(^IB(DA,1)),$P(^(1),"^",5) K ^IB("ACVA",X,$P(^(1),"^",5),DA)
    This cross-reference is used in conjunction with the ACVA1 cross reference on the CHAMPVA ADM DATE (#15) field to cross reference all CHAMPVA inpatient subsistence charges by patient and admission date.
  • CROSS-REFERENCE:  350^AJ1^MUMPS
    1)= I $D(^IB(DA,0)),$P(^(0),U,5)=21 S ^IB("AJ",X,DA)=""
    2)= K ^IB("AJ",X,DA)
    Cross-reference of all IB ACTIONS for Means Test/Category C charges which have a STATUS (#.05) of HOLD - REVIEW.
    This cross-reference is used to generate a list of all patients, and all charges for those patients, who have had Means Test charges back-billed which need to be reviewed before being passed to the Accounts Receivable
    package. The "AJ" cross-reference on the STATUS (#.05) field is the companion to this cross-reference.
  • CROSS-REFERENCE:  350^AHDT2^MUMPS
    1)= I $D(^IB(DA,1)),$P(^IB(DA,1),U,6) S ^IB("AHDT",X,+$P(^IB(DA,0),U,5),$P(^IB(DA,1),U,6),DA)=""
    2)= I $D(^IB(DA,1)),$P(^IB(DA,1),U,6) K ^IB("AHDT",X,+$P(^IB(DA,0),U,5),$P(^IB(DA,1),U,6),DA)
    Companion to 'AHDT' cross-reference on ON HOLD DATE (#16) field.
  • RECORD INDEXES:  ACHDT (#1717)
.03 ACTION TYPE 0;3 POINTER TO IB ACTION TYPE FILE (#350.1) IB ACTION TYPE(#350.1)

  • LAST EDITED:  MAR 04, 1991
  • DESCRIPTION:  This field points to an entry in the IB ACTION TYPE file. Entries in the IB ACTION TYPE file provide specific information about the type of entry that is being created and provides data necessary to AR and to resolve the
    data from the application.
    Applications passing data to IB determine the Action Type and pass this to IB.
    UNEDITABLE
  • CROSS-REFERENCE:  350^AE
    1)= S ^IB("AE",$E(X,1,30),DA)=""
    2)= K ^IB("AE",$E(X,1,30),DA)
.04 RESULTING FROM 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  MAR 04, 1991
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • DESCRIPTION:  This will be the soft-link back to the entry in any file that caused this transaction to be set. It will be in the format of:
    filenumber:entry;[node:sub-entry];[node:sub-entry]...
    The number of node:sub-entry pieces will depend on the level of multiples that cause the entry. For example, a new prescription might be '52:345678' but the first refill might be '52:345678;1,1'.
    UNEDITABLE
.05 STATUS 0;5 POINTER TO IB ACTION STATUS FILE (#350.21) IB ACTION STATUS(#350.21)

  • LAST EDITED:  JUN 09, 2004
  • HELP-PROMPT:  
  • DESCRIPTION:  This is the current status of this entry. The IB routines will maintain this field. An entry will be incomplete when it is created, complete when all data needed to pass to AR is there, and Billed after passing to AR and
    the bill number and/or transaction number have been added.
    If the entry represents a billable inpatient/NHCU admission (event), the status will be Incomplete while the patient is admitted, and then Complete when the patient has been discharged. All entries created during the
    Means Test conversion will have the status Converted Record.
    With Integrated Billing version 2.0, this field is changed from a set of codes field to a pointer which points to the IB ACTION STATUS (#350.21) file. This change will allow new action statuses to be added more easily,
    and permit various characteristics to be assigned to the statuses to facilitate system processing. IT IS IMPERATIVE THAT THESE NEW POINTED-TO ENTRIES HAVE AN INTERNAL ENTRY NUMBER IN FILE #350.21 WHICH IS EQUAL TO THEIR
    PREVIOUS CODE VALUE. PLEASE CAREFULLY READ THE IB ACTION STATUS FILE DESCRIPTION FOR MORE INFORMATION.
  • CROSS-REFERENCE:  350^AC
    1)= S ^IB("AC",$E(X,1,30),DA)=""
    2)= K ^IB("AC",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^350^13
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IB(D0,1)):^(1),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S X=$S($D(IBDUZ):IBDUZ,$D(DUZ):DUZ,1:.5) S DIH=$G(^IB(DIV(0),1)),DIV=X S $P(^(1),U,3)=DIV,DIH=350,DIG=13 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IB(D0,1)):^(1),1:"") S X=$P(Y(1),U,3),X=X S DIU=X K Y S X=DIV S X=$S($D(IBDUZ):IBDUZ,$D(DUZ):DUZ,1:.5) S DIH=$G(^IB(DIV(0),1)),DIV=X S $P(^(1),U,3)=DIV,DIH=350,DIG=13 D ^DICR
    CREATE VALUE)= S X=$S($D(IBDUZ):IBDUZ,$D(DUZ):DUZ,1:.5)
    DELETE VALUE)= S X=$S($D(IBDUZ):IBDUZ,$D(DUZ):DUZ,1:.5)
    FIELD)= #13
  • CROSS-REFERENCE:  ^^TRIGGER^350^14
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IB(D0,1)):^(1),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(350,.05,1,3,1.4)
    1.4)= S DIH=$G(^IB(DIV(0),1)),DIV=X S $P(^(1),U,4)=DIV,DIH=350,DIG=14 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IB(D0,1)):^(1),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(350,.05,1,3,2.4)
    2.4)= S DIH=$G(^IB(DIV(0),1)),DIV=X S $P(^(1),U,4)=DIV,DIH=350,DIG=14 D ^DICR
    CREATE VALUE)= NOW
    DELETE VALUE)= NOW
    FIELD)= #14
  • CROSS-REFERENCE:  350^ACT^MUMPS
    1)= I X=1,$D(^IB(DA,0)),$P($G(^IBE(350.1,+$P(^(0),"^",3),0)),"^")'["ADMISSION",$P(^IB(DA,0),"^",16) S ^IB("ACT",$P(^(0),"^",16),DA)=""
    2)= I $D(^IB(DA,0)),$P(^(0),"^",16) K ^IB("ACT",$P(^(0),"^",16),DA)
    Cross-reference of all IB ACTIONS for Means Test/Category C charges which have a status of INCOMPLETE (cross-referenced by the parent event (#.16) field).
    This is a temporary cross-reference which is used to locate per diem and co-payment charges, for an inpatient/NHCU admission, which are established, but not yet passed to AR. The cross-reference is set whenever the status
    of a billable charge is changed to 1 (INCOMPLETE), and killed whenever the parent event (#.16) field is defined. The "ACT1" cross-reference on the parent event field is the companion to this cross-reference.
  • CROSS-REFERENCE:  350^AH^MUMPS
    1)= I X=8,$P(^IB(DA,0),U,2) S ^IB("AH",$P(^IB(DA,0),U,2),DA)=""
    2)= I $P(^IB(DA,0),U,2) K ^IB("AH",$P(^IB(DA,0),U,2),DA)
    All mt bills in a hold status.
  • CROSS-REFERENCE:  350^AI^MUMPS
    1)= I X=99,$P(^IB(DA,0),U,2) S ^IB("AI",$P(^IB(DA,0),U,2),DA)=""
    2)= I $P(^IB(DA,0),U,2) K ^IB("AI",$P(^IB(DA,0),U,2),DA)
    ALL MT BILLS IN CONVERTED STATUS
  • CROSS-REFERENCE:  350^AJ^MUMPS
    1)= I X=21,$P(^IB(DA,0),U,2) S ^IB("AJ",$P(^IB(DA,0),U,2),DA)=""
    2)= I $P(^IB(DA,0),U,2) K ^IB("AJ",$P(^IB(DA,0),U,2),DA)
    Cross-reference of all IB ACTIONS for Means Test/Category C charges which have a status of HOLD - REVIEW (cross-referenced by the PATIENT [#2] field).
    This cross-reference is used to generate a list of all patients, and all charges for those patients, who have had Means Test charges back-billed which need to be reviewed before being passed to the Accounts Receivable
    package. The "AJ1" cross-reference on the PATIENT (#.02) field is the companion to this cross-reference.
  • CROSS-REFERENCE:  ^^TRIGGER^350^16
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X I X=8 I X S X=DIV S Y(1)=$S($D(^IB(D0,1)):^(1),1:"") S X=$P(Y(1),U,6),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC X ^DD(350,.05,1,8,1.4)
    1.4)= S DIH=$S($D(^IB(DIV(0),1)):^(1),1:""),DIV=X S $P(^(1),U,6)=DIV,DIH=350,DIG=16 D ^DICR:$O(^DD(DIH,DIG,1,0))>0
    2)= Q
    CREATE CONDITION)= I X=8
    CREATE VALUE)= TODAY
    DELETE VALUE)= NO EFFECT
    FIELD)= ON HOLD DATE
  • CROSS-REFERENCE:  350^AHDT1^MUMPS
    1)= I $D(^IB(DA,1)),$P(^IB(DA,1),U,6) S ^IB("AHDT",+$P(^IB(DA,0),U,2),X,$P(^IB(DA,1),U,6),DA)=""
    2)= I $D(^IB(DA,1)),$P(^IB(DA,1),U,6) K ^IB("AHDT",+$P(^IB(DA,0),U,2),X,$P(^IB(DA,1),U,6),DA)
    Companion to 'AHDT' cross-reference on ON HOLD DATE (#16) field.
  • CROSS-REFERENCE:  ^^TRIGGER^350^17
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S X=$P($G(^IBE(350.21,+Y(0),0)),U)="HOLD - REVIEW" I X S X=DIV S Y(1)=$S($D(^IB(D0,1)):^(1),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC X ^DD(350,.05,1,10,
    1.4)
    1.4)= S DIH=$G(^IB(DIV(0),1)),DIV=X S $P(^(1),U,7)=DIV,DIH=350,DIG=17 D ^DICR
    2)= Q
    CREATE CONDITION)= STATUS="HOLD - REVIEW"
    CREATE VALUE)= TODAY
    DELETE VALUE)= NO EFFECT
    FIELD)= HOLD-REVIEW DATE
.06 UNITS 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 04, 1991
  • HELP-PROMPT:  Type a Number between 1 and 9999, 0 Decimal Digits
  • DESCRIPTION:  
    This is the number of units that will be multiplied times a specific charge that will be calculated to create the total charge. This is passed to IB from the application.
    UNEDITABLE
.07 TOTAL CHARGE 0;7 NUMBER

  • INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>9999999)!(X<0) X
  • LAST EDITED:  MAR 04, 1991
  • HELP-PROMPT:  Type a Dollar Amount between 0 and 9999999, 2 Decimal Digits
  • DESCRIPTION:  This is the total charge for this entry, that will be passed to AR. It is calculated and stored by IB routines. NOTE: Several IB ACTION entries may be combined into one pass to AR so that there may not be a one to one
    relationship between this entry and one in AR.
    The TOTAL CHARGE for all entries will always be positive. It is necessary to refer to the IB ACTION TYPE file to determine if this is a NEW, CANCEL or UPDATE. Cancel action types will cause a decrease adjustment to a
    bill for this amount. New and Update action types will cause an increase adjustment to a bill for this amount.
    UNEDITABLE
.08 BRIEF DESCRIPTION 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<3) X
  • LAST EDITED:  MAR 04, 1991
  • HELP-PROMPT:  Answer must be 3-20 characters in length.
  • DESCRIPTION:  This is a brief description of the application entry that caused this IB ACTION entry to be created. For example, for Pharmacy co-payments it might indicate '100999-ENDURAL-2' which would indicate that this was
    prescription number 100999, the drug name started with ENDURAL and 2 units (30-60 days supply) were given.
    The logic to calculate this will be supplied by the application and stored with the IB ACTION TYPE entry for this action.
    UNEDITABLE
.09 PARENT CHARGE 0;9 POINTER TO INTEGRATED BILLING ACTION FILE (#350) INTEGRATED BILLING ACTION(#350)

  • LAST EDITED:  NOV 05, 1991
  • DESCRIPTION:  This is a pointer to the original IB ACTION entry that this entry refers to. For a NEW entry, it will point to itself. For all other entries it will point to the original entry.
    An application then only needs to maintain the pointer to the original entry and can find the most recent entry for this entry as
    S x=$O(^IB("APDT",parent,0),x=$O(^(x,0))
    If x '= parent then this is an updated entry, the pointer to the IB ACTION TYPE file will give you the sequence number which will indicate if this is cancelled or an updated entry.
    UNEDITABLE
  • CROSS-REFERENCE:  350^AD
    1)= S ^IB("AD",$E(X,1,30),DA)=""
    2)= K ^IB("AD",$E(X,1,30),DA)
  • CROSS-REFERENCE:  350^APDT^MUMPS
    1)= I $D(^IB(DA,1)),$P(^(1),"^",2) S ^IB("APDT",$E(X,1,30),-$P(^(1),"^",2),DA)=""
    2)= I $D(^IB(DA,1)),$P(^(1),"^",2) K ^IB("APDT",$E(X,1,30),-$P(^(1),"^",2),DA)
    Cross-reference of all IB ACTION entries by parent link (#.09) field and the minus (negative or inverse) date entry added (#12) field. The most current ACTION for the original entry can be found using this
    cross-reference. The "APDT1" cross-reference on the DATE ENTRY ADDED (#12) field is the companion to this cross-reference.
.1 CANCELLATION REASON 0;10 POINTER TO IB CHARGE REMOVE REASONS FILE (#350.3) IB CHARGE REMOVE REASONS(#350.3)

  • LAST EDITED:  MAR 01, 1991
  • DESCRIPTION:  
    This is the reason that this charge was cancelled.
.11 AR BILL NUMBER 0;11 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>12!($L(X)<6) X
  • LAST EDITED:  MAR 06, 1991
  • HELP-PROMPT:  Answer must be 6-12 characters in length.
  • DESCRIPTION:  This is the free text bill number that this entry is charged to. It is in the format of a PAT number. It will be calculated by accounts receivable from the AR BILL NUMBER file for the service in the IB ACTION TYPE entry
    associated with this entry.
  • CROSS-REFERENCE:  350^ABIL
    1)= S ^IB("ABIL",$E(X,1,30),DA)=""
    2)= K ^IB("ABIL",$E(X,1,30),DA)
.12 AR TRANSACTION NUMBER 0;12 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 29, 1991
  • HELP-PROMPT:  Type a Number between 1 and 999999, 0 Decimal Digits
  • DESCRIPTION:  This is the pointer value to the AR TRANSACTION file. An entry that causes a new bill number to be created will not have an AR TRANSACTION file entry associated with it as the charge data will be stored with the original
    bill.
  • CROSS-REFERENCE:  350^AT
    1)= S ^IB("AT",$E(X,1,30),DA)=""
    2)= K ^IB("AT",$E(X,1,30),DA)
.13 INSTITUTION 0;13 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  MAR 04, 1991
  • DESCRIPTION:  
    This is the facility that caused this bill. The station number field of the institution file will be used in determining the reference number. Accounts Receivable will use the station number in the bill number.
    UNEDITABLE
.14 DATE BILLED FROM 0;14 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 02, 1992
  • DESCRIPTION:  
    This is the first date in the date range covered by this billing action.
  • RECORD INDEXES:  ACHDT (#1717)
.15 DATE BILLED TO 0;15 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 08, 1991
  • DESCRIPTION:  
    This is the last date in the date range covered by this billing action.
.16 PARENT EVENT 0;16 POINTER TO INTEGRATED BILLING ACTION FILE (#350) INTEGRATED BILLING ACTION(#350)

  • LAST EDITED:  NOV 06, 1991
  • DESCRIPTION:  This field is used only for IB ACTION entries (both events and charges) which are associated with Category C billing.
    This field is a pointer to the IB ACTION event (inpatient/NHCU admission or outpatient visit) for which the charges are being billed. For an event entry, this field will point to itself. For all IB ACTION charges (new,
    cancelled, and updated) associated with a billable event, this field will point to that event.
    Note that cancelled and updated actions will still point to the parent (new) action through the Parent Charge (.09) field, in the same manner as Pharmacy co-pay charges.
  • CROSS-REFERENCE:  350^AF
    1)= S ^IB("AF",$E(X,1,30),DA)=""
    2)= K ^IB("AF",$E(X,1,30),DA)
    This cross-reference will be used to link all Means Test/Category C co-payment and per diem charges to a particular billable event.
  • CROSS-REFERENCE:  350^ACT1^MUMPS
    1)= I $D(^IB(DA,0)),$P(^(0),"^",5)=1,$P($G(^IBE(350.1,+$P(^(0),"^",3),0)),"^")'["ADMISSION" S ^IB("ACT",X,DA)=""
    2)= K ^IB("ACT",X,DA)
    Cross-reference of all IB ACTIONS for Means Test/Category C charges which have a status (field #.05) of INCOMPLETE.
    This is a temporary cross-reference which is used to locate per diem and co-payment charges, for an inpatient/NHCU admission, which are established, but not yet passed to AR. The cross-reference is set whenever the status
    (#.05) of a billable charge is changed to 1 (INCOMPLETE), and killed without condition. The "ACT" cross-reference on the status field is the companion to this cross-reference.
.17 EVENT DATE 0;17 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 01, 1991
  • DESCRIPTION:  This field will only be used for those IB ACTION entries which represent Hospital/NHCU admissions and outpatient visits for which Category C copayment and per diem charges will be billed to the patient. The value of this
    field will be the admission or visit date. The inverse (negative) value of this date will be cross-referenced by patient for look-up purposes.
  • CROSS-REFERENCE:  350^AFDT1^MUMPS
    1)= I $D(^IB(DA,0)),$P(^(0),"^",2) S ^IB("AFDT",$P(^(0),"^",2),-X,DA)=""
    2)= I $D(^IB(DA,0)),$P(^(0),"^",2) K ^IB("AFDT",$P(^(0),"^",2),-X,DA)
    Cross-reference of all IB ACTION entries which represent inpatient/NHCU admissions by the patient (#.02) field and the minus (negative or inverse) event date field. A billable event may be located for a patient using this
    cross-reference. The "AFDT" cross-reference on the patient (#.02) field is the companion to this cross-reference.
  • RECORD INDEXES:  ACHDT (#1717)
.18 DATE LAST BILLED 0;18 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 01, 1991
  • DESCRIPTION:  This field will only be used for those IB ACTION entries which represent inpatient or NHCU admissions for which Category C copayment and per diem charges will be billed to the patient. The value of this field will be the
    last day through which charges have been calculated for the admission.
.19 IB COPAY TRANSACTION NUMBER 0;19 POINTER TO IB COPAY TRANSACTIONS FILE (#354.71) IB COPAY TRANSACTIONS(#354.71)

  • LAST EDITED:  JAN 19, 2001
  • HELP-PROMPT:  Answer with a IB COPAY TRANSACTION NUMBER
  • DESCRIPTION:  
    This is the transaction number associated with this entry to assist in determining if a patient has reached his cap.
.2 CLINIC STOP 0;20 POINTER TO IB CLINIC STOP CODE BILLABLE TYPES FILE (#352.5) IB CLINIC STOP CODE BILLABLE TYPES(#352.5)

  • LAST EDITED:  NOV 30, 2001
  • HELP-PROMPT:  Enter the clinic stop for the outpatient visit.
  • DESCRIPTION:  
    This field is used to enter the clinic stop for outpatient co-pay charges.
.21 GMT RELATED 0;21 SET
  • '1' FOR YES;

  • LAST EDITED:  JUL 24, 2002
  • HELP-PROMPT:  Is this charge related to the GMT Copayment Status
  • DESCRIPTION:  
    This is a flag indicating that this charge was decreased due to the patient's GMT Copayment status.
.22 COPAYMENT TIER 0;22 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1.N) X
  • LAST EDITED:  MAR 17, 2016
  • HELP-PROMPT:  Enter the tier this copayment was charged, whole number between 1 and 999.
  • DESCRIPTION:  
    This is the tier used to determine this charge rate for this copayment. It should be a numeric value between 1 and 999, 0 decimal digits.
11 USER ADDING ENTRY 1;1 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 04, 1991
  • DESCRIPTION:  
    This is the person adding an entry in an application that cause the application to create an entry in this file.
    UNEDITABLE
12 DATE ENTRY ADDED 1;2 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 30, 1992
  • DESCRIPTION:  
    This is the date/time that an entry was added to this file. The most recent update to an entry can be determined by finding the last entry in this field.
    UNEDITABLE
  • CROSS-REFERENCE:  350^D
    1)= S ^IB("D",$E(X,1,30),DA)=""
    2)= K ^IB("D",$E(X,1,30),DA)
  • CROSS-REFERENCE:  350^APDT1^MUMPS
    1)= I $P(^IB(DA,0),"^",9) S ^IB("APDT",$P(^(0),"^",9),-X,DA)=""
    2)= I $P(^IB(DA,0),"^",9) K ^IB("APDT",$P(^(0),"^",9),-X,DA)
    Cross-reference of all IB ACTION entries by parent link (#.09) field and the minus (negative or inverse) date entry added (#12) field. The most current ACTION for the original entry can be found using this cross
    reference. The "APDT" cross-reference on the parent link (#.09) is the companion to this cross-reference.
  • CROSS-REFERENCE:  350^APTDT1^MUMPS
    1)= I $D(^IB(DA,0)),$P(^(0),"^",2) S ^IB("APTDT",$P(^(0),"^",2),X,DA)=""
    2)= I $D(^IB(DA,0)),$P(^(0),"^",2) K ^IB("APTDT",$P(^(0),"^",2),X,DA)
    Cross-reference of all IB ACTION entries by patient (#.02) and the date entry added (#12) field. The "APTDT" cross-reference on the patient (#.02) field is the companion to this cross-reference.
13 USER LAST UPDATING 1;3 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  FEB 05, 1991
  • DESCRIPTION:  
    This is the person last updating an entry in an application when it caused an update to this entry in this file.
  • NOTES:  TRIGGERED by the STATUS field of the INTEGRATED BILLING ACTION File
14 DATE LAST UPDATED 1;4 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 05, 1991
  • DESCRIPTION:  
    This is the date/time that this entry was last updated.
  • NOTES:  TRIGGERED by the STATUS field of the INTEGRATED BILLING ACTION File
15 CHAMPVA ADM DATE 1;5 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 28, 1993
  • DESCRIPTION:  
    This is the admission date for the episode of CHAMPVA care being billed.
  • CROSS-REFERENCE:  350^ACVA1^MUMPS
    1)= I X,$D(^IB(DA,0)),$P(^(0),"^",2) S ^IB("ACVA",$P(^(0),"^",2),X,DA)=""
    2)= I X,$D(^IB(DA,0)),$P(^(0),"^",2) K ^IB("ACVA",$P(^(0),"^",2),X,DA)
    This cross-reference is used in conjunction with the ACVA cross reference on the PATIENT (#.02) field to cross reference all CHAMPVA inpatient subsistence charges by patient and admission date.
16 ON HOLD DATE 1;6 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAY 13, 1997
  • DESCRIPTION:  This date is used to determine when the patient charge (Status = ON HOLD) should be auto-released to Accounts Receivable as well as to generate reports. The date is set initially when the patient charge is established and
    placed on hold. The date is reset when a third party claim for the same episode of care is authorized. The new ON HOLD DATE is the authorized date of the third party claim.
  • NOTES:  TRIGGERED by the STATUS field of the INTEGRATED BILLING ACTION File
  • CROSS-REFERENCE:  350^AHDT^MUMPS
    1)= I $D(^IB(DA,1)),$P(^IB(DA,1),U,6) S ^IB("AHDT",+$P(^IB(DA,0),U,2),+$P(^IB(DA,0),U,5),X,DA)=""
    2)= I $D(^IB(DA,1)),$P(^IB(DA,1),U,6) K ^IB("AHDT",+$P(^IB(DA,0),U,2),+$P(^IB(DA,0),U,5),X,DA)
    Cross-reference of all IB ACTIONS that have ever had the STATUS (#.05) of ON HOLD since the install of patch IB*2*70. This cross-reference is used to automatically release charges ON HOLD for greater than 90 days. This
    cross reference is also used to generate both follow-up and historic reports. The 'AHDT1' cross-reference on the STATUS (#.05) field is the companion to this cross-reference.
17 HOLD-REVIEW DATE 1;7 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 29, 2003
  • DESCRIPTION:  
    This is the date the patient charge was put on HOLD-REVIEW status.
  • NOTES:  TRIGGERED by the STATUS field of the INTEGRATED BILLING ACTION File

External References

Name Field # of Occurrence
^%DT .14+1, .15+1, .17+1, .18+1, 12+1, 14+1, 15+1, 16+1, 17+1
NOW^%DTC .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S)
^DICR .05(XREF 2S), .05(XREF 2K), .05(XREF 3n1.4), .05(XREF 3n2.4), .05(XREF 8n1.4), .05(XREF 10n1.4)
KACHDT^IBAUTL10 IXACHDTKL+1
SACHDT^IBAUTL10 IXACHDTSL+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( .05(XREF 8n1.4)
^DD(350 .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S)
^IB - [#350] .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K), .02(XREF 4S), .02(XREF 4K), .02(XREF 5S), .02(XREF 5K), .02(XREF 6S), .02(XREF 6K)
.02(XREF 7S), .02(XREF 8S), .02(XREF 8K), .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3n1.4), .05(XREF 3K), .05(XREF 3n2.4), .05(XREF 4S)
.05(XREF 4K), .05(XREF 5S), .05(XREF 5K), .05(XREF 6S), .05(XREF 6K), .05(XREF 7S), .05(XREF 7K), .05(XREF 8S), .05(XREF 8n1.4), .05(XREF 9S)
.05(XREF 9K), .05(XREF 10S), .05(XREF 10n1.4), .09(XREF 2S), .09(XREF 2K), .16(XREF 2S), .17(XREF 1S), .17(XREF 1K), 12(XREF 2S), 12(XREF 2K)
12(XREF 3S), 12(XREF 3K), 15(XREF 1S), 15(XREF 1K), 16(XREF 1S), 16(XREF 1K)
^IB("ABIL" .11(XREF 1S), .11(XREF 1K)
^IB("AC" .05(XREF 1S), .05(XREF 1K)
^IB("ACT" .05(XREF 4S), .05(XREF 4K), .16(XREF 2S), .16(XREF 2K)
^IB("ACVA" .02(XREF 6S), .02(XREF 6K), 15(XREF 1S), 15(XREF 1K)
^IB("AD" .09(XREF 1S), .09(XREF 1K)
^IB("AE" .03(XREF 1S), .03(XREF 1K)
^IB("AF" .16(XREF 1S), .16(XREF 1K)
^IB("AFDT" .02(XREF 2S), .02(XREF 2K), .17(XREF 1S), .17(XREF 1K)
^IB("AH" .02(XREF 4S), .02(XREF 4K), .05(XREF 5S), .05(XREF 5K)
^IB("AHDT" .02(XREF 8S), .02(XREF 8K), .05(XREF 9S), .05(XREF 9K), 16(XREF 1S), 16(XREF 1K)
^IB("AI" .02(XREF 5S), .02(XREF 5K), .05(XREF 6S), .05(XREF 6K)
^IB("AJ" .02(XREF 7S), .02(XREF 7K), .05(XREF 7S), .05(XREF 7K)
^IB("APDT" .09(XREF 2S), .09(XREF 2K), 12(XREF 2S), 12(XREF 2K)
^IB("APTDT" .02(XREF 3S), .02(XREF 3K), 12(XREF 3S), 12(XREF 3K)
^IB("AT" .12(XREF 1S), .12(XREF 1K)
^IB("B" .01(XREF 1S), .01(XREF 1K)
^IB("C" .02(XREF 1S), .02(XREF 1K)
^IB("D" 12(XREF 1S), 12(XREF 1K)
^IBE(350.1 - [#350.1] .05(XREF 4S), .16(XREF 2S)
^IBE(350.21 - [#350.21] .05(XREF 10S)

Naked Globals

Name Field # of Occurrence
^(0 .02(XREF 2S), .02(XREF 2K), .02(XREF 4S), .02(XREF 4K), .02(XREF 5S), .02(XREF 5K), .02(XREF 7S), .05(XREF 4S), .05(XREF 4K), .16(XREF 2S)
.17(XREF 1S), .17(XREF 1K), 12(XREF 2S), 12(XREF 2K), 12(XREF 3S), 12(XREF 3K), 15(XREF 1S), 15(XREF 1K)
^(1 .02(XREF 3S), .02(XREF 3K), .02(XREF 6S), .02(XREF 6K), .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3n1.4), .05(XREF 3K), .05(XREF 3n2.4)
.05(XREF 8S), .05(XREF 8n1.4), .05(XREF 10S), .05(XREF 10n1.4), .09(XREF 2S), .09(XREF 2K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S)
>> %DT .14+1*, .15+1*, .17+1*, .18+1*, 12+1*, 14+1*, 15+1*, 16+1*, 17+1*
%H .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S)
%I .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S)
>> D0 .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S)
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K), .02(XREF 4S), .02(XREF 4K)
.02(XREF 5S), .02(XREF 5K), .02(XREF 6S), .02(XREF 6K), .02(XREF 7S), .02(XREF 7K), .02(XREF 8S), .02(XREF 8K), .03(XREF 1S), .03(XREF 1K)
.05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3K), .05(XREF 4S), .05(XREF 4K), .05(XREF 5S), .05(XREF 5K)
.05(XREF 6S), .05(XREF 6K), .05(XREF 7S), .05(XREF 7K), .05(XREF 8S), .05(XREF 9S), .05(XREF 9K), .05(XREF 10S), .09(XREF 1S), .09(XREF 1K)
.09(XREF 2S), .09(XREF 2K), .11(XREF 1S), .11(XREF 1K), .12(XREF 1S), .12(XREF 1K), .16(XREF 1S), .16(XREF 1K), .16(XREF 2S), .16(XREF 2K)
.17(XREF 1S), .17(XREF 1K), 12(XREF 1S), 12(XREF 1K), 12(XREF 2S), 12(XREF 2K), 12(XREF 3S), 12(XREF 3K), 15(XREF 1S), 15(XREF 1K)
16(XREF 1S), 16(XREF 1K)
>> DIG .05(XREF 2S), .05(XREF 2K), .05(XREF 3n1.4), .05(XREF 3n2.4), .05(XREF 8n1.4), .05(XREF 10n1.4)
>> DIH .05(XREF 2S), .05(XREF 2K), .05(XREF 3n1.4), .05(XREF 3n2.4), .05(XREF 8n1.4), .05(XREF 10n1.4)
>> DIU .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S)
DIV .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3n1.4), .05(XREF 3K), .05(XREF 3n2.4), .05(XREF 8S), .05(XREF 8n1.4), .05(XREF 10S), .05(XREF 10n1.4)
DIV(0 .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3n1.4), .05(XREF 3K), .05(XREF 3n2.4), .05(XREF 8S), .05(XREF 8n1.4), .05(XREF 10S), .05(XREF 10n1.4)
DUZ .05(XREF 2S), .05(XREF 2K)
>> IBDUZ .05(XREF 2S), .05(XREF 2K)
U .02(XREF 4S), .02(XREF 4K), .02(XREF 5S), .02(XREF 5K), .02(XREF 7S), .02(XREF 8S), .02(XREF 8K), .05(XREF 2S), .05(XREF 2K), .05(XREF 3S)
.05(XREF 3n1.4), .05(XREF 3K), .05(XREF 3n2.4), .05(XREF 5S), .05(XREF 5K), .05(XREF 6S), .05(XREF 6K), .05(XREF 7S), .05(XREF 7K), .05(XREF 8S)
.05(XREF 8n1.4), .05(XREF 9S), .05(XREF 9K), .05(XREF 10S), .05(XREF 10n1.4), 16(XREF 1S), 16(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K), .02(XREF 4S)
.02(XREF 4K), .02(XREF 5S), .02(XREF 5K), .02(XREF 6S), .02(XREF 6K), .02(XREF 7S), .02(XREF 7K), .02(XREF 8S), .02(XREF 8K), .03(XREF 1S)
.03(XREF 1K), .04+1!, .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3n1.4), .05(XREF 3K), .05(XREF 3n2.4)
.05(XREF 4S), .05(XREF 5S), .05(XREF 6S), .05(XREF 7S), .05(XREF 8S), .05(XREF 8n1.4), .05(XREF 9S), .05(XREF 9K), .05(XREF 10S), .05(XREF 10n1.4)
, .06+1!, .07+1*!, .08+1!, .09(XREF 1S), .09(XREF 1K), .09(XREF 2S), .09(XREF 2K), .11+1!, .11(XREF 1S), .11(XREF 1K)
, .12+1!, .12(XREF 1S), .12(XREF 1K), .14+1*!, .15+1*!, .16(XREF 1S), .16(XREF 1K), .16(XREF 2S), .16(XREF 2K), .17+1*!
.17(XREF 1S), .17(XREF 1K), .18+1*!, .22+1!, 12+1*!, 12(XREF 1S), 12(XREF 1K), 12(XREF 2S), 12(XREF 2K), 12(XREF 3S)
12(XREF 3K), 14+1*!, 15+1*!, 15(XREF 1S), 15(XREF 1K), 16+1*!, 16(XREF 1S), 16(XREF 1K), 17+1*!
Y .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S), .14+1, .15+1, .17+1, .18+1
, 12+1, 14+1, 15+1, 16+1, 17+1
Y(0 .05(XREF 8S), .05(XREF 10S)
Y(1 .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3K), .05(XREF 8S), .05(XREF 10S)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All