51 lines
1.9 KiB
Plaintext
51 lines
1.9 KiB
Plaintext
compile insert rtp65_equates
|
|
/*
|
|
** Copyright (C) 2012-2021 Revelation Software Inc. All Rights Reserved **
|
|
|
|
Author : Captain C
|
|
Date : September 2012
|
|
Purpose : RTP65 constants
|
|
|
|
Comments
|
|
========
|
|
|
|
|
|
Amended Date Reason
|
|
======= ==== ======
|
|
*/
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
#ifndef _RTP65_EQUATES_
|
|
#define _RTP65_EQUATES_
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
|
|
equ RTP65_CREATE$ to 0
|
|
equ RTP65_OPEN$ to 1
|
|
equ RTP65_CLOSE$ to 2
|
|
equ RTP65_CLEAR$ to 3
|
|
equ RTP65_READ$ to 4
|
|
equ RTP65_WRITE$ to 5
|
|
equ RTP65_DELETE$ to 6
|
|
|
|
equ RTP65_NO_ERR$ to 0
|
|
equ RTP65_TABLE_EXIST_ERR$ to 1 ; * // FS146
|
|
equ RTP65_TABLE_NOT_EXIST_ERR$ to 2 ; * // FS145
|
|
equ RTP65_TABLE_ALREADY_OPEN_ERR$ to 3 ; * // FS200
|
|
equ RTP65_REC_DNE_ERR$ to 4 ; * // FS100
|
|
equ RTP65_UNKNOWN_CODE$ to 5 ; * // FS281
|
|
equ RTP65_INIT_ERR$ to 6
|
|
equ RTP65_OPEN_ERR$ to 7
|
|
equ RTP65_NULL_TABLE_ERR$ to 8
|
|
equ RTP65_NULL_METHOD_ERR$ to 9
|
|
equ RTP65_BAD_METHOD_ERR$ to 10
|
|
equ RTP65_REVSTL_ERR$ to 11
|
|
|
|
equ RTP65_NULL_HANDLE$ to -1
|
|
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
#endif
|
|
////////////////////////////////////////////////////////////////////////////////
|
|
////////////////////////////////////////////////////////////////////////////////
|