mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-12-12 20:29:12 +00:00
81 lines
2.9 KiB
Plaintext
81 lines
2.9 KiB
Plaintext
; File: DDEV.a
|
||
;
|
||
; Assembler Interface to the Macintosh Libraries
|
||
; Copyright Apple Computer, Inc. 1989-90
|
||
; All Rights Reserved
|
||
;
|
||
; Change History (most recent first):
|
||
;
|
||
; <7> 1/30/91 gbm sab, #38: Change the ‘already including this file’ variable to
|
||
; all uppercase (for security reasons)
|
||
; <2> 1/4/90 JSM Change some variable names in response to suggestions from
|
||
; documentation.
|
||
; <1> 12/19/89 JSM Adding to public includes for the first time.
|
||
;___________________________________________________________________________
|
||
|
||
IF &TYPE('__INCLUDINGDDEV__') = 'UNDEFINED' THEN
|
||
__INCLUDINGDDEV__ SET 1
|
||
|
||
; messages for ddev
|
||
|
||
kDBInit EQU 0
|
||
kDBEnd EQU 1
|
||
kDBGetConnInfo EQU 2
|
||
kDBGetSessionNum EQU 3
|
||
kDBSend EQU 4
|
||
kDBSendItem EQU 5
|
||
kDBExec EQU 6
|
||
kDBState EQU 7
|
||
kDBGetErr EQU 8
|
||
kDBBreak EQU 9
|
||
kDBGetItem EQU 10
|
||
kDBUnGetItem EQU 11
|
||
kDBKill EQU 12
|
||
kDBOpen EQU 100
|
||
kDBClose EQU 101
|
||
kDBIdle EQU 102
|
||
|
||
kDDEVName EQU 128 ; ID of STR resource with ddev name
|
||
kDDEVID EQU 128 ; ID of 'ddev' resource
|
||
kDDEVFlags EQU 128 ; ID of 'dflg' resource
|
||
|
||
kAsyncSupported EQU 1 ; bit for async support
|
||
|
||
DDEVFlags RECORD 0
|
||
version DS.L 1 ; always 0 for this release
|
||
flags DS.L 1 ; flags
|
||
DDEVFlagsSize EQU *
|
||
ENDR
|
||
|
||
DDEVParams RECORD 0
|
||
message DS.W 1 ; action for ddev
|
||
ddevStorage DS.L 1 ; storage for ddev
|
||
asyncPB DS.L 1 ; async parameter block pointer
|
||
sessID DS.L 1 ; session ID
|
||
returnedID DS.L 1 ; session ID returned by DBGetConnInfo
|
||
version DS.L 1 ; version returned by DBGetConnInfo
|
||
start DS.L 1 ; start returned by DBGetConnInfo
|
||
host DS.L 1 ; host for DBInit and DBGetConnInfo
|
||
user DS.L 1 ; user for DBInit and DBGetConnInfo
|
||
password DS.L 1 ; password for DBInit and DBGetConnInfo
|
||
connStr DS.L 1 ; connection str for DBInit and DBGetConnInfo
|
||
network DS.L 1 ; network for DBGetConnInfo
|
||
buffer DS.L 1 ; buffer used in several calls
|
||
err1 DS.L 1 ; error 1 for DBGetErr
|
||
err2 DS.L 1 ; error 2 for DBGetErr
|
||
item1 DS.L 1 ; item 1 for DBGetErr
|
||
item2 DS.L 1 ; item 2 for DBGetErr
|
||
errorMsg DS.L 1 ; errorMsg for DBGetErr
|
||
timeout DS.L 1 ; timeout for DBGetItem
|
||
dataType DS.L 1 ; type for several calls
|
||
sessNum DS.W 1 ; session number for DBGetConnInfo
|
||
; and DBGetSessionNum
|
||
state DS.W 1 ; state for DBGetConnInfo
|
||
len DS.W 1 ; length of buffer
|
||
places DS.W 1 ; places for DBSendItem and DBGetItem
|
||
flags DS.W 1 ; flags for DBSendItem and DBGetItem
|
||
abort DS.B 1 ; abort for DBBreak
|
||
DDEVParamsSize EQU *
|
||
ENDR
|
||
|
||
ENDIF ; ...already included |