⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 ibase.pas

📁 FIBPlus version 6-96. This is somewhat usefull interbase database components. TFIBDatabase, TFIBTab
💻 PAS
📖 第 1 页 / 共 5 页
字号:
				 isc_arg7                  : PAnsiChar;
                                 isc_arg8                  : UShort;
				 isc_arg9                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_vax_integer = function     (buffer                    : PAnsiChar;
				 length                    : Short): ISC_LONG;
                                 {$I pFIBMacroComp.inc}

Tisc_portable_integer = function (buffer                   : PAnsiChar;
				 length                    : Short): ISC_INT64;
                                 {$I pFIBMacroComp.inc}



(********************************)
(* Client information functions *)
(********************************)
Tisc_get_client_version = procedure(buffer : PAnsiChar); {$I pFIBMacroComp.inc}
Tisc_get_client_major_version = function : Integer; {$I pFIBMacroComp.inc}
Tisc_get_client_minor_version = function : Integer; {$I pFIBMacroComp.inc}



(***************************************)
(** Security Functions and structures **)
(***************************************)

const
  sec_uid_spec		                = $01;
  sec_gid_spec		                = $02;
  sec_server_spec		              = $04;
  sec_password_spec	              = $08;
  sec_group_name_spec	            = $10;
  sec_first_name_spec	            = $20;
  sec_middle_name_spec            = $40;
  sec_last_name_spec	            = $80;
  sec_dba_user_name_spec          = $100;
  sec_dba_password_spec           = $200;

  sec_protocol_tcpip              = 1;
  sec_protocol_netbeui            = 2;
  sec_protocol_spx                = 3;
  sec_protocol_local              = 4;

type
  TUserSecData = record
    sec_flags: Short;		     (** which fields are specified **)
    uid: Int;			           (** the user's id **)
    gid: int;			           (** the user's group id **)
    protocol: Int;		       (** protocol to use for connection **)
    server: PAnsiChar;           (** server to administer **)
    user_name: PAnsiChar;        (** the user's name **)
    password: PAnsiChar;         (** the user's password **)
    group_name: PAnsiChar;       (** the group name **)
    first_name: PAnsiChar;	     (** the user's first name **)
    middle_name: PAnsiChar;      (** the user's middle name **)
    last_name: PAnsiChar;	       (** the user's last name **)
    dba_user_name: PAnsiChar;    (** the dba user name **)
    dba_password: PAnsiChar;     (** the dba password **)
  end;
  PUserSecData = ^TUserSecData;

Tisc_add_user = function        (status_vector             : PISC_STATUS;
                                 user_sec_data             : PUserSecData): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_delete_user = function     (status_vector             : PISC_STATUS;
                                 user_sec_data             : PUserSecData): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_modify_user = function     (status_vector             : PISC_STATUS;
                                 user_sec_data             : PUserSecData): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

(************************************)
(**  Other OSRI functions          **)
(************************************)

Tisc_compile_request = function (status_vector             : PISC_STATUS;
                                 db_handle                 : PISC_DB_HANDLE;
                                 request_handle            : PISC_REQ_HANDLE;
				 isc_arg4                  : Short;
				 isc_arg5                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_compile_request2 = function (status_vector            : PISC_STATUS;
                                 db_handle                 : PISC_DB_HANDLE;
                                 request_handle            : PISC_REQ_HANDLE;
				 isc_arg4                  : Short;
				 isc_arg5                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_ddl = function             (status_vector             : PISC_STATUS;
			         db_handle                 : PISC_DB_HANDLE;
			         tran_handle               : PISC_TR_HANDLE;
			         isc_arg4                  : Short;
			         isc_arg5                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_prepare_transaction = function (status_vector         : PISC_STATUS;
                                 tran_handle               : PISC_TR_HANDLE): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}


Tisc_receive = function         (status_vector             : PISC_STATUS;
                                 request_handle            : PISC_REQ_HANDLE;
				 isc_arg3,
                                 isc_arg4                  : Short;
				 isc_arg5                  : PVoid;
				 isc_arg6                  : Short): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_receive2 = function        (status_vector             : PISC_STATUS;
                                 request_handle            : PISC_REQ_HANDLE;
				 isc_arg3,
                                 isc_arg4                  : Short;
				 isc_arg5                  : PVoid;
				 isc_arg6,
                                 isc_arg7                  : Short;
                                 isc_arg8                  : Long): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_reconnect_transaction = function (status_vector       : PISC_STATUS;
                                 db_handle                 : PISC_DB_HANDLE;
                                 tran_handle               : PISC_TR_HANDLE;
                                 isc_arg4                  : Short;
                                 isc_arg5                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_release_request = function (status_vector             : PISC_STATUS;
                                 request_handle            : PISC_REQ_HANDLE): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_request_info = function    (status_vector             : PISC_STATUS;
                                 request_handle            : PISC_REQ_HANDLE;
                                 isc_arg3                  : Short;
                                 isc_arg4                  : Short;
                                 isc_arg5                  : PAnsiChar;
                                 isc_arg6                  : Short;
                                 isc_arg7                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_seek_blob = function       (status_vector             : PISC_STATUS;
                                 blob_handle               : PISC_BLOB_HANDLE;
                                 isc_arg3                  : Short;
                                 isc_arg4                  : ISC_LONG;
                                 isc_arg5                  : PISC_LONG): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_send = function            (status_vector             : PISC_STATUS;
				 request_handle            : PISC_REQ_HANDLE;
				 isc_arg3,
                                 isc_arg4                  : Short;
				 isc_arg5                  : PVoid;
				 isc_arg6                  : Short): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_start_and_send = function  (status_vector             : PISC_STATUS;
                                 request_handle            : PISC_REQ_HANDLE;
				 tran_handle               : PISC_TR_HANDLE;
				 isc_arg4,
                                 isc_arg5                  : Short;
                                 isc_arg6                  : PVoid;
                                 isc_arg7                  : Short): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_start_request = function   (status_vector             : PISC_STATUS;
                                 request_handle            : PISC_REQ_HANDLE;
                                 tran_handle               : PISC_TR_HANDLE;
                                 isc_arg4                  : Short): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_unwind_request = function  (status_vector             : PISC_STATUS;
                                 tran_handle               : PISC_TR_HANDLE;
                                 isc_arg3                  : Short): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_wait_for_event = function  (status_vector             : PISC_STATUS;
                                 db_handle                 : PISC_DB_HANDLE;
                                 length                    : Short;
                                 event_buffer,
                                 result_buffer             : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

(*******************************)
(** Other Sql functions       **)
(*******************************)

Tisc_close = function           (status_vector             : PISC_STATUS;
                                 isc_arg2                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_declare = function         (status_vector             : PISC_STATUS;
                                 isc_arg2,
                                 isc_arg3                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_describe = function        (status_vector             : PISC_STATUS;
                                 isc_arg2                  : PAnsiChar;
                                 isc_arg3                  : PXSQLDA): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_describe_bind = function   (status_vector             : PISC_STATUS;
                                 isc_arg2                  : PAnsiChar;
                                 isc_arg3                  : PXSQLDA): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_execute = function         (status_vector             : PISC_STATUS;
                                 tran_handle               : PISC_TR_HANDLE;
                                 isc_arg3                  : PAnsiChar;
                                 isc_arg4                  : PXSQLDA): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_execute_immediate = function (status_vector           : PISC_STATUS;
                                 db_handle                 : PISC_DB_HANDLE;
                                 tran_handle               : PISC_TR_HANDLE;
                                 isc_arg4                  : PShort;
                                 isc_arg5                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_fetch = function           (status_vector             : PISC_STATUS;
				 isc_arg2                  : PAnsiChar;
				 isc_arg3                  : PXSQLDA): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_open = function            (status_vector             : PISC_STATUS;
				 tran_handle               : PISC_TR_HANDLE;
				 isc_arg3                  : PAnsiChar;
				 isc_arg4                  : PXSQLDA): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_prepare = function         (status_vector             : PISC_STATUS;
                                 db_handle                 : PISC_DB_HANDLE;
                                 tran_handle               : PISC_TR_HANDLE;
                                 isc_arg4                  : PAnsiChar;
                                 isc_arg5                  : PShort;
                                 isc_arg6                  : PAnsiChar;
                                 isc_arg7                  : PXSQLDA): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}


(***************************************)
(** Other Dynamic sql functions       **)
(***************************************)

Tisc_dsql_execute_m = function  (status_vector             : PISC_STATUS;
                                 tran_handle               : PISC_TR_HANDLE;
                                 statement_handle          : PISC_STMT_HANDLE;
                                 isc_arg4                  : UShort;
                                 isc_arg5                  : PAnsiChar;
                                 isc_arg6                  : UShort;
                                 isc_arg7                  : UShort;
                                 isc_arg8                  : PAnsiChar): ISC_STATUS;
                                 {$I pFIBMacroComp.inc}

Tisc_dsql_execute2_m = function (status_vector             : PISC_STATUS;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -