Sub-Field: 130.0681

Parent File	Name	Number	Package
SURGERY(#130)	PLANNED IMPLANTS	130.0681	Surgery

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PLANNED IMPLANTS	0;1	POINTER TO PLANNED IMPLANT FILE (#131.5)	PLANNED IMPLANT(#131.5) INPUT TRANSFORM: `S DIC("S")="I '$P(^(0),U,3)&($$SCR^SRTOVRF(131.5))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JUN 26, 2015` HELP-PROMPT: `Enter the name of the planned implant device.` DESCRIPTION: `This is information related to the planned implants to be used for this operative procedure. Enter all planned implants.` SCREEN: `S DIC("S")="I '$P(^(0),U,3)&($$SCR^SRTOVRF(131.5))"` EXPLANATION: `Screen prevents selection of inactive entries.` CROSS-REFERENCE: `130.0681^B` `1)= S ^SRF(DA(1),59,"B",$E(X,1,30),DA)=""` `2)= K ^SRF(DA(1),59,"B",$E(X,1,30),DA)`

PLANNED IMPLANTS

0;1

POINTER TO PLANNED IMPLANT FILE (#131.5)

INPUT TRANSFORM: S DIC("S")="I '$P(^(0),U,3)&($$SCR^SRTOVRF(131.5))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 26, 2015
HELP-PROMPT: Enter the name of the planned implant device.
DESCRIPTION:
This is information related to the planned implants to be used for this operative procedure. Enter all planned implants.
SCREEN: S DIC("S")="I '$P(^(0),U,3)&($$SCR^SRTOVRF(131.5))"
EXPLANATION: Screen prevents selection of inactive entries.
CROSS-REFERENCE: 130.0681^B
1)= S ^SRF(DA(1),59,"B",$E(X,1,30),DA)=""
2)= K ^SRF(DA(1),59,"B",$E(X,1,30),DA)