STANDARD DATA DICTIONARY #357.2 -- SELECTION LIST FILE 3/24/25 PAGE 1 STORED IN ^IBE(357.2, (3181 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- This file contains descriptions of 'selection lists'. A selection list is a rectangular area in a block that contains a list. The list has 'columns' of 'selections'. The columns have 'subcolumns', which can either contain text or a 'marking area'. A marking area is an area on the form designed to be checked to indicate that a choice is being made from the list. COMPILED CROSS-REFERENCE ROUTINE: IBDX2 DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ IDENTIFIED BY: BLOCK (#.02)[R], SELECTION INTERFACE (#.11)[R] "WRITE": N IBDBLK S IBDBLK=+$P(^(0),U,2) D EN^DDIOL(" Block: "_$P($G(^IBE(357.1,IBDBLK,0)),U)_" Form: "_$P($G(^IBE(357,+$ P($G(^IBE(357.1,IBDBLK,0)),U,2),0)),U),"","?0") POINTED TO BY: SELECTION LIST field (#.03) of the SELECTION File (#357.3) SELECTION LIST field (#.03) of the SELECTION GROUP File (#357.4) CROSS REFERENCED BY: SELECTION INTERFACE(AC), DYNAMIC SELECTIONS(AD), NAME(B), BLOCK(C) 357.2,.01 NAME 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X LAST EDITED: NOV 19, 1992 HELP-PROMPT: Answer must be 3-30 characters in length. DESCRIPTION: The name of the list. DELETE TEST: 1,0)= I '$G(IBDEVICE("LISTMAN"))!($G(IBDELETE)) W "...Selection Lists can only be deleted through t he Encounter Form Utilities!" CROSS-REFERENCE: 357.2^B 1)= S ^IBE(357.2,"B",$E(X,1,30),DA)="" 2)= K ^IBE(357.2,"B",$E(X,1,30),DA) 357.2,.02 BLOCK 0;2 POINTER TO ENCOUNTER FORM BLOCK FILE (#357.1) (Required) LAST EDITED: DEC 07, 1992 HELP-PROMPT: Enter the block that the selection list should appear in. DESCRIPTION: The block that the list appears on. The position of the selection list is relative to the block. CROSS-REFERENCE: 357.2^C 1)= S ^IBE(357.2,"C",$E(X,1,30),DA)="" 2)= K ^IBE(357.2,"C",$E(X,1,30),DA) 357.2,.04 SUBCOLUMN HEADER APPEARANCE 0;4 FREE TEXT HOW SHOULD THE SUBCOLUMN HEADERS APPEAR? ENTER 'R' FOR REVERSE PRINTING. INPUT TRANSFORM: S X=$$UPPER^VALM1(X) K:$L(X)>1!("R"'[$E(X,1)) X LAST EDITED: MAY 31, 1994 HELP-PROMPT: R=Reverse Printing DESCRIPTION: Allows the form designer to select the appearance of the subcolumn headers. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 357.2,.05 COLUMN HEADER 0;5 FREE TEXT WHAT TEXT SHOULD APPEAR AT THE TOP OF EACH COLUMN? (OPTIONAL) INPUT TRANSFORM: K:$L(X)>70!($L(X)<1) X LAST EDITED: APR 15, 1993 HELP-PROMPT: This header will appear at the top of the column that contains the list. If there is more than one column it will appear at the top of each. DESCRIPTION: The text that appears at the top of each column (NOT subcolumn). 357.2,.06 COLUMN HEADER APPEARANCE 0;6 FREE TEXT HOW SHOULD THE COLUMN HEADER APPEAR? CHOOSE FROM {U,B,R,C,S} INPUT TRANSFORM: S X=$$UPPER^VALM1(X) K:$L(X)>5!($TR(X,"UBRCS")'="") X LAST EDITED: OCT 24, 1996 HELP-PROMPT: B=bold,U=underline,R=reverse,C=center,S=shade. You can enter any combination of {B,U,R,C,S}. DESCRIPTION: The column header can be give characteristics, such as centered and bold. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 357.2,.07 SUBCOLUMNS SEPARATED WITH? 0;7 SET (Required) HOW SHOULD THE SUBCOLUMNS BE SEPARATED? '1' FOR ONE SPACE; '2' FOR TWO SPACES; '3' FOR LINE; '4' FOR SPACE/LINE/SPACE; LAST EDITED: APR 15, 1993 HELP-PROMPT: How should the subcolumns be separated? DESCRIPTION: What characters are used to separate the subcolumns. 357.2,.08 EXTRA LINES FOR SELECTIONS 0;8 NUMBER NUMBER OF ADDITIONAL LINES FOR EACH ENTRY ON LIST? INPUT TRANSFORM: K:+X'=X!(X>9)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: APR 27, 1993 HELP-PROMPT: How many extra lines should be allocated for each selection, in addition to the 1 the selection will print on? DESCRIPTION: Each entry on the list prints on only one line. However, if you want extra space to appear below each entry on the list then this field should be set to the number of blank lines desired. 357.2,.09 GROUP HEADER APPEARANCE 0;9 FREE TEXT HOW SHOULD THE HEADER FOR EACH GROUP OF ENTRIES APPEAR? CHOOSE FROM {U,B,S,C} INPUT TRANSFORM: S X=$$UPPER^VALM1(X) K:$L(X)>4!($TR(X,"UBSC")'="") X LAST EDITED: OCT 24, 1996 HELP-PROMPT: B=bold,S=shade,C=center,U=underline. You can use any combination of {B,S,C,U} DESCRIPTION: This field determines the appearance of the group headers. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 357.2,.11 SELECTION INTERFACE 0;11 POINTER TO PACKAGE INTERFACE FILE (#357.6) (Required) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,6)=3,$P(^(0),U,9)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: AUG 25, 1995 HELP-PROMPT: Enter the package interface used to obtain this list. DESCRIPTION: This identifies the Package Interface that is used to fill the list. SCREEN: S DIC("S")="I $P(^(0),U,6)=3,$P(^(0),U,9)=1" EXPLANATION: Allows only available selection interfaces. CROSS-REFERENCE: 357.2^AC^MUMPS 1)= S:X $P(^IBE(357.2,DA,0),U,14)=+$P($G(^IBE(357.6,X,0)),U,14) S:$P(^IBE(357.2,DA,0),U,14)&$P(^IBE (357.2,DA,0),U,2) ^IBE(357.2,"AD",$P(^IBE(357.2,DA,0),U,2),DA)="" 2)= Q Automatically sets the DYNAMIC SELECTIONS field and the "AD" cross-reference. 357.2,.12 UNDERLINE SELECTIONS? 0;12 SET (Required) SHOULD EACH ENTRY ON THE LIST BE UNDERLINED? (YES/NO) '0' FOR NO; '1' FOR YES; LAST EDITED: APR 14, 1993 HELP-PROMPT: Should the items on the list be underlined? DESCRIPTION: Answer yes if each entry on the list should be underlined. 357.2,.13 NUMBER OF COLUMNS 0;13 NUMBER HOW MANY COLUMNS OF LIST ENTRIES SHOULD THE LIST HAVE? (OPTIONAL) INPUT TRANSFORM: K:+X'=X!(X>99)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: AUG 02, 1993 DESCRIPTION: A selection list may be displayed in an area several columns wide. The starting position and height of each column may be specified. However, it is not necessary because defaults values will be used. The defaults used assume that nothing else is going in the block except the selection list and that the entire block should be filled. EXECUTABLE HELP: D HELP5^IBDFU5 357.2,.14 DYNAMIC SELECTIONS 0;14 SET '0' FOR NO; '1' FOR YES; INPUT TRANSFORM: K X LAST EDITED: DEC 21, 1994 HELP-PROMPT: Answer YES if the list of selections is created at print time. DESCRIPTION: This is used to flag the list as being created at print time as opposed to design time. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 357.2^AD^MUMPS 1)= S:X&$P($G(^IBE(357.2,DA,0)),U,2) ^IBE(357.2,"AD",$P($G(^IBE(357.2,DA,0)),U,2),DA)="" 2)= K:X&$P($G(^IBE(357.2,DA,0)),U,2) ^IBE(357.2,"AD",$P($G(^IBE(357.2,DA,0)),U,2),DA) Allows all the dynamic selection lists to be found for the block. 357.2,.15 PRINT COMPLETE 0;15 SET SHOULD THE LIST PRINT ON A SEPARATE PAGE IF IT DOES NOT FIT ON THE FORM? '0' FOR NO; '1' FOR YES; LAST EDITED: APR 14, 1995 HELP-PROMPT: If the data on the list won't fit on the form, should it be printed on a separate page? DESCRIPTION: Applies only to dynamic selection lists. This controls the overflow behavior of the list. YES means that if the data on the list does not fit, it should be printed on a separate page. 357.2,.16 NUMBER OF OTHER 0;16 NUMBER HOW MANY 'OTHER' DO YOU WANT TO ALLOCATE SPACE FOR? INPUT TRANSFORM: K:+X'=X!(X>9)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: APR 24, 1995 HELP-PROMPT: Allocate space for how many 'other' not found on the list? DESCRIPTION: Space will be allocated at the bottom of the selection list for the user to enter this number of items not found on the list. 357.2,.17 WHAT TO ALLOCATE SPACE FOR 0;17 SET WHAT SHOULD SPACE BE ALLOCATED FOR IN 'OTHER'? '1' FOR NARRATIVE ONLY; '2' FOR CODE ONLY; '3' FOR NARRATIVE AND CODE; LAST EDITED: APR 26, 1995 HELP-PROMPT: What should space be allocated for when making room for 'other'? DESCRIPTION: This field determines what fields to place on the form for writting in other items not found on the list. 357.2,.18 WHAT TO SEND TO PCE 0;18 SET WHAT DO YOU WANT ENTERED TO THE DATABASE? '1' FOR NARRATIVE ONLY; '2' FOR CODE ONLY; '3' FOR NARRATIVE AND CODE; LAST EDITED: APR 24, 1995 HELP-PROMPT: WHAT DO YOU WANT ENTERED INTO THE DATABASE? DESCRIPTION: This determines what is sent to PCE. For example, some types of data may require that a code be sent, but the narrative may be optional. 357.2,.19 CLINICAL REMINDER DISPLAY TYPE 0;19 SET '1' FOR DUE NOW ONLY; '2' FOR ALL REMINDERS; LAST EDITED: OCT 23, 1997 HELP-PROMPT: This determines the clincial reminders that will print on an encounter form. Choose either to see only those due now or all appropriate reminders. DESCRIPTION: Enter "DUE NOW ONLY" if you want to print only those reminders that are currently due (this is sometimes called clinical reminder mode). Enter "ALL REMINDERS" if you want to print all applicable reminders and a date due (this is sometimes called clincal maintenance mode). Reminders that are not applicable for a patient will not print. 357.2,1 LIST COLUMN 1;0 Multiple #357.21 (Add New Entry without Asking) LAST EDITED: AUG 02, 1993 DESCRIPTION: A column is a rectangular area that has the necessary width to display a single item on the list. IDENTIFIED BY: "WRITE": D EN^DDIOL(" COLUMN #"_$P($G(^(0)),U),"","?0") 357.21,.01 LIST COLUMN NUMBER 0;1 NUMBER (Multiply asked) INPUT TRANSFORM: K:+X'=X!(X>4)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: AUG 02, 1993 HELP-PROMPT: You can specify the position and height of up to 4 columns. Defaults will be used where needed. DESCRIPTION: The order that the columns will be filled. Column 1 will first be filled with items, then column 2, etc. CROSS-REFERENCE: 357.21^B 1)= S ^IBE(357.2,DA(1),1,"B",$E(X,1,30),DA)="" 2)= K ^IBE(357.2,DA(1),1,"B",$E(X,1,30),DA) 357.21,.02 LIST COLUMN'S STARTING ROW 0;2 NUMBER WHAT ROW SHOULD THE LIST COLUMN START IN? (OPTIONAL) INPUT TRANSFORM: S:+X=X X=X-1 K:+X'=X!(X>200)!(X<0)!(X?.E1"."1N.N) X OUTPUT TRANSFORM: S:+Y=Y Y=+Y+1 LAST EDITED: AUG 02, 1993 HELP-PROMPT: What row should the column begin in? DESCRIPTION: The row, relative to the block, that the column should begin in. This is optional, since default values can be used. TECHNICAL DESCR: The internal representation starts at 0, the external representation starts at 1. The difference is because for computing the form image it is convenient to work with displacements from the top left-hand corner. However, users do not want to work with row=0 or column=0. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 357.21,.03 LIST COLUMN'S STARTING COLUMN 0;3 NUMBER WHAT BLOCK COLUMN SHOULD THE LIST COLUMN START IN? (OPTIONAL) INPUT TRANSFORM: S:+X=X X=X-1 K:+X'=X!(X>200)!(X<0)!(X?.E1"."1N.N) X OUTPUT TRANSFORM: S:+Y=Y Y=+Y+1 LAST EDITED: SEP 30, 1993 HELP-PROMPT: At what block column should the list column begin at? The first subcolumn of the list column will start one character to the right of this. DESCRIPTION: The column (# of characters to the right) that the list column should begin in, relative to the block. It is optional, since a default value can be used. TECHNICAL DESCR: The internal representation starts at 0, the external representation starts at 1. The difference is because for computing the form image it is convenient to work with displacements from the top left-hand corner. However, users do not want to work with row=0 or column=0. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 357.21,.04 LIST COLUMN HEIGHT 0;4 NUMBER HOW MANY LINES HIGH SHOULD THE LIST COLUMN BE? (OPTIONAL) INPUT TRANSFORM: K:+X'=X!(X>200)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: AUG 02, 1993 HELP-PROMPT: How many lines should the column cover? DESCRIPTION: The number of lines the column should occupy. This is optional - if not supplied the column will extend to the bottom of the block. 357.2,2 SUBCOLUMN NUMBER 2;0 Multiple #357.22 LAST EDITED: APR 13, 1993 DESCRIPTION: A subcolumn contains one field of the entry on the list. The subcolumn order is the order, from left to right, that the subcolumns will appear in. IDENTIFIED BY: "WRITE": D ID1^IBDFU5 357.22,.01 SUBCOLUMN NUMBER 0;1 NUMBER (Required) (Multiply asked) Number of the subcolumn, subcolumns being numbered 1-8, left-to-right INPUT TRANSFORM: K:+X'=X!(X>8)!(X<1)!(X?.E1"."1N.N)!($D(^IBE(357.2,DA(1),2,"B",X))) X LAST EDITED: MAR 08, 1995 HELP-PROMPT: The SUBCOLUMN NUMBER determines the order in which the subcolumns will display. There are at most 8 subcolumns, numbered 1-8. DESCRIPTION: The order that the subcolumn will appear on the form. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER CROSS-REFERENCE: 357.22^B 1)= S ^IBE(357.2,DA(1),2,"B",$E(X,1,30),DA)="" 2)= K ^IBE(357.2,DA(1),2,"B",$E(X,1,30),DA) 357.22,.02 SUBCOLUMN HEADER 0;2 FREE TEXT WHAT TEXT SHOULD APPEAR AT THE TOP OF THE SUBCOLUMN? INPUT TRANSFORM: K:$L(X)>150!($L(X)<1) X LAST EDITED: APR 14, 1993 HELP-PROMPT: What text should appear at the top of the subcolumn? DESCRIPTION: The text that will appear at the top of the subcolumn. 357.22,.03 SUBCOLUMN WIDTH 0;3 NUMBER HOW WIDE SHOULD THE SUBCOLUMN BE? INPUT TRANSFORM: K:+X'=X!(X>150)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: APR 14, 1993 HELP-PROMPT: How wide should the subcolumn be? DESCRIPTION: The width of the subcolumn. If the subcolumn contains a MARKING AREA then the width of the MARKING AREA overrides what ever this is. 357.22,.04 TYPE OF SUBCOLUMN 0;4 SET (Required) SUBCOLUMN CONTAINS TEXT, OR FOR MARKING? (TEXT/MARKING) '1' FOR TEXT; '2' FOR MARKING; LAST EDITED: APR 24, 1996 HELP-PROMPT: Enter '1' if the subcolumn will contain text, '2' if it will be for the user to mark his selections. DESCRIPTION: The subcolumn can contain either text, derived from what is returned by the PACKAGE INTERFACE, or a MARKING AREA, which is meant to be written in to select an entry on the list. 357.22,.05 SUBCOLUMN'S DATA 0;5 NUMBER WHAT DATA SHOULD BE CONTAINED IN THE SUBCOLUMN? INPUT TRANSFORM: K:'$$OKPIECE^IBDFU5($P($G(^IBE(357.2,D0,0)),U,11),X) X LAST EDITED: SEP 19, 1995 HELP-PROMPT: WHAT DATA SHOULD BE CONTAINED IN THE SUBCOLUMN? DESCRIPTION: The Package Interface returns a record, which is composed of fields. This identifies which field goes in the subcolumn. EXECUTABLE HELP: D HELP2^IBDFU5 NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 357.22,.06 MARKING AREA 0;6 POINTER TO MARKING AREA TYPE FILE (#357.91) TYPE OF MARKING AREA LAST EDITED: APR 14, 1993 HELP-PROMPT: What type of marking area should appear in the subcolumn? DESCRIPTION: This identifies which MARKING AREA should go in the subcolumn. 357.22,.07 ALLOW EDITING OF TEXT? 0;7 SET ALLOW EDITING OF THE TEXT APPEARING IN THIS SUBCOLUMN? (YES/NO) '0' FOR NO; '1' FOR YES; LAST EDITED: APR 28, 1993 HELP-PROMPT: Is it okay to edit the text appearing in this subcolumn? DESCRIPTION: This determines whether or not the user, when selecting items to appear on the list, will be able to edit the text appearing in the subcolum. This is ignored if the subcolumn contains a MARKING AREA. 357.22,.08 DO NOT UNDERLINE MARKING AREA? 0;8 SET '0' FOR NO; '1' FOR YES; LAST EDITED: JUN 07, 1994 HELP-PROMPT: Enter YES if you do NOT want this subcolumn underlined. DESCRIPTION: Underlining can be turned off for the subcolumn even if it is turned on for the list as a whole. 357.22,.09 DATA QUALIFIER 0;9 POINTER TO AICS DATA QUALIFIERS FILE (#357.98) INPUT TRANSFORM:S DIC("S")="I $$DQGOOD^IBDFU9($P($G(^IBE(357.2,DA(1),0)),""^"",11),Y)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: DEC 06, 1994 HELP-PROMPT: Does one of the qualifiers apply to the choices made in this subcolumn? DESCRIPTION: Used to associate a data qualifier to a subcolumn that is used for making selections. SCREEN: S DIC("S")="I $$DQGOOD^IBDFU9($P($G(^IBE(357.2,DA(1),0)),""^"",11),Y)" EXPLANATION: Allows only certain data qualifiers, defined in the Package Interface file. 357.22,.1 SELECTION RULE 0;10 SET '0' FOR ANY NUMBER; '1' FOR EXACTLY ONE; '2' FOR AT MOST ONE (0 or 1); '3' FOR AT LEAST ONE (1 or more); LAST EDITED: DEC 09, 1994 HELP-PROMPT: Which rule applies to the choices the user can make in this subcolumn? DESCRIPTION: A selection rule can be applied to a subcolumn used to make selections, i.e., one that contains marking areas. FILES POINTED TO FIELDS AICS DATA QUALIFIERS (#357.98) SUBCOLUMN NUMBER:DATA QUALIFIER (#.09) ENCOUNTER FORM BLOCK (#357.1) BLOCK (#.02) MARKING AREA TYPE (#357.91) SUBCOLUMN NUMBER:MARKING AREA (#.06) PACKAGE INTERFACE (#357.6) SELECTION INTERFACE (#.11) INPUT TEMPLATE(S): IBDF EDIT SELECTION LIST OCT 30, 1997@13:22 USER #0 ^IBDXI2 Used to edit a selection list, except for the position and size of the columns. IBDF POSITION/SIZE COLUMNS MAY 05, 1995@11:08 USER #0 Used to edit the size and position of a selection list's columns. PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):