91 lines
3.3 KiB
Plaintext
91 lines
3.3 KiB
Plaintext
compile insert IMPORTEQUATES
|
|
|
|
EQU COMMA$ TO \2C\
|
|
EQU SPACE$ TO \20\
|
|
EQU VERIFY$ TO -1
|
|
EQU SINGLE_QUOTE$ TO \27\
|
|
EQU DOUBLE_QUOTE$ TO \22\
|
|
*EQU ESC$ TO @INT.CONST<1>
|
|
EQU SINGLE$ TO 2
|
|
EQU MULTI$ TO 3
|
|
EQU PUSH$ TO 4
|
|
EQU POP$ TO 5
|
|
EQU MAXLEN$ TO 65530 ;* Approx 64K
|
|
EQU REBUILD$ TO 2 ;* INDEX_TOGGLE rebuild flag
|
|
EQU FIXED_LEN_FIELD_POS$ TO 4
|
|
*
|
|
* Import Field Array parameters.
|
|
*
|
|
EQU FMC$ TO 1
|
|
EQU MV$ TO 2
|
|
EQU APPEND$ TO 3
|
|
EQU FIELD_START_BYTE$ TO 4
|
|
EQU FIELD_LEN$ TO 5
|
|
EQU SKIP_IF_DATA$ TO 6
|
|
|
|
/* Literal resources equates */
|
|
|
|
EQU RES_UNTITLED$ TO 5
|
|
EQU RES_CAPTION$ TO 6
|
|
EQU RES_FILTERS$ TO 7
|
|
EQU RES_TYPETEXT$ TO 8
|
|
EQU RES_DELIMREQ$ TO 9
|
|
EQU RES_FILETYPEREQ$ TO 10
|
|
EQU RES_NOOPTIONS$ TO 11
|
|
EQU RES_COLREQ$ TO 12
|
|
EQU RES_ERRORWRI$ TO 13
|
|
EQU RES_ERROROPN$ TO 14
|
|
EQU RES_QUITOK$ TO 15
|
|
EQU RES_ERRORREAD$ TO 16
|
|
EQU RES_PROCESSREQ$ TO 17
|
|
EQU RES_FILEREQ$ TO 18
|
|
EQU RES_TABLEREQ$ TO 19
|
|
EQU RES_TOTALROWREQ$ TO 20
|
|
EQU RES_PROCESSDNE$ TO 21
|
|
EQU RES_NORECDELIM$ TO 22
|
|
EQU RES_TABLEEXISTS$ TO 23
|
|
EQU RES_TABLENOTAVAIL$ TO 24
|
|
EQU RES_NOFILES$ TO 25
|
|
EQU RES_PRESIZEOK$ TO 26
|
|
EQU RES_OPNDOSFILE$ TO 27
|
|
EQU RES_STARTBYTEREQ$ TO 28
|
|
EQU RES_PROCFILES$ TO 29
|
|
EQU RES_IMPORTLASTDONE$ TO 30
|
|
EQU RES_CANCELIMPORT$ TO 31
|
|
EQU RES_PROCESSCANCEL$ TO 32
|
|
EQU RES_IMPORTCOMPLETE$ TO 33
|
|
EQU RES_INVALIDDATA$ TO 34
|
|
|
|
/*--------------------------------------------------------------------------
|
|
|
|
dictionary field equates for file IMPORT.EXPORT
|
|
|
|
--------------------------------------------------------------------------*/
|
|
|
|
EQU DOS_FILENAME$ TO 1
|
|
EQU REV_FILENAME$ TO 2
|
|
EQU FIELD_DELIMITER$ TO 3
|
|
EQU RECORD_DELIMITER$ TO 4
|
|
EQU EOF_DELIMITER$ TO 5
|
|
EQU IMPORT_REC_LENGTH$ TO 6
|
|
EQU FIELD_NAMES$ TO 7
|
|
EQU START_BYTE$ TO 8
|
|
EQU FIELD_LENGTH$ TO 9
|
|
EQU CONVERSION$ TO 10
|
|
EQU CLEARFILE_FLAG$ TO 11
|
|
EQU RECORDS_IN_FILE$ TO 12
|
|
EQU OBSERVE_QUOTES$ TO 13
|
|
EQU PRESIZE_FLAG$ TO 14
|
|
EQU MERGE_FLAG$ TO 15
|
|
EQU MAKEDICT_FLAG$ TO 16
|
|
EQU SUPPRESS_FLAG$ TO 17
|
|
EQU ACTUAL_FLAG$ TO 18
|
|
EQU HEADER_FLAG$ TO 19
|
|
EQU TEXT_MARKER_FLAG$ TO 20
|
|
EQU MAKEFILE_FLAG$ TO 21
|
|
EQU INDEXING_FLAG$ TO 22
|
|
EQU BATCH_FLAG$ TO 23
|
|
EQU PROCESS_TYPE$ TO 24
|
|
EQU LOCK_FLAG$ TO 25
|
|
* Source Date: 10:56:09 18 OCT 1995 Build ID: OI*3.0.150 Level: 2.8
|