Sub-Field: 811.371

Parent File	Name	Number	Package
EXPANDED TAXONOMIES(#811.3)	RADIOLOGY CPT LIST	811.371	Clinical Reminders

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	RADIOLOGY CPT CODE	0;1	POINTER TO CPT FILE (#81)	CPT(#81) LAST EDITED: `MAY 05, 2000` HELP-PROMPT: `Do not edit this field.` DESCRIPTION: This is a radiology CPT code pointer.
1	RADIOLOGY PROCEDURE	0;2	POINTER TO RAD/NUC MED PROCEDURES FILE (#71)	RAD/NUC MED PROCEDURES(#71) LAST EDITED: `FEB 28, 2003` HELP-PROMPT: `Do not edit this field.` DESCRIPTION: This is the pointer to the radiology procedure that corresponds to the CPT code in the .01 field. FIELD INDEX: `ARCPTP (#540) MUMPS IR SORTING ONLY` Short Descr: ICPT pointer for radiology procedures Set Logic: S ^PXD(811.3,DA(1),71,"RCPTP",X,DA)=$P(^PXD(811.3,DA(1),71,DA,0),U,1) Kill Logic: K ^PXD(811.3,DA(1),71,"RCPTP",X,DA) Whole Kill: K ^PXD(811.3,DA(1),71,"RCPTP") X(1): RADIOLOGY PROCEDURE (811.371,1) (Subscr 1) (forwards)

RADIOLOGY CPT CODE

0;1

POINTER TO CPT FILE (#81)

RADIOLOGY PROCEDURE

0;2

POINTER TO RAD/NUC MED PROCEDURES FILE (#71)

DESCRIPTION:

This is the pointer to the radiology procedure that corresponds to the CPT code in the .01 field.

FIELD INDEX: ARCPTP (#540) MUMPS IR SORTING ONLY

Short Descr:  ICPT pointer for radiology procedures

Set Logic:  S ^PXD(811.3,DA(1),71,"RCPTP",X,DA)=$P(^PXD(811.3,DA(1),71,DA,0),U,1)

Kill Logic:  K ^PXD(811.3,DA(1),71,"RCPTP",X,DA)

Whole Kill:  K ^PXD(811.3,DA(1),71,"RCPTP")

X(1):  RADIOLOGY PROCEDURE  (811.371,1)  (Subscr 1)  (forwards)