STANDARD DATA DICTIONARY #363.33 -- BILLING REVENUE CODE LINKS FILE 6/27/25 PAGE 1 STORED IN ^IBE(363.33, (3317 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- Certain types of bills require specific revenue codes to be used to bill certain types of care. This file allows linking of revenue codes and the care they should be used for. DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ IDENTIFIED BY: GROUP (#.02)[R], PROCEDURE 1 (#.03)[R], PROCEDURE 2 (#.04) CROSS REFERENCED BY: GROUP(AGP), PROCEDURE 1(AGP1), GROUP(AGPE), PROCEDURE 2(AGPE1), REVENUE CODE(B), GROUP(C) 363.33,.01 REVENUE CODE 0;1 POINTER TO REVENUE CODE FILE (#399.2) (Required) INPUT TRANSFORM: S DIC("S")="I +$P(^(0),U,3)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: APR 20, 1999 HELP-PROMPT: Enter a Revenue Code that should be used to bill this care. DESCRIPTION: This is a Revenue Code that is required to be used when billing a certain type of care. SCREEN: S DIC("S")="I +$P(^(0),U,3)=1" EXPLANATION: Active Revenue Codes Only! CROSS-REFERENCE: 363.33^B 1)= S ^IBE(363.33,"B",$E(X,1,30),DA)="" 2)= K ^IBE(363.33,"B",$E(X,1,30),DA) 363.33,.02 GROUP 0;2 POINTER TO BILLING SPECIAL GROUPS FILE (#363.32) (Required) INPUT TRANSFORM: S DIC("S")="I +$P(^(0),U,2)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 13, 1999 HELP-PROMPT: Enter the name of the group this revenue code link applies to. DESCRIPTION: This group defines which Billing Rates the revenue code link should be applied to. SCREEN: S DIC("S")="I +$P(^(0),U,2)=1" EXPLANATION: Revenue Code Link Groups Only! CROSS-REFERENCE: 363.33^C 1)= S ^IBE(363.33,"C",$E(X,1,30),DA)="" 2)= K ^IBE(363.33,"C",$E(X,1,30),DA) CROSS-REFERENCE: 363.33^AGP^MUMPS 1)= I +X,+$P($G(^IBE(363.33,DA,0)),U,3) S ^IBE(363.33,"AGP",+X,+$P(^(0),U,3),DA)="" 2)= I +X,+$P($G(^IBE(363.33,DA,0)),U,3) K ^IBE(363.33,"AGP",+X,+$P(^(0),U,3),DA) Cross reference of Procedure 1 by Group. CROSS-REFERENCE: 363.33^AGPE^MUMPS 1)= I +X,+$P($G(^IBE(363.33,DA,0)),U,4) S ^IBE(363.33,"AGPE",+X,+$P(^(0),U,4),DA)="" 2)= I +X,+$P($G(^IBE(363.33,DA,0)),U,4) K ^IBE(363.33,"AGPE",+X,+$P(^(0),U,4),DA) Cross reference of Procedure 2 by Group, end of a range. 363.33,.03 PROCEDURE 1 0;3 POINTER TO CPT FILE (#81) (Required) INPUT TRANSFORM: S DIC("S")="I +$P($$CPT^ICPTCOD(Y,DT),U,7)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 13, 1999 HELP-PROMPT: Enter a procedure that requires a specific revenue code on a bill. DESCRIPTION: This is a procedure that requires a specific revenue code on a certain type of bill. If there is a range of procedures for a particular revenue code then enter the first procedure in the range. SCREEN: S DIC("S")="I +$P($$CPT^ICPTCOD(Y,DT),U,7)" EXPLANATION: Active Procedures Only! CROSS-REFERENCE: 363.33^AGP1^MUMPS 1)= I +X,+$P($G(^IBE(363.33,DA,0)),U,2) S ^IBE(363.33,"AGP",+$P(^(0),U,2),+X,DA)="" 2)= I +X,+$P($G(^IBE(363.33,DA,0)),U,2) K ^IBE(363.33,"AGP",+$P(^(0),U,2),+X,DA) Cross reference of Procedure 1 by Group. 363.33,.04 PROCEDURE 2 0;4 POINTER TO CPT FILE (#81) INPUT TRANSFORM: S DIC("S")="I +$P($$CPT^ICPTCOD(Y,DT),U,7)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: JUL 13, 1999 HELP-PROMPT: If a range of procedures requires a specific revenue code when billed then enter the last procedure in the range. DESCRIPTION: This is the last procedure in a range of procedures that require a specific revenue code when billed. SCREEN: S DIC("S")="I +$P($$CPT^ICPTCOD(Y,DT),U,7)" EXPLANATION: Active Procedures Only! CROSS-REFERENCE: 363.33^AGPE1^MUMPS 1)= I +X,+$P($G(^IBE(363.33,DA,0)),U,2) S ^IBE(363.33,"AGPE",+$P(^(0),U,2),+X,DA)="" 2)= I +X,+$P($G(^IBE(363.33,DA,0)),U,2) K ^IBE(363.33,"AGPE",+$P(^(0),U,2),+X,DA) Cross reference of Procedure 2 by Group, end of a range. FILES POINTED TO FIELDS BILLING SPECIAL GROUPS (#363.32) GROUP (#.02) CPT (#81) PROCEDURE 1 (#.03) PROCEDURE 2 (#.04) REVENUE CODE (#399.2) REVENUE CODE (#.01) INPUT TEMPLATE(S): PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):