STANDARD DATA DICTIONARY #350.4 -- BILLABLE AMBULATORY SURGICAL CODE FILE 3/24/25 PAGE 1
STORED IN ^IBE(350.4, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Contains the HCFA rate groups for ambulatory surgeries that may be billed. This file is time sensitive, a procedure may have
multiple entries indicating updates effective on different dates. These updates include a procedure changing rate groups or
changing status.
The data in this file is either transfered from 350.41 or entered interactively and is used to calculate the charge for a procedure
on any given date.
Per VHA Directive 10-93-142, this file definition should not be modified.
As of 10/1/96 this functionality has not been authorized. The data in this file is deleted by patch IB*2*52 and the file
definition will be deleted in a future release.
DD ACCESS: @
DEL ACCESS: @
IDENTIFIED BY: PROCEDURE (#.02), RATE GROUP (#.03)[R]
CROSS
REFERENCED BY: EFFECTIVE DATE(AIVDT), PROCEDURE(AIVDT1), EFFECTIVE DATE(B), PROCEDURE(C)
350.4,.01 EFFECTIVE DATE 0;1 DATE (Required)
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: AUG 29, 1991
HELP-PROMPT: Enter the date that this new STATUS/RATE GROUP becomes effective.
DESCRIPTION:
This is the date when the new status or rate group for a procedure becomes effective.
CROSS-REFERENCE: 350.4^B
1)= S ^IBE(350.4,"B",$E(X,1,30),DA)=""
2)= K ^IBE(350.4,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 350.4^AIVDT^MUMPS
1)= I $P(^IBE(350.4,DA,0),"^",2) S ^IBE(350.4,"AIVDT",$P(^(0),"^",2),-X,DA)=""
2)= I $P(^IBE(350.4,DA,0),"^",2) K ^IBE(350.4,"AIVDT",$P(^(0),"^",2),-X,DA)
3)= DO NOT DELETE
This cross reference is used to find the correct rate group for a procedure on a particular date.
350.4,.02 PROCEDURE 0;2 POINTER TO CPT FILE (#81)
LAST EDITED: MAY 14, 1997
DESCRIPTION:
The ambulatory surgery associated with this entry.
CROSS-REFERENCE: 350.4^C
1)= S ^IBE(350.4,"C",$E(X,1,30),DA)=""
2)= K ^IBE(350.4,"C",$E(X,1,30),DA)
3)= DO NOT DELETE
CROSS-REFERENCE: 350.4^AIVDT1^MUMPS
1)= I $P(^IBE(350.4,DA,0),"^") S ^IBE(350.4,"AIVDT",X,-$P(^(0),"^"),DA)=""
2)= I $P(^IBE(350.4,DA,0),"^") K ^IBE(350.4,"AIVDT",X,-$P(^(0),"^"),DA)
3)= DO NOT DELETE
Used to find the correct rate group for a procedure on any particular date.
350.4,.03 RATE GROUP 0;3 POINTER TO IB ACTION TYPE FILE (#350.1) (Required)
INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,1)[""MEDICARE RATE""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: DEC 02, 1991
HELP-PROMPT: May enter "Rate N" as abbrevation for Opt Medicare Rate N.
DESCRIPTION:
This is the HCFA rate group assigned to this procedure beginning with this entry's effective date.
SCREEN: S DIC("S")="I $P(^(0),U,1)[""MEDICARE RATE"""
EXPLANATION: Only Medicare Rate Action Type allowed.
NOTES: TRIGGERED by the STATUS field of the BILLABLE AMBULATORY SURGICAL CODE File
350.4,.04 STATUS 0;4 SET (Required)
'1' FOR ACTIVE;
'0' FOR INACTIVE;
LAST EDITED: JUN 09, 2004
HELP-PROMPT: Enter the appropriate STATUS for this procedure on and after the EFFECTIVE DATE.
DESCRIPTION:
The STATUS for this procedure beginning with the EFFECTIVE DATE.
CROSS-REFERENCE: ^^TRIGGER^350.4^.03
1)= X ^DD(350.4,.04,1,1,1.3) I X S X=DIV S Y(1)=$S($D(^IBE(350.4,D0,0)):^(0),1:"") S X=$P(Y(1),U,3)
,X=X S DIU=X K Y S X="" S DIH=$G(^IBE(350.4,DIV(0),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=350.4,DIG=.03 D
^DICR
1.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(1)=$C(59)_$P($G(^DD(350.4,.04,0)),U,3) S X=$P($P(Y
(1),$C(59)_Y(0)_":",2),$C(59))="INACTIVE"
2)= X ^DD(350.4,.04,1,1,2.3) I X S X=DIV S Y(1)=$S($D(^IBE(350.4,D0,0)):^(0),1:"") S X=$P(Y(1),U,3)
,X=X S DIU=X K Y S X="" S DIH=$G(^IBE(350.4,DIV(0),0)),DIV=X S $P(^(0),U,3)=DIV,DIH=350.4,DIG=.03 D
^DICR
2.3)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(0)=X S Y(2)=$C(59)_$P($G(^DD(350.4,.04,0)),U,3),Y(1)=$S($D(
^IBE(350.4,D0,0)):^(0),1:"") S X=$P($P(Y(2),$C(59)_$P(Y(1),U,4)_":",2),$C(59))="INACTIVE"
CREATE CONDITION)= STATUS="INACTIVE"
CREATE VALUE)= @
DELETE CONDITION)= STATUS="INACTIVE"
DELETE VALUE)= @
FIELD)= RATE GROUP
Removes the Rate Group from any procedure being inactivated.
FILES POINTED TO FIELDS
CPT (#81) PROCEDURE (#.02)
IB ACTION TYPE (#350.1) RATE GROUP (#.03)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):