Global: ^BGPSNOMM

Information

FileMan FileNo	FileMan Filename	Package
90556.21	BGP 16 SNOMED LISTS	IHS GPRA Information System

Package	Total	Routines
IHS GPRA Information System	10	BGP6CON1 BGP6D21 BGP6D25 BGP6D5 BGP6D7 BGP6D711 BGP6D722 BGP6D723 BGP6D75 BGP6POS2
IHS Uniform Data System	1	BUDCRP6R
iCare	1	BQITRCTB

Package	Total	Routines
IHS GPRA Information System	1	BGP6POS2

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	NAME OF LIST	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `JUL 23, 2015` HELP-PROMPT: `Answer must be 3-30 characters in length.` CROSS-REFERENCE: `90556.21^B` 1)= S ^BGPSNOMM("B",$E(X,1,30),DA)="" 2)= K ^BGPSNOMM("B",$E(X,1,30),DA)
1101	SNOMED CODE	11;0	Multiple #90556.2111	90556.2111

NAME OF LIST

0;1

FREE TEXT

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

CROSS-REFERENCE: 90556.21^B

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

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

1101 SNOMED CODE 11;0 Multiple #90556.2111 90556.2111