Sub-Field: 699.61

Parent File	Name	Number	Package
DIAG/THERAP INTERVENT(#699.6)	*PROCEDURE	699.61	Medicine

Parent File

Name

Number

Package

*PROCEDURE

699.61

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PROCEDURE	0;1	POINTER TO PROCEDURE/SUBSPECIALTY FILE (#697.2)	PROCEDURE/SUBSPECIALTY(#697.2) LAST EDITED: `AUG 30, 1989` HELP-PROMPT: `Enter the procedure with which this intervention is associated.` DESCRIPTION: `This field identifies the specific Medical procedure that this technique is applicable to.` CROSS-REFERENCE: `699.61^B` `1)= S ^MCAR(699.6,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^MCAR(699.6,DA(1),1,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `699.6^C` `1)= S ^MCAR(699.6,"C",$E(X,1,30),DA(1),DA)=""` `2)= K ^MCAR(699.6,"C",$E(X,1,30),DA(1),DA)` `This cross-reference allows looks-up on procedure.`

PROCEDURE

0;1

POINTER TO PROCEDURE/SUBSPECIALTY FILE (#697.2)

LAST EDITED: AUG 30, 1989
HELP-PROMPT: Enter the procedure with which this intervention is associated.
DESCRIPTION:
This field identifies the specific Medical procedure that this technique is applicable to.
CROSS-REFERENCE: 699.61^B
1)= S ^MCAR(699.6,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^MCAR(699.6,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 699.6^C
1)= S ^MCAR(699.6,"C",$E(X,1,30),DA(1),DA)=""
2)= K ^MCAR(699.6,"C",$E(X,1,30),DA(1),DA)
This cross-reference allows looks-up on procedure.