Global: ^BGPPEDCG

FileMan FileNo	FileMan Filename	Package
90558.12	BGP 17 PATIENT ED DATA CURRENT	IHS GPRA Information System

Package	Total	Routines
IHS GPRA Information System	15	BGP7ASL BGP7ASL1 BGP7DH BGP7DPE1 BGP7DPE2 BGP7DPE3 BGP7DPEA BGP7DPED BGP7DPEP BGP7DPEQ BGP7GAPE BGP7GUPL BGP7PDH1 BGP7PUTL BGP7ULF

Package	Total	Routines
IHS GPRA Information System	4	BGP7DPE BGP7GUPL BGP7PUTL BGP7ULF

Fields, Total: 50

Field #	Name	Loc	Type	Details
.01	BEGINNING DATE	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 16, 2006` CROSS-REFERENCE: `90558.12^B` 1)= S ^BGPPEDCG("B",$E(X,1,30),DA)="" 2)= K ^BGPPEDCG("B",$E(X,1,30),DA)
.02	ENDING DATE	0;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 16, 2006`
.03	PREVIOUS YR BEG DATE	0;3	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 16, 2006`
.04	PREVIOUS YR END DATE	0;4	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 16, 2006`
.05	BASELINE YEAR BEG DATE	0;5	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 16, 2006`
.06	BASELINE YR END DATE	0;6	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 16, 2006`
.07	FY	0;7	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 16, 2006`
.08	QUARTER	0;8	SET	'0' FOR FULL FISCAL YEAR; '1' FOR 1ST QUARTER; '2' FOR 2ND QUARTER; '3' FOR 3RD QUARTER; '4' FOR 4TH QUARTER; '5' FOR USER DEFINED DATE RANGE; LAST EDITED: `NOV 16, 2006`
.09	FACILITY ASUFAC	0;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>6!($L(X)<1) X` LAST EDITED: `NOV 16, 2006` HELP-PROMPT: `Answer must be 1-6 characters in length.`
.1	SU CODE	0;10	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>4!($L(X)<1) X` LAST EDITED: `NOV 16, 2006` HELP-PROMPT: `Answer must be 1-4 characters in length.`
.11	POPULATION	0;11	SET	'1' FOR INDIAN/ALASKAN NATIVE; '2' FOR NON INDIAN; '3' FOR BOTH; LAST EDITED: `NOV 16, 2006`
.12	DB ID	0;12	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>5!($L(X)<1) X` LAST EDITED: `NOV 16, 2006` HELP-PROMPT: `Answer must be 1-5 characters in length.`
.13	DATE REPORT RUN	0;13	DATE	INPUT TRANSFORM: `S %DT="EX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `NOV 16, 2006`
.14	TEMPLATE?	0;14	SET	'1' FOR YES; '0' FOR NO; LAST EDITED: `JUN 17, 2009`
.2	NOT FOR AREA CONSOL	0;20	SET	'1' FOR NOT FOR ARE; LAST EDITED: `OCT 08, 2013`
1101	USER POP	11;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 21, 2006` HELP-PROMPT: `Type a Number between 1 and 999999, 0 Decimal Digits`
1102	NUMBER W/EDUCATION 1.1.1	11;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 21, 2006` HELP-PROMPT: `Type a Number between 1 and 999999, 0 Decimal Digits`
1103	AVG TIME SPENT 2.1.2A	11;3	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 21, 2006` HELP-PROMPT: `Type a Number between 0 and 99999999, 0 Decimal Digits`
1104	MINIMUM TIME SPENT	11;4	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 21, 2006` HELP-PROMPT: `Type a Number between 0 and 999999, 0 Decimal Digits`
1105	MAXIMUM TIME SPENT	11;5	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 21, 2006` HELP-PROMPT: `Type a Number between 0 and 999999, 0 Decimal Digits`
1106	# TOPICS W/MINS & PROVIDER	11;6	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 21, 2006` HELP-PROMPT: `Type a Number between 0 and 999999999, 0 Decimal Digits`
1107	TOTAL # OF MINS 2.1.1	11;7	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 21, 2006` HELP-PROMPT: `Type a Number between 0 and 99999999, 0 Decimal Digits`
1108	TOTAL # OF CODES 3.1.1	11;8	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1109	TOTAL # TOPICS 4.1.1	11;9	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1110	TOTAL 5.1.1	11;10	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 9999999, 0 Decimal Digits`
1111	MFI COMMUNITIES	1111;0	Multiple #90558.12111	90558.12111
1112	TOTAL 6.1.1	11;12	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 999999, 0 Decimal Digits`
1113	GOOD	11;13	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 999999, 0 Decimal Digits`
1114	FAIR	11;14	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 999999, 0 Decimal Digits`
1115	POOR	11;15	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 999999, 0 Decimal Digits`
1116	REFUSED	11;16	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 999999, 0 Decimal Digits`
1117	GROUP NO ASSESS	11;17	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 999999, 0 Decimal Digits`
1118	BLANK	11;18	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `NOV 24, 2006` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1119	7 DENOM	11;19	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 29, 2007` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1120	7.2.1 NUMER GS	11;20	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 18, 2012` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1121	7.2.2 NUMER GNS	11;21	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 18, 2012` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1122	7.1.3 NUMER GM	11;22	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `JUL 29, 2007` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1123	7.2.4 NUMER	11;23	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 18, 2012` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1124	7.1.1	11;24	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 18, 2012` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1129	7.1 DENOM USER POP	11;29	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `SEP 18, 2012` HELP-PROMPT: `Type a Number between 0 and 99999, 0 Decimal Digits`
1200	2.1 RATE	12;0	Multiple #90558.1212	90558.1212
1300	TOP 25 DXS	13;0	Multiple #90558.1213	90558.1213
1400	4.1.1	14;0	Multiple #90558.1214	90558.1214
1500	5.1.1	15;0	Multiple #90558.1215	90558.1215
1600	7.2.1	16;0	Multiple #90558.1216	90558.1216
1700	7.1.2 GOAL NOT SET	17;0	Multiple #90558.1217	90558.1217
1800	GOAL MET	18;0	Multiple #90558.1218	90558.1218
1900	GOAL MAINTAINED	19;0	Multiple #90558.1219	90558.1219
2100	GOAL NOT MET	21;0	Multiple #90558.1221	90558.1221
9999	COMMUNITIES	9999;0	Multiple #90558.129	90558.129

Customize PDF page

Package: IHS GPRA Information System

Global: ^BGPPEDCG

Information

Description

Directly Accessed By Routines, Total: 18

Accessed By FileMan Db Calls, Total: 4

Fields, Total: 50