162 lines
		
	
	
		
			9.7 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			162 lines
		
	
	
		
			9.7 KiB
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| compile insert DICT.EQUATES
 | |
| *  D I C T . E Q U A T E S
 | |
| *
 | |
| *  Equates that define the structure of Advanced Revelation's Data Dictionary
 | |
| *
 | |
| *
 | |
| EQUATE D.E.TYPE               TO 1      ;* Type of current field.
 | |
|                                         ;* 'F' = Data Field
 | |
|                                         ;* 'S' = Symbolic (formula in D.E.FORMULA)
 | |
|                                         ;* 'G' = Group (group data in D.E.DISPLAY)
 | |
| 
 | |
| EQUATE D.E.FIELD.NO           TO 2      ;* The position of the data in the record
 | |
| 
 | |
| EQUATE D.E.DISPLAY            TO 3      ;* The Column Heading used by RLIST and other tools
 | |
|                                         ;* For type 'G' dictionary records, this field
 | |
|                                         ;* contains the group data.
 | |
| 
 | |
| EQUATE D.E.SM                 TO 4      ;* Single or Multivalue flag "S"ingle "M"ulti
 | |
| 
 | |
| EQUATE D.E.PART               TO 5      ;* Key part.  For multi-part keys, this field
 | |
|                                         ;* specifies the part number (1, 2, 3, etc.)
 | |
|                                         ;* For single-part key fields, this field should be 0.
 | |
| 
 | |
| EQUATE D.E.INDEX.FLAG         TO 6      ;* BTREE INDEX flag (boolean value).
 | |
| 
 | |
| EQUATE D.E.CONV               TO 7      ;* Contains the output conversion for data
 | |
| 
 | |
| EQUATE D.E.FORMULA            TO 8      ;* If the field type = "S" then this field will contain an rbasic formula
 | |
| 
 | |
| EQUATE D.E.JUST               TO 9      ;* Justification for displaying and sorting data.
 | |
|                                         ;* 'L' = Left
 | |
|                                         ;* 'R' = Right
 | |
|                                         ;* 'C' = Centered
 | |
|                                         ;* 'T' = Text
 | |
|                                         ;* Text justification means no justification.
 | |
| 
 | |
| EQUATE D.E.LENGTH             TO 10     ;* Display length for this field.  Note that this length
 | |
|                                         ;* is not necessarily the length of the data itself,
 | |
|                                         ;* especially in bonded files.
 | |
| 
 | |
| EQUATE D.E.PATTERN            TO 11     ;* Input validation/conversion for this field
 | |
| 
 | |
| EQUATE D.E.GENERIC.TYPE       TO 12     ;* The Arev Generic Data type associated with this field
 | |
| 
 | |
| EQUATE D.E.SOURCE             TO 13     ;* This field is basically reserved for backwards compatibility
 | |
|                                         ;* with REV/G.  Don't use it.
 | |
| 
 | |
| EQUATE D.E.DESC               TO 14     ;* Description of this field. Used for documentation.
 | |
|                                         ;* Can be displayed as online help using an HD code.
 | |
| 
 | |
| EQUATE D.E.FOREIGN.TYPE       TO 15     ;* The data type name in the foreign environment
 | |
| 
 | |
| EQUATE D.E.FOREIGN.NAME       TO 16     ;* The field name in the foreign environment
 | |
| 
 | |
| EQUATE D.E.FOREIGN.MAP        TO 17     ;* For bonded files, this field uniquely specifies
 | |
|                                         ;* a data mapping (that is, the algorithm used to
 | |
|                                         ;* transfer data between the Advanced Revelation data type
 | |
|                                         ;* and the foreign data type).
 | |
| 
 | |
| EQUATE D.E.FOREIGN.ATTR       TO 18     ;* This field contains any foreign field attributes
 | |
|                                         ;* that a bonded dictionary field may have, separated
 | |
|                                         ;* by value marks.
 | |
| 
 | |
| EQUATE D.E.PMD                TO 19     ;* This field is still being designed.
 | |
| 
 | |
| EQUATE D.E.NULL.TRUNC         TO 20     ;* This field allows the user to override the bond's
 | |
|                                         ;* default handling of null values for this field.
 | |
|                                         ;* If the bond cannot support null values, setting the first
 | |
|                                         ;* value of this field to 'Y' allows nulls to be stored
 | |
|                                         ;* without an error.  A 'N' or null first value allows the
 | |
|                                         ;* default behaviour: if the bond cannot store nulls in this
 | |
|                                         ;* field and a null is written, an I/O error will result.
 | |
|                                         ;* If the first value is 'Y', the second value can be
 | |
|                                         ;* used to specify what value the bond should store in
 | |
|                                         ;* the field when a null is written.  The bond is not
 | |
|                                         ;* required to support this latter ability.
 | |
| 
 | |
| EQUATE D.E.DEPENDENT          TO 21     ;* Reserved for indexing.
 | |
| 
 | |
| EQUATE D.E.XREF               TO 22     ;* If non-null, then there is a cross-reference index
 | |
|                                         ;* on this field.  In that case, the value in D.E.XREF
 | |
|                                         ;* is the name of the symbolic field that calculates the
 | |
|                                         ;* cross-reference index.
 | |
| 
 | |
| EQUATE D.E.RELATIONAL         TO 23     ;* If non-null, then this field is used to update a relational
 | |
|                                         ;* index in another file and contains the key to a record
 | |
|                                         ;* in that other file.
 | |
| 
 | |
| EQUATE D.E.RELATED            TO 24     ;* For relational indexes, this field is updated to contain the
 | |
|                                         ;* keys to the related records in the other file.
 | |
| 
 | |
| EQUATE D.E.PROTECT            TO 25     ;* 1 if this field is protected.  This flag is set by
 | |
|                                         ;* relational indexing process.
 | |
| 
 | |
| EQUATE D.E.LOWERCASE          TO 26     ;* Controls how indexed fields are indexed:
 | |
|                                         ;* 0 = convert to uppercase
 | |
|                                         ;* 1 = maintain case supplied.
 | |
| 
 | |
| EQUATE D.E.COMPUTED           TO 27     ;* Reserved for indexing.
 | |
| 
 | |
| EQUATE D.E.MASTER.FLAG        TO 28     ;* For 'F'-type dictionary records, this flag
 | |
|                                         ;* distinguishes synonym fields from the "real" field.
 | |
|                                         ;* This flag is '0' for synonyms and '1' otherwise.
 | |
| 
 | |
| EQUATE D.E.DEFAULT            TO 29     ;* SQL default value for insertions.
 | |
| 
 | |
| EQUATE D.E.REFERENCE          TO 30     ;* SQL.  Indicates this column is a foreign key to the listed table(s).
 | |
| 
 | |
| EQUATE D.E.NULL               TO 31     ;* SQL.
 | |
|                                         ;* 0 = column can store nulls.
 | |
|                                         ;* 1 = column can't store nulls.
 | |
|                                         ;* We're still figuring out whether this field and
 | |
|                                         ;* D.E.NULL.TRUNC should be the same field.
 | |
| 
 | |
| EQUATE D.E.UNIQUE             TO 32     ;* SQL.  0=column may contain duplicate values. 1=column must contain unique values.
 | |
| 
 | |
| EQUATE D.E.LENGTH.LIMIT       TO 33     ;* SQL.  Length (in chars) of data.  Needs to be
 | |
|                                         ;* integrated with bonding.
 | |
| 
 | |
| EQUATE D.E.IN.TRUNC           TO 39     ;* The first value in this field is either null, 0, or 1.
 | |
|                                         ;* 0 or null means the default handling of input truncation:
 | |
|                                         ;* if transferring a field into AREV would result in any loss of
 | |
|                                         ;* information, an I/O error is returned.  1 allows the
 | |
|                                         ;* the bond to truncate the data without returning an error.
 | |
|                                         ;* In this case, either one or two values can follow the 1.
 | |
|                                         ;* For character-based fields, a single value specifies what the
 | |
|                                         ;* bond should read in when all information would be lost
 | |
|                                         ;* (e.g., the field consisted of 3 field marks).  For numeric-
 | |
|                                         ;* based fields, the second value is the replacement for
 | |
|                                         ;* numeric underflow and the third value is the replacement for
 | |
|                                         ;* overflow.
 | |
| 
 | |
| EQUATE D.E.OUT.TRUNC          TO 40     ;* Same as D.E.IN.TRUNC, except for output.
 | |
| 
 | |
| EQUATE D.E.USER1              TO 41     ;* This field is reserved for the application.
 | |
| EQUATE D.E.USER2              TO 42     ;* ""
 | |
| EQUATE D.E.USER3              TO 43     ;* ""
 | |
| EQUATE D.E.USER4              TO 44     ;* ""
 | |
| EQUATE D.E.USER5              TO 45     ;* ""
 | |
| 
 | |
| EQUATE D.E.OBJECT             TO 51     ;* This field contains binary data; object code for the current field
 | |
| 
 | |
| *
 | |
| * Equates that define the structure of the special record "%FIELDS%" found in each Arev Dictionary
 | |
| * All of these fields are associated multivalued fields.
 | |
| *
 | |
| 
 | |
| EQUATE FIELDS.MAXFIELD$       TO 2      ;* The highest FMC number in the dictionary.
 | |
| EQUATE FIELDS.NAME$           TO 3      ;* Contains field names.
 | |
| EQUATE FIELDS.TYPE$           TO 4      ;* Contains D.E.TYPE values.
 | |
| EQUATE FIELDS.FIELD.NO$       TO 5      ;* Contains D.E.FIELD.NO values.
 | |
| EQUATE FIELDS.INDEX$          TO 6      ;* Contains D.E.INDEX.FLAG values.
 | |
| EQUATE FIELDS.XREF$           TO 7      ;* Contains D.E.XREF values.
 | |
| EQUATE FIELDS.PART$           TO 8      ;* Contains D.E.PART values.
 | |
| EQUATE FIELDS.MVFLAG$         TO 9      ;* Contains D.E.SM values.
 | |
| EQUATE FIELDS.JUST$           TO 10     ;* Contains D.E.JUST values.
 | |
| EQUATE FIELDS.LENGTH$         TO 11     ;* Contains D.E.LENGTH values.
 | |
| EQUATE FIELDS.CONV$           TO 12     ;* Contains D.E.CONV values.
 | |
| EQUATE FIELDS.DEFAULT$        TO 13     ;* Contains D.E.DEFAULT values.
 | |
| EQUATE FIELDS.MASTER.FLAG$    TO 14     ;* Contains D.E.MASTER.FLAG values.
 | |
| * Source Date: 09:48:08  02 MAR 1993  Build ID: AREV*3.1.31  Level: 3.1
 |