STANDARD DATA DICTIONARY #357.5 -- DATA FIELD FILE 3/24/25 PAGE 1 STORED IN ^IBE(357.5, (4439 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0) DATA NAME GLOBAL DATA ELEMENT TITLE LOCATION TYPE ----------------------------------------------------------------------------------------------------------------------------------- A data field can be composed of a label, determined at the time the form description is created, and data, coming from the DHCP database and determined at the time the form prints. The label and data are printed to the encounter form. A data field can be composed of subfields, each subfield containing possibly its own label and data. COMPILED CROSS-REFERENCE ROUTINE: IBDX5 DD ACCESS: @ RD ACCESS: @ WR ACCESS: @ DEL ACCESS: @ LAYGO ACCESS: @ AUDIT ACCESS: @ IDENTIFIED BY: BLOCK (#.02)[R], TYPE OF DATA (#.03) CROSS REFERENCED BY: NAME(B), BLOCK(C) 357.5,.01 NAME 0;1 FREE TEXT (Required) INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X LAST EDITED: APR 19, 1993 HELP-PROMPT: Answer must be 3-30 characters in length. DESCRIPTION: The name is used to identify the field within a block. It can be anything the designer of a form wants it to be. CROSS-REFERENCE: 357.5^B 1)= S ^IBE(357.5,"B",$E(X,1,30),DA)="" 2)= K ^IBE(357.5,"B",$E(X,1,30),DA) 357.5,.02 BLOCK 0;2 POINTER TO ENCOUNTER FORM BLOCK FILE (#357.1) (Required) LAST EDITED: NOV 18, 1992 HELP-PROMPT: What block should this data field appear in? DESCRIPTION: The particular block the data field should appear in. CROSS-REFERENCE: 357.5^C 1)= S ^IBE(357.5,"C",$E(X,1,30),DA)="" 2)= K ^IBE(357.5,"C",$E(X,1,30),DA) 357.5,.03 TYPE OF DATA 0;3 POINTER TO PACKAGE INTERFACE FILE (#357.6) INPUT TRANSFORM: S DIC("S")="I $P(^(0),U,6)=2,$P(^(0),U,9)=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X LAST EDITED: MAR 09, 1993 HELP-PROMPT: What data should be displayed in this field? DESCRIPTION: The particular interface that should be invoked to obtain the data for display. Some of the interfaces don't actually return data, but are instead 'dummy' interfaces for the purpose of printing things like blank lines. SCREEN: S DIC("S")="I $P(^(0),U,6)=2,$P(^(0),U,9)=1" EXPLANATION: Allows only available display interfaces. 357.5,.04 LAST ITEM INDICATOR 0;4 SET IS THIS THE LAST ONE THAT WILL FIT ON THE FORM? '1' FOR YES; '0' FOR NO; LAST EDITED: APR 13, 1993 DESCRIPTION: This field is used to indicate which item on a list is the last to be printed to the form. The remaining items can be printed to a separate piece of paper. EXECUTABLE HELP: W "Enter YES if this is the last item that should print, else enter NO." 357.5,.05 NUMBER ON LIST 0;5 NUMBER WHICH ITEM ON THE LIST SHOULD BE DISPLAYED IN THIS FIELD? INPUT TRANSFORM: K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: APR 13, 1993 HELP-PROMPT: The data is a list of items. Which item on the list should be displayed? DESCRIPTION: For data returned by the package interface that is in the form of a list, this field indicates which one of the items on the list should be displayed to this field. 357.5,.06 TEXT LABEL 0;6 FREE TEXT WHAT LABEL SHOULD BEGIN THE TEXT (OPTIONAL) INPUT TRANSFORM: K:$L(X)>150!($L(X)<1) X LAST EDITED: AUG 25, 1993 HELP-PROMPT: You can optionally begin the text with a label of your choice. DESCRIPTION: The label that should precede the text. 357.5,.07 TEXT LABEL APPEARANCE 0;7 FREE TEXT HOW SHOULD THE LABEL APPEAR? CHOOSE FROM {B,U,R} INPUT TRANSFORM: S X=$$UPPER^VALM1(X) K:$L(X)>3!("UBR"'[$E(X,1))!("UBR"'[$E(X,2))!("UBR"'[$E(X,3)) X LAST EDITED: MAY 27, 1994 HELP-PROMPT: B=bold,U=underline,R=reverse. You can enter BU to make the label bold and underlined. DESCRIPTION: The label can have characteristics, such as being underlined or emboldened. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 357.5,.1 TEXT STARTING COLUMN 0;10 NUMBER WHAT BLOCK COLUMN SHOULD THE TEXT START AT? 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+1 LAST EDITED: MAY 27, 1994 HELP-PROMPT: What block column should the text start at? DESCRIPTION: This field determines what column the text should begin in. Applies only if the Package Interface returns a word-processing field. 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.5,.11 TEXT STARTING ROW 0;11 NUMBER WHAT BLOCK ROW SHOULD THE TEXT START AT? 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: MAY 27, 1994 HELP-PROMPT: What block row should the text begin in? DESCRIPTION: Determines which line on the form, relative to the block, the text area should begin at. Only applies if the package interface returns a word-processing field. 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.5,.12 NUMBER OF FORM LINES FOR TEXT 0;12 NUMBER HOW MANY LINES OF THE FORM SHOULD BE ALLOCATED FOR THE TEXT? INPUT TRANSFORM: K:+X'=X!(X>200)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: APR 14, 1993 HELP-PROMPT: How many lines of the form should be allocated for the text? DESCRIPTION: The number of lines on the form that should be allocated for the text. 357.5,.13 SPACING OF TEXT LINES 0;13 SET HOW SHOULD THE TEXT LINES BE SPACED? '1' FOR SINGLE SPACED; '2' FOR DOUBLE SPACED; '3' FOR SINGLE, BUT DOUBLE IF BLANK; LAST EDITED: APR 14, 1993 HELP-PROMPT: How do you want the text lines to be spaced? DESCRIPTION: Determines the spacing between lines of text. 357.5,.14 WIDTH OF TEXT LINES 0;14 NUMBER HOW MANY CHARACTERS ACROSS SHOULD THE TEXT LINES BE? INPUT TRANSFORM: K:+X'=X!(X>200)!(X<0)!(X?.E1"."1N.N) X LAST EDITED: APR 14, 1993 HELP-PROMPT: How many columns wide do you want the text? DESCRIPTION: Determines how many characters across should be allocated to the text. 357.5,2 SUBFIELD 2;0 Multiple #357.52 LAST EDITED: MAR 23, 1993 DESCRIPTION: A data field can be composed of multiple subfields. Each subfield can have a label and data. 357.52,.01 SUBFIELD LABEL 0;1 FREE TEXT (Multiply asked) INPUT TRANSFORM: K:$L(X)>150!($L(X)<1) X LAST EDITED: JUL 30, 1993 HELP-PROMPT: What should the subfield be named? The label will print unless it is made invisible. DESCRIPTION: The name of the subfield. The label prints to the form unless it is made invisible. CROSS-REFERENCE: 357.52^B 1)= S ^IBE(357.5,DA(1),2,"B",$E(X,1,30),DA)="" 2)= K ^IBE(357.5,DA(1),2,"B",$E(X,1,30),DA) 357.52,.03 SUBFIELD LABEL APPEARANCE 0;3 FREE TEXT HOW SHOULD THE LABEL APPEAR? CHOOSE FROM {U,B,R,I} INPUT TRANSFORM:S X=$$UPPER^VALM1(X) K:$L(X)>4!("UBRI"'[$E(X,1))!("UBRI"'[$E(X,2))!("UBRI"'[$E(X,3))!("UBRI"'[$E(X, 4)) X LAST EDITED: AUG 16, 1994 HELP-PROMPT: B=bold,U=underline,R=reverse,I=invisible You can enter any combination of {B,U,R,I}. The label will not print if it is made invisible. DESCRIPTION: The label can be made bold, underlined, or invisible. It can also be printed in reverse, i.e., white on black. This field determines which of those characteristics apply. NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER 357.52,.04 STARTING COLUMN FOR LABEL 0;4 NUMBER 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: JUN 17, 1993 HELP-PROMPT: What block column should the label start in? DESCRIPTION: The column, relative to the block, that the label should start at. 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.52,.05 STARTING ROW FOR LABEL 0;5 NUMBER 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: JUN 17, 1993 HELP-PROMPT: What block row should the label start in? DESCRIPTION: The row the label should be printed on. 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.52,.06 STARTING ROW FOR DATA 0;6 NUMBER 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: JUN 17, 1993 HELP-PROMPT: What block row should the data begin in? DESCRIPTION: The row, relative to the block, that the data should print on. 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.52,.07 STARTING COLUMN FOR DATA 0;7 NUMBER 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: JUN 17, 1993 HELP-PROMPT: What block column should the data begin in? DESCRIPTION: The column, relative to the block, that the data should print on. 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.52,.08 LENGTH OF DATA 0;8 NUMBER INPUT TRANSFORM:K:+X'=X!(X>150)!(X<1)!(X?.E1"."1N.N) X LAST EDITED: MAR 22, 1993 HELP-PROMPT: How much space on the line should be allocated for the information to be displayed? DESCRIPTION: The amount of space, in terms of characters, that should be allocated to the data. 357.52,.09 DATA 0;9 NUMBER WHAT DATA SHOULD BE DISPLAYED IN THIS SUBFIELD? INPUT TRANSFORM:K:'$$OKPIECE^IBDFU5(+$P($G(^IBE(357.5,D0,0)),U,3),X) X LAST EDITED: SEP 19, 1995 HELP-PROMPT: WHAT DATA SHOULD BE DISPLAYED IN THIS SUBFIELD? DESCRIPTION: The package interface returns a record that may be composed of multiple fields. This identifies which of those fields should appear in this subfield. EXECUTABLE HELP:D HELP1^IBDFU5 NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER FILES POINTED TO FIELDS ENCOUNTER FORM BLOCK (#357.1) BLOCK (#.02) PACKAGE INTERFACE (#357.6) TYPE OF DATA (#.03) INPUT TEMPLATE(S): IBDF EDIT DATA FIELD MAY 27, 1994@10:10 USER #0 ^IBDXI5 Used to edit a data field. IBDF EDIT FORM HEADER JUL 30, 1993@11:58 USER #0 Used to edit the data field that is the form header. IBDF EDIT LABEL FIELD APR 17, 1995@11:34 USER #0 PRINT TEMPLATE(S): SORT TEMPLATE(S): FORM(S)/BLOCK(S):