Sub-Field: 123.0333

Parent File	Name	Number	Package
GMRC CONSULT MAPPING(#123.033)	CONSULTS ORDER ITEM	123.0333	Consult Request Tracking

Parent File

Name

Number

Package

CONSULTS ORDER ITEM

123.0333

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	CONSULTS ORDER ITEM	0;1	POINTER TO PROTOCOL FILE (#101)	PROTOCOL(#101) INPUT TRANSFORM: `S DIC("S")=$$DICS^GMRCCX(123.0333) D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `FEB 01, 2017` HELP-PROMPT: `Enter a consult order item.` DESCRIPTION: `Consult order item.` SCREEN: `S DIC("S")=$$DICS^GMRCCX(123.0333)` EXPLANATION: `Only consult order items are selectable.` PRE-LOOKUP: `D LOOKUP^GMRCCX(.X,$G(D0,$G(Y(1))),123.0333)` CROSS-REFERENCE: `123.0333^B` `1)= S ^GMR(123.033,DA(1),"PROT","B",$E(X,1,30),DA)=""` `2)= K ^GMR(123.033,DA(1),"PROT","B",$E(X,1,30),DA)`

CONSULTS ORDER ITEM

0;1

POINTER TO PROTOCOL FILE (#101)

INPUT TRANSFORM: S DIC("S")=$$DICS^GMRCCX(123.0333) D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
LAST EDITED: FEB 01, 2017
HELP-PROMPT: Enter a consult order item.
DESCRIPTION:
Consult order item.
SCREEN: S DIC("S")=$$DICS^GMRCCX(123.0333)
EXPLANATION: Only consult order items are selectable.
PRE-LOOKUP: D LOOKUP^GMRCCX(.X,$G(D0,$G(Y(1))),123.0333)
CROSS-REFERENCE: 123.0333^B
1)= S ^GMR(123.033,DA(1),"PROT","B",$E(X,1,30),DA)=""
2)= K ^GMR(123.033,DA(1),"PROT","B",$E(X,1,30),DA)