Sub-Field: 123.5101

Parent File	Name	Number	Package
REQUEST SERVICES(#123.5)	PROCEDURE TYPE	123.5101	Consult Request Tracking

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PROCEDURE TYPE	0;1	POINTER TO PROTOCOL FILE (#101)	PROTOCOL(#101) INPUT TRANSFORM: `S DIC("S")="I $E(^(0),1,5)=""GMRCR""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `JUN 28, 2000` HELP-PROMPT: `Select the procedure that can be processed by this service.` DESCRIPTION: `This field is no longer used for associating a prcedure with a particular Consult service. Use the RELATED SERVICES field in the GMRC PROCEDURE (#123.3) file for this purpose.` `This field will be deleted in the future.` SCREEN: `S DIC("S")="I $E(^(0),1,5)=""GMRCR"""` EXPLANATION: `Only Procedures may be chosen.` CROSS-REFERENCE: `123.5101^B` `1)= S ^GMR(123.5,DA(1),101,"B",$E(X,1,30),DA)=""` `2)= K ^GMR(123.5,DA(1),101,"B",$E(X,1,30),DA)` CROSS-REFERENCE: `123.5^APR` `1)= S ^GMR(123.5,"APR",$E(X,1,30),DA(1),DA)=""` `2)= K ^GMR(123.5,"APR",$E(X,1,30),DA(1),DA)` `This cross reference is used to find all services which process a procedure type.`

PROCEDURE TYPE

0;1

POINTER TO PROTOCOL FILE (#101)

INPUT TRANSFORM: S DIC("S")="I $E(^(0),1,5)=""GMRCR""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: JUN 28, 2000
HELP-PROMPT: Select the procedure that can be processed by this service.
DESCRIPTION: This field is no longer used for associating a prcedure with a particular Consult service. Use the RELATED SERVICES field in the GMRC PROCEDURE (#123.3) file for this purpose.
This field will be deleted in the future.
SCREEN: S DIC("S")="I $E(^(0),1,5)=""GMRCR"""
EXPLANATION: Only Procedures may be chosen.
CROSS-REFERENCE: 123.5101^B
1)= S ^GMR(123.5,DA(1),101,"B",$E(X,1,30),DA)=""
2)= K ^GMR(123.5,DA(1),101,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 123.5^APR
1)= S ^GMR(123.5,"APR",$E(X,1,30),DA(1),DA)=""
2)= K ^GMR(123.5,"APR",$E(X,1,30),DA(1),DA)
This cross reference is used to find all services which process a procedure type.