Sub-Field: .4044

Parent File	Name	Number	Package
BLOCK(#.404)	FIELD	.4044	VA FileMan

Details

Field #	Name	Loc	Type	Details
.01	FIELD ORDER	0;1	NUMBER	INPUT TRANSFORM: `K:X'=+$P(X,"E")!(X>99.9)!(X<0)!(X?.E1"."2N.N) X I $D(X),$D(^DIST(.404,DA(1),40,"B",X)) K X` HELP-PROMPT: `Enter a unique number between 0 and 99.9, inclusive, which represents the order in which the fields will be edited.` DESCRIPTION: `The Field Order number determines the order in which users traverse the fields in the block as they press .` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `.4044^B` `1)= S ^DIST(.404,DA(1),40,"B",$E(X,1,30),DA)=""` `2)= K ^DIST(.404,DA(1),40,"B",$E(X,1,30),DA)`
1	CAPTION	0;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>80!($L(X)<1) X S:$E($G(X))="!"&($G(X)'="!M") X=$$FUNC^DDSCAP(X)` LAST EDITED: `JUN 29, 1994` HELP-PROMPT: `Answer must be 1-80 characters in length.` DESCRIPTION: `A caption is uneditable text that appears on the screen. Captions of data dictionary, form-only, and computed fields serve to identify for the user the data portion of the fields. Captions for these types of fields are` `automatically followed by a colon, unless the Suppress Colon After Caption property is set to 'YES.' A field with an Executable Caption must have '!M' as a Caption.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `.4044^C^MUMPS` `1)= S:X'="!M" ^DIST(.404,DA(1),40,"C",$$UP^DILIBF($E($S(X?1"Select "1.E:$P(X,"Select ",2,99),1:X),1,63)),DA)=""` `2)= K:X'="!M" ^DIST(.404,DA(1),40,"C",$$UP^DILIBF($E($S(X?1"Select "1.E:$P(X,"Select ",2,99),1:X),1,63)),DA)` `3)= Programmer only` `This cross referenced is used to allow selection of fields by caption name as well as by order number when entering new fields in the block.`
1.1	EXECUTABLE CAPTION	.1;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `FEB 18, 1992` HELP-PROMPT: `Enter standard MUMPS code that sets the variable Y.` DESCRIPTION: `Enter MUMPS code that sets the variable Y equal to the caption you want displayed. This code is executed and the caption evaluated whenever the page on which this caption is located is painted.` `WRITE AUTHORITY: @`
2	FIELD TYPE	0;3	SET	'0' FOR UNKNOWN; '1' FOR CAPTION ONLY; '2' FOR FORM ONLY; '3' FOR DATA DICTIONARY FIELD; '4' FOR COMPUTED; LAST EDITED: `SEP 07, 1994` DESCRIPTION: `Enter the field type.` `CAPTION ONLY fields are for displaying text on the screen.` `FORM ONLY fields are fields defined only on the form and are not tied to a field in a FileMan file.` `DATA DICTIONARY fields are fields from a FileMan file.` `COMPUTED fields, like form-only fields, are fields that are defined only on the form. Associated with a COMPUTED field is a computed expression.` SCREEN: `S DIC("S")="I Y"` EXPLANATION: `Enter the field type.`
3	DISPLAY GROUP	0;4	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>20!($L(X)<1) X` HELP-PROMPT: `Enter text, 1-20 characters in length, which represents the group to which this field belongs.` DESCRIPTION: `Display group helps users resolve ambiguity when they attempt to ^-jump to a field that has a caption that is not unique. If more than one field has the same caption, when users try to ^-jump to a field with that` `caption, they are presented with a list of fields to choose from. The text in the Display Group property is displayed in parentheses after the caption to help the user identify the correct field.` `For example, if two fields have the caption 'NAME:', but one of those fields has a Display Group 'Next of Kin', when users enter ^NAME, they will be asked to choose between 'NAME' and 'NAME (Next of Kin)'.`
3.1	UNIQUE NAME	0;5	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>50!($L(X)<1)!$D(^DIST(.404,DA(1),40,"D",X)) X` LAST EDITED: `AUG 16, 1993` HELP-PROMPT: `Answer must be 1-50 characters in length.` DESCRIPTION: `This is the unique name of the element on the block. No two elements on the block can have the same Unique Name. Unique Names are never seen by the user. You can refer to an element on a block by its Unique Name in` `some of the ScreenMan utilities such as PUT^DDSVAL and $$GET^DDSVAL, and in the computed expressions of computed fields.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `.4044^D^MUMPS` `1)= S ^DIST(.404,DA(1),40,"D",$$UP^DILIBF(X),DA)=""` `2)= K ^DIST(.404,DA(1),40,"D",$$UP^DILIBF(X),DA)` `3)= Programmer only` `This is a regular index of the Unique Name converted to uppercase.`
4	FIELD	1;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>245!($L(X)<1) X I $D(X),$D(DDGFDD) D IXF^DDS0` LAST EDITED: `AUG 23, 1994` HELP-PROMPT: `Answer must be 1-245 characters in length.` DESCRIPTION: `Enter the number or name of a field in the file defined by the data dictionary number for this block.` EXECUTABLE HELP: `I $D(DDGFDD) N D0,DA,DIC,D,DZ S DIC="^DD("_DDGFDD_",",DIC(0)="",D="B" S:$G(X)="??" DZ=X D DQ^DICQ` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
4.1	DATA COORDINATE	2;1	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>7!($L(X)<1)!'(X?.N1",".N) X` LAST EDITED: `SEP 08, 1994` HELP-PROMPT: `Enter the field coordinate relative to the block. Answer must be two positive integers separated by a comma (,), as follows: 'Row,Column'.` DESCRIPTION: `Data coordinate is relative to the position of the block. The top left corner of the block has a coordinate of 1,1.`
4.2	DATA LENGTH	2;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>245)!(X<1)!(X?.E1"."1N.N) X` HELP-PROMPT: `Enter a Number between 1 and 245, inclusive, which represents the maximum length of the data to be displayed on the screen.` DESCRIPTION: `The data length defines the size of the editing window. The editing window is a single line and must not extend into or beyond the rightmost column on the screen. On an 80 column screen, the editing window must not` `extend beyond column 79.`
5.1	CAPTION COORDINATE	2;3	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>7!($L(X)<1)!'(X?.N1",".N) X` LAST EDITED: `SEP 08, 1994` HELP-PROMPT: `Enter the caption coordinate relative to the block. Answer must be two positive integers separated by a comma (,), as follows: 'Row,Column'.` DESCRIPTION: `Caption coordinate is relative to the position of the block. The top left corner of the block has coordinate 1,1.`
5.2	SUPPRESS COLON AFTER CAPTION?	2;4	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `JUN 29, 1994` DESCRIPTION: `Enter 'YES' to suppress the display of a colon and space after the caption.`
6	DEFAULT	3;1	FREE TEXT	INPUT TRANSFORM: `K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>245!($L(X)<1) X` LAST EDITED: `FEB 18, 1992` HELP-PROMPT: `Answer must be 1-245 characters in length.` DESCRIPTION: `Enter the default you want displayed when the user first loads the page on which this field is located, and the field's value is originally null. Since ScreenMan validates the default, it must be valid, unambiguous, and` `in external form; otherwise, it is not used.` `If you want to create an executable default, i.e., a default whose value is determined at run time when the page is first loaded, the value of this field must be "!M".`
6.01	EXECUTABLE DEFAULT	3.1;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `FEB 18, 1992` HELP-PROMPT: `Enter standard MUMPS code that sets the variable Y.` DESCRIPTION: `Enter MUMPS code that sets the variable Y equal to the default you want displayed when the page is first loaded and the data value on file is null. Y must be set to a valid, unambiguous user response; otherwise, it is` `ignored.` `WRITE AUTHORITY: @`
6.1	REQUIRED	4;1	SET	'0' FOR NO; '1' FOR YES; DESCRIPTION: `Whenever the user attempts a Save, ScreenMan checks all required fields on all pages accessed during the editing session, as well as all pages linked to the first page via the Next and Previous Page links. If any of the` `required fields have null values, no Save occurs. You need not make a field required that is already required by its data definition.`
6.2	DUPLICATE	4;2	SET	'0' FOR NO; '1' FOR YES; HELP-PROMPT: `Enter 'YES' if the field value from the previous record can be duplicated with the 'spacebar-return' feature.` DESCRIPTION: `This field is not currently being used.`
6.3	RIGHT JUSTIFY	4;3	SET	'0' FOR NO; '1' FOR YES; LAST EDITED: `JUN 25, 1994` DESCRIPTION: `Enter 'YES' if the data for this field should be displayed right-justified in the editing window.`
6.4	DISABLE EDITING	4;4	SET	'0' FOR NO; '1' FOR YES; '2' FOR REACHABLE; LAST EDITED: `JUN 25, 1994` DESCRIPTION: `Enter 'YES' to disable editing and to prevent the user from navigating to the field. Enter 'REACHABLE' to disable editing, but allow the user to navigate to the field.`
6.5	DISALLOW LAYGO	4;5	SET	'0' FOR NO; '1' FOR YES; DESCRIPTION: `Enter 'YES' to prohibit the user from adding new subentries into this multiple. This question only pertains to multiple-valued fields.`
6.6	ASK 'OK'	4;6	SET	'0' FOR NO; '1' FOR YES; DESCRIPTION: `Answer 'YES' to ask the user whether the looked-up entry is 'OK'. If only one match is made to the user's lookup value, then ScreenMan will ask "OK?" instead of automatically selecting the found entry. This property` `corresponds to the "V" flag in the DIC(0) input variable to ^DIC and only pertains to multiple-valued fields.`
8	SUB PAGE LINK	7;2	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>999.9)!(X<1)!(X?.E1"."2N.N) X` HELP-PROMPT: `Enter the Page Number of the page to open up when the user presses at this field. Type a Number between 1 and 999.9, 1 Decimal Digit.` DESCRIPTION: `If you wish to take users to a pop-up page when they press at this field, enter the Page Number of that page. When users exit that pop-up page, ScreenMan will automatically take them to the field following this` `field.` `You can also use the Parent Field property of the pop-up page to link a field to the pop-up page.`
10	BRANCHING LOGIC	10;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` HELP-PROMPT: `Enter Standard MUMPS code, 1-245 characters in length.` DESCRIPTION: `This MUMPS code is executed whenever the user presses at the field. Here you can set DDSBR equal to the field, block, and page, separated by up-arrow delimiters, of the field to which you wish to take users when` `they press . For example,` `S:X="Y" DDSBR="TEST FIELD 1^TEST BLOCK 1^TEST PAGE 2"` `would take the user to the field with unique name or caption "TEST FIELD 1" on the block named "TEST BLOCK 1" on a page named "TEST PAGE 2".` `Alternatively, if you wish to take users to another page when they press at this field, and then when they close that page, automatically take them to the field immediately following this field, you can set` `DDSSTACK equal to the page name or number of that page.` `The variable X contains the current internal value of the field, DDSEXT contains the current external value of the field, and DDSOLD contains the previous internal value of the field.` `WRITE AUTHORITY: @`
11	PRE ACTION	11;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` HELP-PROMPT: `Enter standard MUMPS code that will be executed when the user navigates to this field.` DESCRIPTION: `This MUMPS code is executed when the user reaches the field. The variable X contains the current value of the field.` `WRITE AUTHORITY: @`
12	POST ACTION	12;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `MAR 06, 1995` HELP-PROMPT: `Enter standard MUMPS code that will be executed when the user leaves this field.` DESCRIPTION: `This MUMPS code is executed when the user leaves the field, except on time-out.` `The variable X contains the current internal value of the field, DDSEXT contains the current external value of the field, and DDSOLD contains the previous internal value of the field.` `WRITE AUTHORITY: @`
13	POST ACTION ON CHANGE	13;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `OCT 29, 1993` HELP-PROMPT: `Enter standard MUMPS code that will be executed when the user changes the value of this field.` DESCRIPTION: `This MUMPS code is executed only if the user changed the value of the field. The variables X and DDSEXT contain the new internal and external values of the field, and DDSOLD contains the original internal value of the` `field.` `WRITE AUTHORITY: @`
14	DATA VALIDATION	14;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `AUG 20, 1993` HELP-PROMPT: `This is Standard MUMPS code.` DESCRIPTION: `Enter MUMPS code that will be executed after the user enters a new value for this field. If the code sets DDSERROR, the value will be rejected. You might also want to ring the bell and make a call to HLP^DDSUTL to` `display a message to the user that indicates the reason the value was rejected.` `WRITE AUTHORITY: @`
20.1	READ TYPE	20;1	SET	'D' FOR DATE; 'F' FOR FREE TEXT; 'L' FOR LIST OR RANGE; 'N' FOR NUMERIC; 'P' FOR POINTER; 'S' FOR SET OF CODES; 'Y' FOR YES OR NO; 'DD' FOR DATA DICTIONARY; LAST EDITED: `AUG 12, 1993` DESCRIPTION: `Enter the data type of this form-only field.`
20.2	PARAMETERS	20;2	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>2!($L(X)<1) X` LAST EDITED: `AUG 12, 1993` HELP-PROMPT: `Answer must be 1-2 characters in length.` DESCRIPTION: `This property coressponds to the parameters that can be used in the first ^-piece of the DIR(0) input variable to ^DIR. The "O" parameter has no effect, since the Required property can be used to make a field required.` `The "A" and "B" parameters also have no effect.` `Free text fields can use the "U" parameter. List or Range fields can use the "C" parameter. Set of Codes fields can use the "X" and "M" parameters.`
20.3	QUALIFIERS	20;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>100!($L(X)<1) X` LAST EDITED: `AUG 12, 1993` HELP-PROMPT: `Answer must be 1-100 characters in length.` DESCRIPTION: `This property corresponds to the second ^-piece of the DIR(0) input variable to ^DIR. For Data Dictionary type form only fields, it identifies the file and field.` `Valid qualifiers are:` `Date Minimum date:Maximum date:%DT` `Free Text Minimum length:Maximum length` `List or Range Minimum:Maximum:Maximum decimals` `Numeric Minimum:Maximum:Maximum decimals` `Pointer Global root or #:DIC(0)` `Set of Codes Code:Stands for;Code:Stands for;` `Yes or No` `Data Dictionary file#,field#`
21	HELP	21;0	WORD-PROCESSING #.404421	LAST EDITED: `AUG 12, 1993` LAST EDITED: `AUG 12, 1993` DESCRIPTION: `This text is displayed when the user enters ? at this form-only field. The lines in this word processing field correspond to the nodes in the DIR("?",#) input array to ^DIR.`
22	INPUT TRANSFORM	22;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `AUG 12, 1993` HELP-PROMPT: `Enter standard MUMPS code.` DESCRIPTION: `This is MUMPS code that can examine X, the value entered by the user, and kill X if it is invalid. It corresponds to the third ^-piece of the DIR(0) input variable to ^DIR.` `WRITE AUTHORITY: @`
23	SAVE CODE	23;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `AUG 12, 1993` HELP-PROMPT: `Enter Standard MUMPS code.` DESCRIPTION: `This is MUMPS code that is executed when the user issues a Save command and the value of this field changed since the last Save. You can use this field to save in global or local variables the value the user enters` `into this field. The following variables are available:` `X = The new value of the field in internal form` `DDSEXT = The new value of the field in external form` `DDSOLD = The original (pre-save) value of the field in internal form` `WRITE AUTHORITY: @`
24	SCREEN	24;E1,245	MUMPS	INPUT TRANSFORM: `K:$L(X)>245 X D:$D(X) ^DIM` LAST EDITED: `AUG 12, 1993` HELP-PROMPT: `Enter standard MUMPS code that sets the variable DIR("S").` DESCRIPTION: `This screen is valid only for pointer and set-type form-only fields.` `You can enter MUMPS code that sets the variable DIR("S"), to screen the the values that can be selected.` `WRITE AUTHORITY: @`
30	COMPUTED EXPRESSION	30;E1,245	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>245!($L(X)<1) X I $D(X) D CEXPR^DDSIT` LAST EDITED: `DEC 01, 1993` HELP-PROMPT: `Answer must be 1-245 characters in length.` DESCRIPTION: `You can enter MUMPS code that sets the variable Y equal to the value of the computed field. Alternatively, you can precede the computed expression with an equal sign (=).` `For example,` `S:$D(var)#2 Y="The value is: "_{NUMERIC}` `={FIRST NAME}_" "_{LAST NAME}` `={FO(PRICE)}*1.085` `NUMERIC, FIRST NAME, and LAST NAME are the name of FileMan fields used on the form, and PRICE is the caption of a form-only field found on the current page and block of the form.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`

Customize PDF page

Package: VA FileMan

BLOCK(#.404)-->.4044

Sub-Field: .4044

Information

Details