Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Details | All

Print Page as PDF

Sub-Field: 357.951

Package: Automated Information Collection System

FORM DEFINITION(#357.95)-->357.951

Sub-Field: 357.951

Information

Parent File	Name	Number	Package
FORM DEFINITION(#357.95)	BUBBLES	357.951	Automated Information Collection System

Details

Field #	Name	Loc	Type	Details
.01	BUBBLE ROW	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `APR 03, 1996` HELP-PROMPT: `Type a Number between 0 and 999, 0 Decimal Digits` DESCRIPTION: The row the bubble occurs on. Row 0 is at the top. CROSS-REFERENCE: `357.951^B` 1)= S ^IBD(357.95,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^IBD(357.95,DA(1),1,"B",$E(X,1,30),DA) CROSS-REFERENCE: `357.95^AC^MUMPS` 1)= S:$P($G(^IBD(357.95,DA(1),1,DA,0)),"^",2)]"" ^IBD(357.95,"AC",DA(1),X,$P(^IBD(357.95,DA(1),1,DA,0),"^",2),DA)="" 2)= K:$P($G(^IBD(357.95,DA(1),1,DA,0)),"^",2)]"" ^IBD(357.95,"AC",DA(1),X,$P(^IBD(357.95,DA(1),1,DA,0),"^",2),DA) This cross-reference indexes the bubbles by location. Set by the .01 and .02 fields.
.02	BUBBLE COLUMN	0;2	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>200)!(X<0)!(X?.E1"."1N.N) X` LAST EDITED: `APR 03, 1996` HELP-PROMPT: `Type a Number between 0 and 200, 0 Decimal Digits` DESCRIPTION: The column the bubble occurs on. Columns begin at 0 on the left. CROSS-REFERENCE: `357.95^AC1^MUMPS` 1)= S:X]"" ^IBD(357.95,"AC",DA(1),$P($G(^IBD(357.95,DA(1),1,DA,0)),"^"),X,DA)="" 2)= K:X]"" ^IBD(357.95,"AC",DA(1),$P($G(^IBD(357.95,DA(1),1,DA,0)),"^"),X,DA) This cross-reference indexes the bubbles by location. Set by the .01 and .02 fields.
.03	TYPE OF DATA	0;3	POINTER TO PACKAGE INTERFACE FILE (#357.6)	PACKAGE INTERFACE(#357.6) INPUT TRANSFORM: `S DIC("S")="I $P(^(0),U,6)=1,$P(^(0),U,9)=1,$P(^(0),U,16)[""P""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `APR 03, 1996` HELP-PROMPT: `What type of data does the bubble represent?` DESCRIPTION: The type of data a bubble represents. Used to map the data to DHCP. SCREEN: `S DIC("S")="I $P(^(0),U,6)=1,$P(^(0),U,9)=1,$P(^(0),U,16)[""P"""` EXPLANATION: `The screen is only for PANDAS. It allows only certain input interfaces.` CROSS-REFERENCE: `357.95^AE^MUMPS` 1)= I X,$P($G(^IBD(357.95,DA(1),1,DA,0)),"^",4)]"" S ^IBD(357.95,"AE",DA(1),X,+$P(^IBD(357.95,DA(1),1,DA,0),"^",10),$P(^(0),"^",4),DA)="" 2)= I X,$P($G(^IBD(357.95,DA(1),1,DA,0)),"^",4)]"" K ^IBD(357.95,"AE",DA(1),X,+$P(^IBD(357.95,DA(1),1,DA,0),"^",10),$P(^(0),"^",4),DA) Subscripts are , , ,,). Set by the .03 ,.04, and .1 fields.
.04	PRIMARY VALUE	0;4	FREE TEXT	INPUT TRANSFORM: `D FDCHOICE^IBDFU91($P(^IBD(357.95,D0,1,D1,0),U,3),.X)` OUTPUT TRANSFORM: `D OUTPUT^IBDFU91($P(^IBD(357.95,D0,1,D1,0),U,3),.Y)` LAST EDITED: `APR 03, 1996` HELP-PROMPT: `What value should be entered to the database?` DESCRIPTION: The value to pass to the package interface. EXECUTABLE HELP: `D HELP^IBDFU91($P(^IBD(357.95,DA(1),1,DA,0),U,3))` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `357.95^AE2^MUMPS` 1)= I $P($G(^IBD(357.95,DA(1),1,DA,0)),"^",3),X]"" S ^IBD(357.95,"AE",DA(1),$P(^IBD(357.95,DA(1),1,DA,0),"^",3),+$P(^(0),"^",10),X,DA)="" 2)= I $P($G(^IBD(357.95,DA(1),1,DA,0)),"^",3),X]"" K ^IBD(357.95,"AE",DA(1),$P(^IBD(357.95,DA(1),1,DA,0),"^",3),+$P(^(0),"^",10),X,DA) Subscripts are , , ,,). Set by the .03 ,.04, and .1 fields.
.05	FIELD NAME	0;5	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>30!($L(X)<3) X` LAST EDITED: `AUG 23, 1994` HELP-PROMPT: `Answer must be 3-30 characters in length.` DESCRIPTION: The name of the field that the bubble appears in.
.06	FIELD ID	0;6	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>10!($L(X)<2) X` LAST EDITED: `AUG 23, 1994` HELP-PROMPT: `Answer must be 2-10 characters in length.` DESCRIPTION: A unique identifier for a group of one or more bubbles that is used to tie that group of bubbles together.
.07	SELECTION RULE	0;7	SET	**********************REQUIRED FIELD********************** '0' FOR ANY NUMBER; '1' FOR EXACTLY ONE; '2' FOR AT MOST ONE; '3' FOR AT LEAST ONE; LAST EDITED: `AUG 24, 1994` DESCRIPTION: A rule that specifies how many of the bubbles can be filled in for a group of bubbles identified by the same FIELD ID.
.08	DISPLAYED TEXT	0;8	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X` LAST EDITED: `APR 27, 1995` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: The text that appears on the form and is associated with the bubble.
.09	DISPLAYED HEADER	0;9	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>40!($L(X)<1) X` LAST EDITED: `OCT 19, 1994` HELP-PROMPT: `What group header does the selection appear under?` DESCRIPTION: The header, if any, that is associated with the bubble.
.1	DATA QUALIFIER	0;10	POINTER TO AICS DATA QUALIFIERS FILE (#357.98)	AICS DATA QUALIFIERS(#357.98) INPUT TRANSFORM: `S DIC("S")="I $$DQGOOD^IBDFU9($P(^IBD(357.95,D0,1,D1,0),U,3),Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X` LAST EDITED: `SEP 12, 1995` HELP-PROMPT: `What data qualifier applies to this selection?` DESCRIPTION: The data qualifier associated with the bubble. SCREEN: `S DIC("S")="I $$DQGOOD^IBDFU9($P(^IBD(357.95,D0,1,D1,0),U,3),Y)"` EXPLANATION: `Allows only certain data qualifiers, dependent on the type of data.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `357.95^AE1^MUMPS` 1)= I $P(^IBD(357.95,DA(1),1,DA,0),"^",3),$P(^(0),"^",4)]"" S ^IBD(357.95,"AE",DA(1),$P(^IBD(357.95,DA(1),1,DA,0),"^",3),+X,$P(^(0),"^",4),DA)="" 2)= I $P(^IBD(357.95,DA(1),1,DA,0),"^",3),$P(^(0),"^",4)]"" K ^IBD(357.95,"AE",DA(1),$P(^IBD(357.95,DA(1),1,DA,0),"^",3),+X,$P(^(0),"^",4),DA) Subscripts are , ,+,,). Set by the .03, .04, and .01 fields.
.11	DYNAMIC?	0;11	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `JAN 23, 1995` HELP-PROMPT: `Enter YES if the data associated with the bubble is stored in Form Tracking.` DESCRIPTION: A field is dynamic if the data associated with the bubble is determined at print time as opposed to design time.
.12	ITEM NUMBER	0;12	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `MAR 24, 1995` HELP-PROMPT: `What number on the list is the entry where this bubble occurs?` DESCRIPTION: The order on a list of bubbles that this bubble occurs in.
.13	QUANTITY	0;13	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `OCT 15, 1996` HELP-PROMPT: `Type a Number between 1 and 99, 0 Decimal Digits` DESCRIPTION: Data in the Quantity field indicates the number of occurrences that will be passed along to PCE for this entry if the bubbled is selected.
.14	SELECTION	0;14	POINTER TO SELECTION FILE (#357.3)	SELECTION(#357.3) LAST EDITED: `JUN 01, 1999` HELP-PROMPT: `Pointer to Selection File is to be set via AICS Form compilation.` DESCRIPTION: Pointer to Selection File is to be set via AICS Form compilation.
1	SUBHEADER	1;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>250!($L(X)<1) X` LAST EDITED: `OCT 02, 1995` HELP-PROMPT: `Answer must be 1-250 characters in length.` DESCRIPTION: The subheader will be appended to the narrative for passing to PCE.
2.01	ALTERNATIVE NARRATIVE	2;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<3) X` LAST EDITED: `SEP 06, 1996` HELP-PROMPT: `Answer must be 3-80 characters in length.` DESCRIPTION: This stores the alternative narrative for the Diagnosis codes.
2.02	CLINICAL LEXICON	2;2	POINTER TO EXPRESSIONS FILE (#757.01)	EXPRESSIONS(#757.01) LAST EDITED: `SEP 06, 1996` DESCRIPTION: This store the clinical lexicon for the diagnosis.
2.03	SECOND CODE	2;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `OCT 21, 1996` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: Used to pass along an additional code when the first is bubble. Will always be passed as secondary.
2.04	THIRD CODE	2;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>10!($L(X)<1) X` LAST EDITED: `OCT 21, 1996` HELP-PROMPT: `Answer must be 1-10 characters in length.` DESCRIPTION: Used to pass a 3rd code along to PCE when this one entry is selected. Always passes it along as secondary.

Info | Details | All