Global: ^BGOCCPL

Field #	Name	Loc	Type	Details
.01	NAME	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X` HELP-PROMPT: `NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION` CROSS-REFERENCE: `90362.2^B` 1)= S ^BGOCCPL("B",$E(X,1,30),DA)="" 2)= K ^BGOCCPL("B",$E(X,1,30),DA)
.02	TYPE	0;2	SET	'1' FOR SYMPTOM; '2' FOR DISEASE; '3' FOR REQUEST; LAST EDITED: `NOV 27, 2006` CROSS-REFERENCE: `90362.2^AC` 1)= S ^BGOCCPL("AC",$E(X,1,30),DA)="" 2)= K ^BGOCCPL("AC",$E(X,1,30),DA)
.03	BODY LOCATION RELATED	0;3	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `NOV 16, 2006`

NAME

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: K:$L(X)>30!(X?.N)!($L(X)<3)!'(X'?1P.E) X
HELP-PROMPT: NAME MUST BE 3-30 CHARACTERS, NOT NUMERIC OR STARTING WITH PUNCTUATION

CROSS-REFERENCE: 90362.2^B

1)= S ^BGOCCPL("B",$E(X,1,30),DA)=""

2)= K ^BGOCCPL("B",$E(X,1,30),DA)

TYPE

0;2

SET

CROSS-REFERENCE: 90362.2^AC

1)= S ^BGOCCPL("AC",$E(X,1,30),DA)=""

2)= K ^BGOCCPL("AC",$E(X,1,30),DA)

BODY LOCATION RELATED

0;3

SET

Information