added sysprog entities

2024-03-25 15:17:34 -07:00
parent 600a8e1f61
commit 3a6a2b6b5b
1028 changed files with 171660 additions and 0 deletions
--- a/SYSPROG/STPROCINS/IMPORTEQUATES.txt
+++ b/SYSPROG/STPROCINS/IMPORTEQUATES.txt
@ -0,0 +1,90 @@
+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