STANDARD DATA DICTIONARY #.44 -- FOREIGN FORMAT FILE 6/27/25 PAGE 1
STORED IN ^DIST(.44, (11 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 22.2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file stores the characteristics of various file export formats, which are used by the Export tool in building Export Templates
to send data to non-M systems.
DD ACCESS: ^
WR ACCESS: ^
DEL ACCESS: ^
LAYGO ACCESS: ^
IDENTIFIED BY:
"WRITE": D:Y<1 EN^DDIOL("** DISTRIBUTED BY VA FILEMAN **","","?35")
POINTED TO BY: EXPORT FORMAT field (#105) of the PRINT TEMPLATE File (#.4)
CROSS
REFERENCED BY: NAME(B), OTHER NAME FOR FORMAT(C)
.44,.01 NAME 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: SEP 14, 1992
HELP-PROMPT: Name must be 3-30 characters in length, not starting with punctuation.
DESCRIPTION:
This field identifies the format used by the non-VA FileMan application.
DELETE TEST: 1,0)= I DA<1
CROSS-REFERENCE: .44^B
1)= S ^DIST(.44,"B",$E(X,1,30),DA)=""
2)= K ^DIST(.44,"B",$E(X,1,30),DA)
.44,1 FIELD DELIMITER 0;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>15!($L(X)<1)!'((X?1AP.E)!(X?3N)!(X?3N1","3N)!(X?3N1","3N1","3N)!(X?3N1","3N1","3N1","3N)) X
LAST EDITED: SEP 14, 1992
HELP-PROMPT: Answer must be 1-15 characters in length.
DESCRIPTION: Contents of the field delimiter is output between each field. Depending on the contents of the
SEND LAST FIELD DELIMITER? field, the delimiter may be output after the last field, too. Identify
the delimiter either by 1-15 characters not beginning with a number or by the ASCII value of the
delimiter. When specifying the ASCII value, use 3 numbers (e.g., '009' for ASCII 9). Up to four
ASCII-character values can be specified, separated by commas.
If 'Ask' is entered, the user will be prompted for the field delimiter when creating the EXPORT
template.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.44,2 RECORD DELIMITER 0;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>15!($L(X)<1)!'((X?1AP.E)!(X?3N)!(X?3N1","3N)!(X?3N1","3N1","3N)!(X?3N1","3N1","3N1","3N)) X
LAST EDITED: SEP 14, 1992
HELP-PROMPT: Answer must be 1-15 characters in length.
DESCRIPTION: Contents of the record delimiter is output after each record. Identify the delimiter either by
1-15 characters not beginning with a number or by the ASCII value of the delimiter. When
specifying the ASCII value, use 3 numbers (e.g., '009' for ASCII 9). Up to four ASCII-character
values can be specified, separated by commas.
If 'Ask' is entered, the user is prompted for the record delimiter when creating the EXPORT
template.
.44,3 LINE CONTINUATION CHARACTER 0;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>15!($L(X)<1) X
LAST EDITED: AUG 28, 1992
HELP-PROMPT: Answer must be 1-15 characters in length.
DESCRIPTION:
Not used yet.
.44,4 LINE CONTINUATION LOCATION 0;5 SET
'e' FOR END OF LINE;
'b' FOR BEGINNING OF LINE;
LAST EDITED: AUG 28, 1992
DESCRIPTION:
Not used yet.
.44,5 RECORD LENGTH FIXED? 0;6 SET
'1' FOR YES;
'0' FOR NO;
LAST EDITED: AUG 28, 1992
DESCRIPTION: Enter YES if the fields will be fixed length causing a fixed length record to be created. When the
EXPORT template is created, the user is prompted for the length of each field in the TARGET file.
.44,6 NEED FOREIGN FIELD NAMES? 0;7 SET
'1' FOR YES;
'0' FOR NO;
LAST EDITED: AUG 28, 1992
DESCRIPTION: Answer YES if it is necessary to save the field names from the foreign file in the export file.
The user will be prompted for the names when the EXPORT template is created.
.44,7 MAXIMUM OUTPUT LENGTH 0;8 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: OCT 26, 1992
HELP-PROMPT: Type a Number between 0 and 9999, 0 Decimal Digits
DESCRIPTION: The maximum length of a "line" of output; maximum number of characters before a LINE FEED is
issued. For most exports, this will be the maximum record length.
If 0 is entered, the user will be prompted for maximum length when creating the EXPORT template.
If nothing is entered, the default will be 80.
.44,8 QUOTE NON-NUMERIC FIELDS? 0;10 SET
'1' FOR YES;
'0' FOR NO;
LAST EDITED: OCT 13, 1992
HELP-PROMPT: Enter '1' for YES or '0' for NO.
DESCRIPTION: If you want the values of fields that have a data type other than numeric to be surrounded by
quotation marks ("), set this field to YES.
NOTE: Only numeric fields in the home file (including multiples) are automatically considered to
have a numeric data type. If you want the user to indicate which fields should be numeric, answer
YES to the PROMPT FOR DATA TYPE? field.
.44,9 PROMPT FOR DATA TYPE? 0;11 SET
'1' FOR YES;
'0' FOR NO;
LAST EDITED: OCT 13, 1992
HELP-PROMPT: Enter '1' for YES, '0' for NO.
DESCRIPTION: Answer YES if you want the user to be prompted for the data type of the various fields at the time
that an export template is being created. Otherwise, the data types will be automatically
derived.
.44,10 SEND LAST FIELD DELIMITER? 0;12 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: OCT 28, 1992
HELP-PROMPT: Enter '1' for YES, '0' for NO.
DESCRIPTION: Enter NO if you do not want a field delimiter to be output after the last field in a record. Enter
YES if you do want a final field delimiter output.
.44,11 SUBSTITUTE FOR NULL 0;13 FREE TEXT
INPUT TRANSFORM: K:$L(X)>15!($L(X)<1) X
LAST EDITED: JAN 07, 1993
HELP-PROMPT: Answer must be 1-15 characters in length.
DESCRIPTION: This field only affects numeric values exported in a delimited format. If nothing is entered in
this field, data values of null will cause nothing to be exported for that field in the particular
record. If you want something to be exported when the data value is null, enter the character or
characters in this field.
.44,20 FILE HEADER 1;E1,245 FREE TEXT
INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X I $E($G(X))'="""" K:DUZ(0)'="@" X D:$D(X) ^DIM
LAST EDITED: OCT 28, 1992
HELP-PROMPT: Answer must be standard MUMPS code or a literal string in quotes.
DESCRIPTION: Use this field to produce output preceding the exported records. This will become part of your
exported data.
Enter either a literal string enclosed in quotation marks ("like this") or MUMPS code that will
WRITE the desired output when XECUTED. For example:
W "EXPORT CREATED BY USER NUMBER: "_$G(DUZ)
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.44,25 FILE TRAILER 2;E1,245 FREE TEXT
INPUT TRANSFORM: K:$L(X)>245!($L(X)<1) X I $E($G(X))'="""" K:DUZ(0)'="@" X D:$D(X) ^DIM
LAST EDITED: OCT 28, 1992
HELP-PROMPT: Answer must be standard MUMPS code or a literal string in quotes.
DESCRIPTION: Use this field to produce output following the the exported records. This will become part of your
exported data.
Enter either a literal string enclosed in quotation marks ("like this") or MUMPS code that will
WRITE the desired output when XECUTED. For example:
W "EXPORT CREATED BY USER NUMBER: "_$G(DUZ)
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.44,27 DATE FORMAT 6;E1,245 MUMPS
INPUT TRANSFORM: K:$L(X)>245 X D:$D(X) ^DIM
LAST EDITED: SEP 23, 1992
HELP-PROMPT: This is Standard MUMPS code.
DESCRIPTION: If you want dates output in VA FileMan's standard external date/time format, make NO entry in this
field.
If you want another format, enter MUMPS code here. The variable X will contain the date/time in VA
FileMan's internal format. The MUMPS code should SET Y to the date/time in the format you desire.
WRITE AUTHORITY: @
.44,30 DESCRIPTION 3;0 WORD-PROCESSING #.447
DESCRIPTION:
A description of the foreign format.
LAST EDITED: SEP 14, 1992
.44,31 USAGE NOTES 4;0 WORD-PROCESSING #.448
DESCRIPTION: Information about the use of the format; for example, which commands on the foreign system should
be used to load the file.
LAST EDITED: SEP 14, 1992
.44,40 FORMAT USED? 0;9 SET
'0' FOR NO;
'1' FOR YES;
LAST EDITED: SEP 25, 1992
DESCRIPTION: When set to YES, this field means that this Foriegn Format entry has been used to create an Export
Template.
.44,50 OTHER NAME FOR FORMAT 5;0 Multiple #.441
.441,.01 OTHER NAME FOR FORMAT 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3) X
LAST EDITED: SEP 17, 1992
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION: Another name by which the foreign format might be known. This name can be used to access the
format.
CROSS-REFERENCE: .441^B
1)= S ^DIST(.44,DA(1),5,"B",$E(X,1,30),DA)=""
2)= K ^DIST(.44,DA(1),5,"B",$E(X,1,30),DA)
CROSS-REFERENCE: .44^C
1)= S ^DIST(.44,"C",$E(X,1,30),DA(1),DA)=""
2)= K ^DIST(.44,"C",$E(X,1,30),DA(1),DA)
This cross reference allows look-up of formats based on OTHER NAMES.
.441,1 DESCRIPTION FOR OTHER NAME 1;0 WORD-PROCESSING #.4411
DESCRIPTION:
Description and information about the format's other name.
LAST EDITED: SEP 14, 1992
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
DDXP FORMAT DOC OCT 23, 1992@15:33 USER #0 AVAILABLE FORMATS
DDXP FORMAT DOC HDR NOV 12, 1992@15:36 USER #0 @
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):
DDXP FF FORM1 SEP 25, 1992 USER #0
DDXP FF BLK1 DD #.44
DDXP FF BLK2 DD #.44
DDXP FF BLK3 DD #.441