Global: ^BGPINDF

FileMan FileNo	FileMan Filename	Package
90244.01	BGP 04 INDICATORS	IHS GPRA Information System

Package	Total	Routines
IHS GPRA Information System	1	BGPPOST1

Package	Total	FileMan Files
IHS GPRA Information System	1	BGP 04 INDIVIDUAL INDICATORS(#90244.02)[.01]

Fields, Total: 23

Field #	Name	Loc	Type	Details
.01	INDICATOR NUMBER	0;1	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X` LAST EDITED: `NOV 20, 2003` HELP-PROMPT: `Type a Number between 1 and 999, 0 Decimal Digits` DESCRIPTION: The fiscal year this indicator is relevant to. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `90244.01^B` 1)= S ^BGPINDF("B",$E(X,1,30),DA)="" 2)= K ^BGPINDF("B",$E(X,1,30),DA)
.02	ORDER ON SELECTION/REPORT	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>5!($L(X)<1) X` LAST EDITED: `NOV 08, 2003` HELP-PROMPT: `Answer must be 1-5 characters in length.` CROSS-REFERENCE: `90244.01^AO` 1)= S ^BGPINDF("AO",$E(X,1,30),DA)="" 2)= K ^BGPINDF("AO",$E(X,1,30),DA)
.03	TITLE	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>70!($L(X)<1) X` LAST EDITED: `NOV 19, 2003` HELP-PROMPT: `Answer must be 1-70 characters in length.` CROSS-REFERENCE: `90244.01^C` 1)= S ^BGPINDF("C",$E(X,1,30),DA)="" 2)= K ^BGPINDF("C",$E(X,1,30),DA)
.04	SELECTION TITLE	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>73!($L(X)<1) X` LAST EDITED: `JAN 06, 2003` HELP-PROMPT: `Answer must be 1-73 characters in length.`
.05	LIST SELECTION TITLE	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>73!($L(X)<1) X` LAST EDITED: `JAN 06, 2003` HELP-PROMPT: `Answer must be 1-73 characters in length.`
.06	ORDER TO DISPLAY	0;6	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 20, 2003` HELP-PROMPT: `Type a Number between 1 and 9999, 0 Decimal Digits`
.07	GPRA INDICATOR	0;7	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `APR 23, 2003` CROSS-REFERENCE: `90244.01^GPRA` 1)= S ^BGPINDF("GPRA",$E(X,1,30),DA)="" 2)= K ^BGPINDF("GPRA",$E(X,1,30),DA)
.08	AREA INDICATOR	0;8	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `APR 23, 2003` CROSS-REFERENCE: `90244.01^AREA` 1)= S ^BGPINDF("AREA",$E(X,1,30),DA)="" 2)= K ^BGPINDF("AREA",$E(X,1,30),DA)
.09	HEDIS INDICATOR	0;9	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `NOV 02, 2003` CROSS-REFERENCE: `90244.01^HEDIS` 1)= S ^BGPINDF("HEDIS",$E(X,1,30),DA)="" 2)= K ^BGPINDF("HEDIS",$E(X,1,30),DA)
.11	LOCAL REPORT	0;11	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `NOV 02, 2003` CROSS-REFERENCE: `90244.01^LOCAL` 1)= S ^BGPINDF("LOCAL",$E(X,1,30),DA)="" 2)= K ^BGPINDF("LOCAL",$E(X,1,30),DA)
.12	NO LIST	0;12	SET	'1' FOR YES, NO LIST; LAST EDITED: `MAR 18, 2004`
1	M CODE TO EXECUTE	1;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `DEC 30, 2002` HELP-PROMPT: `This is Standard MUMPS code.` WRITE AUTHORITY: @
2	SET LIST VALUE	2;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `JAN 08, 2003` HELP-PROMPT: `This is Standard MUMPS code.` WRITE AUTHORITY: @
3	PRINT M CODE	3;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `JAN 07, 2003` HELP-PROMPT: `This is Standard MUMPS code.` WRITE AUTHORITY: @
4	DELIMITED FILE PRINT	4;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `JAN 09, 2003` HELP-PROMPT: `This is Standard MUMPS code.` WRITE AUTHORITY: @
1100	FY LOGIC	11;0	WORD-PROCESSING #90244.0111
5100	INDICATOR DESCRIPTION	51;0	WORD-PROCESSING #90244.0151
5200	PAST PERFORMANCE	52;0	WORD-PROCESSING #90244.0152	LAST EDITED: `JAN 17, 2003`
5300	REPORT PRINT 2ND PAGE	53;0	WORD-PROCESSING #90244.0153
6100	DENOMINATOR DEFINITIONS	61;0	Multiple #90244.0161	90244.0161
6200	NUMERATOR DEFINITIONS	62;0	Multiple #90244.0162	90244.0162
7100	REPORT LIST 1ST PAGE	71;0	WORD-PROCESSING #90244.0171
7200	LIST PRINT SECOND PAGE	72;0	WORD-PROCESSING #90244.0172

Customize PDF page

Package: IHS GPRA Information System

Global: ^BGPINDF

Information

Description

Accessed By FileMan Db Calls, Total: 1

Pointed To By FileMan Files, Total: 1

Fields, Total: 23