Sub-Field: 81.33

Parent File	Name	Number	Package
CPT MODIFIER(#81.3)	EFFECTIVE DATE	81.33	CPT Files

Parent File

Name

Number

Package

EFFECTIVE DATE

81.33

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	EFFECTIVE DATE	0;1	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAR 07, 2003` CROSS-REFERENCE: `81.33^B` 1)= S ^DIC(81.3,DA(1),60,"B",$E(X,1,30),DA)="" 2)= K ^DIC(81.3,DA(1),60,"B",$E(X,1,30),DA) CROSS-REFERENCE: `81.3^ACT^MUMPS` 1)= D SAHD^ICPTMIDX 2)= D KAHD^ICPTMIDX Set and Kill Activation History.
.02	STATUS	0;2	SET	'0' FOR INACTIVE; '1' FOR ACTIVE; LAST EDITED: `MAR 07, 2003` CROSS-REFERENCE: `81.3^ACT^MUMPS` 1)= D SAHS^ICPTMIDX 2)= D KAHS^ICPTMIDX Set and Kill Activation History.

EFFECTIVE DATE

0;1

DATE

CROSS-REFERENCE: 81.33^B

1)= S ^DIC(81.3,DA(1),60,"B",$E(X,1,30),DA)=""

2)= K ^DIC(81.3,DA(1),60,"B",$E(X,1,30),DA)

CROSS-REFERENCE: 81.3^ACT^MUMPS

1)= D SAHD^ICPTMIDX

2)= D KAHD^ICPTMIDX

Set and Kill Activation History.

STATUS

0;2

SET

CROSS-REFERENCE: 81.3^ACT^MUMPS

1)= D SAHS^ICPTMIDX

2)= D KAHS^ICPTMIDX

Set and Kill Activation History.