ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/trunk/runtime/IBHeader.pas

Comparing ibx/trunk/runtime/IBHeader.pas (file contents):
Revision 5 by tony, Fri Feb 18 16:26:16 2011 UTC vs.
Revision 7 by tony, Sun Aug 5 18:28:19 2012 UTC

#	Line 24 | Line 24
24		{       Corporation. All Rights Reserved.                                }
25		{    Contributor(s): Jeff Overcash                                       }
26		{                                                                        }
27	+	{    IBX For Lazarus (Firebird Express)                                  }
28	+	{    Contributor: Tony Whyman, MWA Software http://www.mwasoftware.co.uk }
29	+	{    Portions created by MWA Software are copyright McCallum Whyman      }
30	+	{    Associates Ltd 2011                                                 }
31	+	{                                                                        }
32		{************************************************************************}
33
34		unit IBHeader;
#	Line 41 | Line 46 | const
46		ISC_FALSE = 0;
47		DSQL_close = 1;
48		DSQL_drop = 2;
49	<	{$IFDEF LINUX}
50	<	FIREBIRD_SO = 'libfbclient.so';
51	<	{$ELSE}
49	>	{$IFDEF LINUX}
50	>	FIREBIRD_SO2 = 'libfbclient.so.2';
51	>	{$ENDIF}
52	>	{$IFDEF DARWIN}
53	>	FIREBIRD_SO2 = 'libfbclient.dylib';
54	>	{$ENDIF}
55	>	{$IFDEF WINDOWS}
56		IBASE_DLL = 'gds32.dll';
57		FIREBIRD_CLIENT = 'fbclient.dll'; {do not localize}
58	<	FIREBIRD_EMBEDDED = 'fbembedded.dll';
59	<	{$ENDIF}
58	>	FIREBIRD_EMBEDDED = 'fbembed.dll';
59	>	{$ENDIF}
60
61		const
62		SQLDA_VERSION1               = 1; (* pre V6.0 SQLDA *)
#	Line 280 | Line 289 | Tisc_attach_database = function (status_
289		db_handle                : PISC_DB_HANDLE;
290		parm_buffer_length       : Short;
291		parm_buffer              : PChar): ISC_STATUS;
292	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
292	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
293
294		Tisc_array_gen_sdl = function   (status_vector            : PISC_STATUS;
295		isc_array_desc           : PISC_ARRAY_DESC;
296		isc_arg3                 : PShort;
297		isc_arg4                 : PChar;
298		isc_arg5                 : PShort): ISC_STATUS;
299	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
299	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
300
301		Tisc_array_get_slice = function (status_vector            : PISC_STATUS;
302		db_handle                : PISC_DB_HANDLE;
#	Line 296 | Line 305 | Tisc_array_get_slice = function (status_
305		descriptor               : PISC_ARRAY_DESC;
306		dest_array               : PVoid;
307		slice_length             : ISC_LONG): ISC_STATUS;
308	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
308	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
309
310		Tisc_array_lookup_bounds = function (status_vector        : PISC_STATUS;
311		db_handle                : PISC_DB_HANDLE;
#	Line 304 | Line 313 | Tisc_array_lookup_bounds = function (sta
313		table_name,
314		column_name              : PChar;
315		descriptor               : PISC_ARRAY_DESC): ISC_STATUS;
316	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
316	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
317
318		Tisc_array_lookup_desc = function (status_vector          : PISC_STATUS;
319		db_handle                : PISC_DB_HANDLE;
#	Line 312 | Line 321 | Tisc_array_lookup_desc = function (statu
321		table_name,
322		column_name              : PChar;
323		descriptor               : PISC_ARRAY_DESC): ISC_STATUS;
324	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
324	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
325
326		Tisc_array_set_desc = function  (status_vector            : PISC_STATUS;
327		table_name               : PChar;
#	Line 321 | Line 330 | Tisc_array_set_desc = function  (status_
330		sql_length,
331		sql_dimensions           : PShort;
332		descriptor               : PISC_ARRAY_DESC): ISC_STATUS;
333	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
333	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
334
335		Tisc_array_put_slice = function (status_vector            : PISC_STATUS;
336		db_handle                : PISC_DB_HANDLE;
#	Line 330 | Line 339 | Tisc_array_put_slice = function (status_
339		descriptor               : PISC_ARRAY_DESC;
340		source_array             : PVoid;
341		slice_length             : PISC_LONG): ISC_STATUS;
342	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
342	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
343
344		Tisc_blob_default_desc = procedure  (descriptor           : PISC_BLOB_DESC;
345		table_name               : PUChar;
346		column_name              : PUChar);
347	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
347	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
348
349		Tisc_blob_gen_bpb = function    (status_vector            : PISC_STATUS;
350		to_descriptor,
#	Line 343 | Line 352 | Tisc_blob_gen_bpb = function    (status_
352		bpb_buffer_length        : UShort;
353		bpb_buffer               : PUChar;
354		bpb_length               : PUShort): ISC_STATUS;
355	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
355	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
356
357		Tisc_blob_info = function       (status_vector            : PISC_STATUS;
358		blob_handle              : PISC_BLOB_HANDLE;
#	Line 351 | Line 360 | Tisc_blob_info = function       (status_
360		item_list_buffer         : PChar;
361		result_buffer_length     : Short;
362		result_buffer            : PChar): ISC_STATUS;
363	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
363	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
364
365		Tisc_blob_lookup_desc = function (status_vector           : PISC_STATUS;
366		db_handle                : PISC_DB_HANDLE;
#	Line 360 | Line 369 | Tisc_blob_lookup_desc = function (status
369		column_name              : PChar;
370		descriptor               : PISC_BLOB_DESC;
371		global                   : PUChar): ISC_STATUS;
372	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
372	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
373
374		Tisc_blob_set_desc = function   (status_vector            : PISC_STATUS;
375		table_name,
#	Line 369 | Line 378 | Tisc_blob_set_desc = function   (status_
378		charset,
379		segment_size             : Short;
380		descriptor               : PISC_BLOB_DESC): ISC_STATUS;
381	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
381	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
382
383		Tisc_cancel_blob = function     (status_vector            : PISC_STATUS;
384		blob_handle              : PISC_BLOB_HANDLE): ISC_STATUS;
385	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
385	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
386
387		Tisc_cancel_events = function   (status_vector            : PISC_STATUS;
388		db_handle                : PISC_DB_HANDLE;
389		event_id                 : PISC_LONG): ISC_STATUS;
390	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
390	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
391
392		Tisc_close_blob = function      (status_vector            : PISC_STATUS;
393		blob_handle              : PISC_BLOB_HANDLE): ISC_STATUS;
394	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
394	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
395
396		Tisc_commit_retaining = function (status_vector           : PISC_STATUS;
397		tran_handle              : PISC_TR_HANDLE): ISC_STATUS;
398	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
398	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
399
400		Tisc_commit_transaction = function  (status_vector        : PISC_STATUS;
401		tran_handle              : PISC_TR_HANDLE): ISC_STATUS;
402	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
402	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
403
404		Tisc_create_blob = function     (status_vector            : PISC_STATUS;
405		db_handle                : PISC_DB_HANDLE;
406		tran_handle              : PISC_TR_HANDLE;
407		blob_handle              : PISC_BLOB_HANDLE;
408		blob_id                  : PISC_QUAD): ISC_STATUS;
409	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
409	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
410
411		Tisc_create_blob2 = function    (status_vector            : PISC_STATUS;
412		db_handle                : PISC_DB_HANDLE;
#	Line 406 | Line 415 | Tisc_create_blob2 = function    (status_
415		blob_id                  : PISC_QUAD;
416		bpb_length               : Short;
417		bpb_address              : PChar): ISC_STATUS;
418	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
418	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
419
420		Tisc_create_database = function (status_vector            : PISC_STATUS;
421		isc_arg2                 : Short;
#	Line 415 | Line 424 | Tisc_create_database = function (status_
424		isc_arg5                 : Short;
425		isc_arg6                 : PChar;
426		isc_arg7                 : Short): ISC_STATUS;
427	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
427	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
428
429		Tisc_database_info = function   (status_vector            : PISC_STATUS;
430		db_handle                : PISC_DB_HANDLE;
#	Line 423 | Line 432 | Tisc_database_info = function   (status_
432		item_list_buffer         : PChar;
433		result_buffer_length     : Short;
434		result_buffer            : PChar): ISC_STATUS;
435	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
435	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
436
437		Tisc_decode_date = procedure    (ib_date: PISC_QUAD;
438		tm_date: PCTimeStructure);
439	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
439	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
440
441		Tisc_decode_sql_date = procedure (ib_date: PISC_DATE;
442		tm_date: PCTimeStructure);
443	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
443	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
444
445		Tisc_decode_sql_time = procedure  (ib_time: PISC_TIME;
446		tm_date: PCTimeStructure);
447	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
447	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
448
449		Tisc_decode_timestamp = procedure  (ib_timestamp: PISC_TIMESTAMP;
450		tm_date: PCTimeStructure);
451	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
451	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
452
453		Tisc_detach_database = function (status_vector            : PISC_STATUS;
454		db_handle                : PISC_DB_HANDLE): ISC_STATUS;
455	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
455	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
456
457		Tisc_drop_database = function   (status_vector            : PISC_STATUS;
458		db_handle                : PISC_DB_HANDLE): ISC_STATUS;
459	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
459	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
460
461		Tisc_dsql_allocate_statement = function (status_vector    : PISC_STATUS;
462		db_handle                : PISC_DB_HANDLE;
463		stmt_handle              : PISC_STMT_HANDLE): ISC_STATUS;
464	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
464	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
465
466		Tisc_dsql_alloc_statement2 = function (status_vector      : PISC_STATUS;
467		db_handle                : PISC_DB_HANDLE;
468		stmt_handle              : PISC_STMT_HANDLE): ISC_STATUS;
469	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
469	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
470
471		Tisc_dsql_describe = function   (status_vector            : PISC_STATUS;
472		stmt_handle              : PISC_STMT_HANDLE;
473		dialect                  : UShort;
474		xsqlda                   : PXSQLDA): ISC_STATUS;
475	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
475	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
476
477		Tisc_dsql_describe_bind = function  (status_vector        : PISC_STATUS;
478		stmt_handle              : PISC_STMT_HANDLE;
479		dialect                  : UShort;
480		xsqlda                   : PXSQLDA): ISC_STATUS;
481	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
481	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
482
483		Tisc_dsql_exec_immed2 = function (status_vector           : PISC_STATUS;
484		db_handle                : PISC_DB_HANDLE;
#	Line 479 | Line 488 | Tisc_dsql_exec_immed2 = function (status
488		dialect                  : UShort;
489		in_xsqlda,
490		out_xsqlda               : PXSQLDA): ISC_STATUS;
491	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
491	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
492
493		Tisc_dsql_execute = function    (status_vector            : PISC_STATUS;
494		tran_handle              : PISC_TR_HANDLE;
495		stmt_handle              : PISC_STMT_HANDLE;
496		dialect                  : UShort;
497		xsqlda                   : PXSQLDA): ISC_STATUS;
498	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
498	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
499
500		Tisc_dsql_execute2 = function   (status_vector            : PISC_STATUS;
501		tran_handle              : PISC_TR_HANDLE;
#	Line 494 | Line 503 | Tisc_dsql_execute2 = function   (status_
503		dialect                  : UShort;
504		in_xsqlda,
505		out_xsqlda               : PXSQLDA): ISC_STATUS;
506	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
506	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
507
508		Tisc_dsql_execute_immediate = function (status_vector     : PISC_STATUS;
509		db_handle                : PISC_DB_HANDLE;
#	Line 503 | Line 512 | Tisc_dsql_execute_immediate = function (
512		statement                : PChar;
513		dialect                  : UShort;
514		xsqlda                   : PXSQLDA): ISC_STATUS;
515	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
515	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
516
517		Tisc_dsql_fetch = function      (status_vector            : PISC_STATUS;
518		stmt_handle              : PISC_STMT_HANDLE;
519		dialect                  : UShort;
520		xsqlda                   : PXSQLDA): ISC_STATUS;
521	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
521	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
522
523		(*$ifdef SCROLLABLE_CURSORS*)
524		Tisc_dsql_fetch2 = function     (status_vector            : PISC_STATUS;
#	Line 518 | Line 527 | Tisc_dsql_fetch2 = function     (status_
527		xsqlda                   : PXSQLDA;
528		isc_arg5                 : UShort;
529		isc_arg6                 : Long): ISC_STATUS;
530	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
530	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
531		(*$endif*)
532
533		Tisc_dsql_finish = function    (db_handle                : PISC_DB_HANDLE): ISC_STATUS;
534	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
534	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
535
536		Tisc_dsql_free_statement = function (status_vector        : PISC_STATUS;
537		stmt_handle              : PISC_STMT_HANDLE;
538		options                  : UShort): ISC_STATUS;
539	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
539	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
540
541		Tisc_dsql_insert = function     (status_vector            : PISC_STATUS;
542		stmt_handle              : PISC_STMT_HANDLE;
543		arg3                     : UShort;
544		xsqlda                   : PXSQLDA): ISC_STATUS;
545	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
545	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
546
547		Tisc_dsql_prepare = function    (status_vector            : PISC_STATUS;
548		tran_handle              : PISC_TR_HANDLE;
#	Line 542 | Line 551 | Tisc_dsql_prepare = function    (status_
551		statement                : PChar;
552		dialect                  : UShort;
553		xsqlda                   : PXSQLDA): ISC_STATUS;
554	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
554	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
555
556		Tisc_dsql_set_cursor_name = function (status_vector        : PISC_STATUS;
557		stmt_handle               : PISC_STMT_HANDLE;
558		cursor_name               : PChar;
559		_type                     : UShort): ISC_STATUS;
560	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
560	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
561
562		Tisc_dsql_sql_info = function   (status_vector             : PISC_STATUS;
563		stmt_handle               : PISC_STMT_HANDLE;
#	Line 556 | Line 565 | Tisc_dsql_sql_info = function   (status_
565		items                     : PChar;
566		buffer_length             : Short;
567		buffer                    : PChar): ISC_STATUS;
568	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
568	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
569
570		Tisc_encode_date = procedure    (tm_date                    : PCTimeStructure;
571		ib_date                    : PISC_QUAD);
572	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
572	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
573
574		Tisc_encode_sql_date = procedure (tm_date                   : PCTimeStructure;
575		ib_date                    : PISC_DATE);
576	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
576	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
577
578		Tisc_encode_sql_time = procedure (tm_date                   : PCTimeStructure;
579		ib_time                    : PISC_TIME);
580	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
580	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
581
582		Tisc_encode_timestamp = procedure (tm_date                  : PCTimeStructure;
583		ib_timestamp               : PISC_TIMESTAMP);
584	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
584	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
585
586		Tisc_event_block = function     (event_buffer               : PPChar;
587		result_buffer              : PPChar;
588	<	id_count                   : UShort;
589	<	event_list                 : array of PChar): ISC_LONG;
581	<	cdecl;
588	>	id_count                   : UShort):ISC_LONG;
589	>	varargs; cdecl;
590
591	<	Tisc_event_counts = procedure   (status_vector             : PISC_STATUS;
591	>	Tisc_event_counts = procedure   (status_vector             : PISC_LONG;
592		buffer_length             : Short;
593		event_buffer              : PChar;
594		result_buffer             : PChar);
595	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
595	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
596
597		Tisc_expand_dpb = procedure     (dpb                       : PPChar;
598		dpb_length                : PShort;
#	Line 597 | Line 605 | Tisc_modify_dpb = function      (dpb
605		isc_arg4                  : UShort;
606		isc_arg5                  : PChar;
607		isc_arg6                  : Short): Int;
608	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
608	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
609
610		Tisc_free = function           (isc_arg1                  : PChar): ISC_LONG;
611	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
611	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
612
613		Tisc_get_segment = function     (status_vector             : PISC_STATUS;
614		blob_handle               : PISC_BLOB_HANDLE;
615		actual_seg_length         : PUShort;
616		seg_buffer_length         : UShort;
617		seg_buffer                : PChar): ISC_STATUS;
618	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
618	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
619
620		Tisc_get_slice = function       (status_vector             : PISC_STATUS;
621		db_handle                 : PISC_DB_HANDLE;
#	Line 620 | Line 628 | Tisc_get_slice = function       (status_
628		isc_arg9                  : ISC_LONG;
629		isc_arg10                 : PVoid;
630		isc_arg11                 : PISC_LONG): ISC_STATUS;
631	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
631	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
632
633		Tisc_interprete = function      (buffer                    : PChar;
634		status_vector             : PPISC_STATUS): ISC_STATUS;
635	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
635	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
636
637		Tisc_open_blob = function       (status_vector             : PISC_STATUS;
638		db_handle                 : PISC_DB_HANDLE;
639		tran_handle               : PISC_TR_HANDLE;
640		blob_handle               : PISC_BLOB_HANDLE;
641		blob_id                   : PISC_QUAD): ISC_STATUS;
642	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
642	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
643
644		Tisc_open_blob2 = function      (status_vector             : PISC_STATUS;
645		db_handle                 : PISC_DB_HANDLE;
#	Line 640 | Line 648 | Tisc_open_blob2 = function      (status_
648		blob_id                   : PISC_QUAD;
649		bpb_length                : Short;
650		bpb_buffer                : PChar): ISC_STATUS;
651	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
651	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
652
653		Tisc_prepare_transaction2 = function (status_vector        : PISC_STATUS;
654		tran_handle               : PISC_TR_HANDLE;
655		msg_length                : Short;
656		msg                       : PChar): ISC_STATUS;
657	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
657	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
658
659		Tisc_print_sqlerror = procedure (sqlcode                   : Short;
660		status_vector             : PISC_STATUS);
661	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
661	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
662
663		Tisc_print_status = function   (status_vector              : PISC_STATUS): ISC_STATUS;
664	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
664	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
665
666		Tisc_put_segment = function     (status_vector             : PISC_STATUS;
667		blob_handle               : PISC_BLOB_HANDLE;
668		seg_buffer_len            : UShort;
669		seg_buffer                : PChar): ISC_STATUS;
670	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
670	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
671
672		Tisc_put_slice = function       (status_vector             : PISC_STATUS;
673		db_handle                 : PISC_DB_HANDLE;
#	Line 671 | Line 679 | Tisc_put_slice = function       (status_
679		isc_arg8                  : PISC_LONG;
680		isc_arg9                  : ISC_LONG;
681		isc_arg10                 : PVoid): ISC_STATUS;
682	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
682	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
683
684		Tisc_que_events = function      (status_vector             : PISC_STATUS;
685		db_handle                 : PISC_DB_HANDLE;
#	Line 680 | Line 688 | Tisc_que_events = function      (status_
688		event_buffer              : PChar;
689		event_function            : TISC_CALLBACK;
690		event_function_arg        : PVoid): ISC_STATUS;
691	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
691	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
692
693		Tisc_rollback_retaining = function (status_vector         : PISC_STATUS;
694		tran_handle              : PISC_TR_HANDLE): ISC_STATUS;
695	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
695	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
696
697		Tisc_rollback_transaction = function (status_vector        : PISC_STATUS;
698		tran_handle               : PISC_TR_HANDLE): ISC_STATUS;
699	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
699	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
700
701		Tisc_start_multiple = function  (status_vector             : PISC_STATUS;
702		tran_handle               : PISC_TR_HANDLE;
703		db_handle_count           : Short;
704		teb_vector_address        : PISC_TEB): ISC_STATUS;
705	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
705	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
706
707		Tisc_start_transaction = function (status_vector           : PISC_STATUS;
708		tran_handle               : PISC_TR_HANDLE;
#	Line 705 | Line 713 | Tisc_start_transaction = function (statu
713		cdecl;
714
715		Tisc_sqlcode = function        (status_vector             : PISC_STATUS): ISC_LONG;
716	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
716	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
717
718
719		Tisc_sql_interprete = procedure (sqlcode                   : Short;
720		buffer                    : PChar;
721		buffer_length             : Short);
722	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
722	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
723
724		Tisc_transaction_info = function (status_vector            : PISC_STATUS;
725		tran_handle               : PISC_TR_HANDLE;
#	Line 719 | Line 727 | Tisc_transaction_info = function (status
727		item_list_buffer          : PChar;
728		result_buffer_length      : Short;
729		result_buffer             : PChar): ISC_STATUS;
730	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
730	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
731
732		Tisc_transact_request = function (status_vector            : PISC_STATUS;
733		db_handle                 : PISC_DB_HANDLE;
#	Line 730 | Line 738 | Tisc_transact_request = function (status
738		isc_arg7                  : PChar;
739		isc_arg8                  : UShort;
740		isc_arg9                  : PChar): ISC_STATUS;
741	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
741	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
742
743		Tisc_vax_integer = function     (buffer                    : PChar;
744		length                    : Short): ISC_LONG;
745	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
745	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
746
747		Tisc_portable_integer = function (buffer                   : PChar;
748		length                    : Short): ISC_INT64;
749	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
749	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
750
751		(***************************************)
752		(** Security Functions and structures **)
#	Line 781 | Line 789 | type
789
790		Tisc_add_user = function        (status_vector             : PISC_STATUS;
791		user_sec_data             : PUserSecData): ISC_STATUS;
792	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
792	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
793
794		Tisc_delete_user = function     (status_vector             : PISC_STATUS;
795		user_sec_data             : PUserSecData): ISC_STATUS;
796	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
796	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
797
798		Tisc_modify_user = function     (status_vector             : PISC_STATUS;
799		user_sec_data             : PUserSecData): ISC_STATUS;
800	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
800	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
801
802		(************************************)
803		(**  Other OSRI functions          **)
#	Line 800 | Line 808 | Tisc_compile_request = function (status_
808		request_handle            : PISC_REQ_HANDLE;
809		isc_arg4                  : Short;
810		isc_arg5                  : PChar): ISC_STATUS;
811	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
811	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
812
813		Tisc_compile_request2 = function (status_vector            : PISC_STATUS;
814		db_handle                 : PISC_DB_HANDLE;
815		request_handle            : PISC_REQ_HANDLE;
816		isc_arg4                  : Short;
817		isc_arg5                  : PChar): ISC_STATUS;
818	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
818	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
819
820		Tisc_ddl = function             (status_vector             : PISC_STATUS;
821		db_handle                 : PISC_DB_HANDLE;
822		tran_handle               : PISC_TR_HANDLE;
823		isc_arg4                  : Short;
824		isc_arg5                  : PChar): ISC_STATUS;
825	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
825	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
826
827		Tisc_prepare_transaction = function (status_vector         : PISC_STATUS;
828		tran_handle               : PISC_TR_HANDLE): ISC_STATUS;
829	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
829	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
830
831
832		Tisc_receive = function         (status_vector             : PISC_STATUS;
#	Line 827 | Line 835 | Tisc_receive = function         (status_
835		isc_arg4                  : Short;
836		isc_arg5                  : PVoid;
837		isc_arg6                  : Short): ISC_STATUS;
838	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
838	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
839
840		Tisc_receive2 = function        (status_vector             : PISC_STATUS;
841		request_handle            : PISC_REQ_HANDLE;
#	Line 837 | Line 845 | Tisc_receive2 = function        (status_
845		isc_arg6,
846		isc_arg7                  : Short;
847		isc_arg8                  : Long): ISC_STATUS;
848	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
848	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
849
850		Tisc_reconnect_transaction = function (status_vector       : PISC_STATUS;
851		db_handle                 : PISC_DB_HANDLE;
852		tran_handle               : PISC_TR_HANDLE;
853		isc_arg4                  : Short;
854		isc_arg5                  : PChar): ISC_STATUS;
855	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
855	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
856
857		Tisc_release_request = function (status_vector             : PISC_STATUS;
858		request_handle            : PISC_REQ_HANDLE): ISC_STATUS;
859	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
859	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
860
861		Tisc_request_info = function    (status_vector             : PISC_STATUS;
862		request_handle            : PISC_REQ_HANDLE;
#	Line 857 | Line 865 | Tisc_request_info = function    (status_
865		isc_arg5                  : PChar;
866		isc_arg6                  : Short;
867		isc_arg7                  : PChar): ISC_STATUS;
868	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
868	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
869
870		Tisc_seek_blob = function       (status_vector             : PISC_STATUS;
871		blob_handle               : PISC_BLOB_HANDLE;
872		isc_arg3                  : Short;
873		isc_arg4                  : ISC_LONG;
874		isc_arg5                  : PISC_LONG): ISC_STATUS;
875	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
875	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
876
877		Tisc_send = function            (status_vector             : PISC_STATUS;
878		request_handle            : PISC_REQ_HANDLE;
#	Line 872 | Line 880 | Tisc_send = function            (status_
880		isc_arg4                  : Short;
881		isc_arg5                  : PVoid;
882		isc_arg6                  : Short): ISC_STATUS;
883	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
883	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
884
885		Tisc_start_and_send = function  (status_vector             : PISC_STATUS;
886		request_handle            : PISC_REQ_HANDLE;
#	Line 881 | Line 889 | Tisc_start_and_send = function  (status_
889		isc_arg5                  : Short;
890		isc_arg6                  : PVoid;
891		isc_arg7                  : Short): ISC_STATUS;
892	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
892	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
893
894		Tisc_start_request = function   (status_vector             : PISC_STATUS;
895		request_handle            : PISC_REQ_HANDLE;
896		tran_handle               : PISC_TR_HANDLE;
897		isc_arg4                  : Short): ISC_STATUS;
898	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
898	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
899
900		Tisc_unwind_request = function  (status_vector             : PISC_STATUS;
901		tran_handle               : PISC_TR_HANDLE;
902		isc_arg3                  : Short): ISC_STATUS;
903	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
903	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
904
905		Tisc_wait_for_event = function  (status_vector             : PISC_STATUS;
906		db_handle                 : PISC_DB_HANDLE;
907		length                    : Short;
908		event_buffer,
909		result_buffer             : PChar): ISC_STATUS;
910	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
910	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
911
912		(*******************************)
913		(** Other Sql functions       **)
#	Line 907 | Line 915 | Tisc_wait_for_event = function  (status_
915		{$IFDEF IB5_ONLY}
916		Tisc_close = function           (status_vector             : PISC_STATUS;
917		isc_arg2                  : PChar): ISC_STATUS;
918	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
918	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
919
920		Tisc_declare = function         (status_vector             : PISC_STATUS;
921		isc_arg2,
922		isc_arg3                  : PChar): ISC_STATUS;
923	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
923	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
924
925		Tisc_describe = function        (status_vector             : PISC_STATUS;
926		isc_arg2                  : PChar;
927		isc_arg3                  : PSQLDA): ISC_STATUS;
928	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
928	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
929
930		Tisc_describe_bind = function   (status_vector             : PISC_STATUS;
931		isc_arg2                  : PChar;
932		isc_arg3                  : PSQLDA): ISC_STATUS;
933	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
933	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
934
935		Tisc_execute = function         (status_vector             : PISC_STATUS;
936		tran_handle               : PISC_TR_HANDLE;
937		isc_arg3                  : PChar;
938		isc_arg4                  : PSQLDA): ISC_STATUS;
939	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
939	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
940
941		Tisc_execute_immediate = function (status_vector           : PISC_STATUS;
942		db_handle                 : PISC_DB_HANDLE;
943		tran_handle               : PISC_TR_HANDLE;
944		isc_arg4                  : PShort;
945		isc_arg5                  : PChar): ISC_STATUS;
946	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
946	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
947
948		Tisc_fetch = function           (status_vector             : PISC_STATUS;
949		isc_arg2                  : PChar;
950		isc_arg3                  : PSQLDA): ISC_STATUS;
951	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
951	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
952
953		Tisc_open = function            (status_vector             : PISC_STATUS;
954		tran_handle               : PISC_TR_HANDLE;
955		isc_arg3                  : PChar;
956		isc_arg4                  : PSQLDA): ISC_STATUS;
957	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
957	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
958
959		Tisc_prepare = function         (status_vector             : PISC_STATUS;
960		db_handle                 : PISC_DB_HANDLE;
#	Line 955 | Line 963 | Tisc_prepare = function         (status_
963		isc_arg5                  : PShort;
964		isc_arg6                  : PChar;
965		isc_arg7                  : PSQLDA): ISC_STATUS;
966	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
966	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
967		{$ELSE}
968		Tisc_close = function           (status_vector             : PISC_STATUS;
969		isc_arg2                  : PChar): ISC_STATUS;
970	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
970	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
971
972		Tisc_declare = function         (status_vector             : PISC_STATUS;
973		isc_arg2,
974		isc_arg3                  : PChar): ISC_STATUS;
975	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
975	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
976
977		Tisc_describe = function        (status_vector             : PISC_STATUS;
978		isc_arg2                  : PChar;
979		isc_arg3                  : PXSQLDA): ISC_STATUS;
980	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
980	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
981
982		Tisc_describe_bind = function   (status_vector             : PISC_STATUS;
983		isc_arg2                  : PChar;
984		isc_arg3                  : PXSQLDA): ISC_STATUS;
985	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
985	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
986
987		Tisc_execute = function         (status_vector             : PISC_STATUS;
988		tran_handle               : PISC_TR_HANDLE;
989		isc_arg3                  : PChar;
990		isc_arg4                  : PXSQLDA): ISC_STATUS;
991	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
991	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
992
993		Tisc_execute_immediate = function (status_vector           : PISC_STATUS;
994		db_handle                 : PISC_DB_HANDLE;
995		tran_handle               : PISC_TR_HANDLE;
996		isc_arg4                  : PShort;
997		isc_arg5                  : PChar): ISC_STATUS;
998	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
998	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
999
1000		Tisc_fetch = function           (status_vector             : PISC_STATUS;
1001		isc_arg2                  : PChar;
1002		isc_arg3                  : PXSQLDA): ISC_STATUS;
1003	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1003	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1004
1005		Tisc_open = function            (status_vector             : PISC_STATUS;
1006		tran_handle               : PISC_TR_HANDLE;
1007		isc_arg3                  : PChar;
1008		isc_arg4                  : PXSQLDA): ISC_STATUS;
1009	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1009	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1010
1011		Tisc_prepare = function         (status_vector             : PISC_STATUS;
1012		db_handle                 : PISC_DB_HANDLE;
#	Line 1007 | Line 1015 | Tisc_prepare = function         (status_
1015		isc_arg5                  : PShort;
1016		isc_arg6                  : PChar;
1017		isc_arg7                  : PXSQLDA): ISC_STATUS;
1018	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1018	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1019		{$ENDIF}
1020
1021		(***************************************)
#	Line 1022 | Line 1030 | Tisc_dsql_execute_m = function  (status_
1030		isc_arg6                  : UShort;
1031		isc_arg7                  : UShort;
1032		isc_arg8                  : PChar): ISC_STATUS;
1033	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1033	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1034
1035		Tisc_dsql_execute2_m = function (status_vector             : PISC_STATUS;
1036		tran_handle               : PISC_TR_HANDLE;
#	Line 1037 | Line 1045 | Tisc_dsql_execute2_m = function (status_
1045		isc_arg11                 : UShort;
1046		isc_arg12                 : UShort;
1047		isc_arg13                 : PChar): ISC_STATUS;
1048	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1048	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1049
1050		Tisc_dsql_execute_immediate_m = function (status_vector    : PISC_STATUS;
1051		db_handle                 : PISC_DB_HANDLE;
#	Line 1050 | Line 1058 | Tisc_dsql_execute_immediate_m = function
1058		isc_arg9                  : UShort;
1059		isc_arg10                 : UShort;
1060		isc_arg11                 : PChar): ISC_STATUS;
1061	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1061	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1062
1063		Tisc_dsql_exec_immed3_m = function  (status_vector         : PISC_STATUS;
1064		db_handle                 : PISC_DB_HANDLE;
#	Line 1068 | Line 1076 | Tisc_dsql_exec_immed3_m = function  (sta
1076		isc_arg14                 : UShort;
1077		isc_arg15                 : UShort;
1078		isc_arg16                 : PChar): ISC_STATUS;
1079	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1079	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1080
1081		Tisc_dsql_fetch_m = function    (status_vector             : PISC_STATUS;
1082		statement_handle          : PISC_STMT_HANDLE;
#	Line 1077 | Line 1085 | Tisc_dsql_fetch_m = function    (status_
1085		isc_arg5                  : UShort;
1086		isc_arg6                  : UShort;
1087		isc_arg7                  : PChar): ISC_STATUS;
1088	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1088	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1089
1090		(*$ifdef SCROLLABLE_CURSORS*)
1091		Tisc_dsql_fetch2_m = function   (status_vector             : PISC_STATUS;
#	Line 1089 | Line 1097 | Tisc_dsql_fetch2_m = function   (status_
1097		isc_arg7                  : PChar;
1098		isc_arg8                  : UShort;
1099		isc_arg9                  : Long): ISC_STATUS;
1100	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1100	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1101		(*$endif*)
1102
1103		Tisc_dsql_insert_m = function   (status_vector             : PISC_STATUS;
#	Line 1099 | Line 1107 | Tisc_dsql_insert_m = function   (status_
1107		isc_arg5                  : UShort;
1108		isc_arg6                  : UShort;
1109		isc_arg7                  : PChar): ISC_STATUS;
1110	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1110	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1111
1112		Tisc_dsql_prepare_m = function  (status_vector             : PISC_STATUS;
1113		tran_handle               : PISC_TR_HANDLE;
#	Line 1111 | Line 1119 | Tisc_dsql_prepare_m = function  (status_
1119		isc_arg8                  : PChar;
1120		isc_arg9                  : UShort;
1121		isc_arg10                 : PChar): ISC_STATUS;
1122	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1122	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1123
1124		Tisc_dsql_release = function    (status_vector             : PISC_STATUS;
1125		isc_arg2                  : PChar): ISC_STATUS;
1126	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1126	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1127
1128		Tisc_embed_dsql_close = function(status_vector             : PISC_STATUS;
1129		isc_arg2                  : PChar): ISC_STATUS;
1130	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1130	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1131
1132		Tisc_embed_dsql_declare = function  (status_vector         : PISC_STATUS;
1133		isc_arg2                  : PChar;
1134		isc_arg3                  : PChar): ISC_STATUS;
1135	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1135	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1136
1137		Tisc_embed_dsql_describe = function (status_vector         : PISC_STATUS;
1138		isc_arg2                  : PChar;
1139		isc_arg3                  : UShort;
1140		isc_arg4                  : PXSQLDA): ISC_STATUS;
1141	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1141	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1142
1143		Tisc_embed_dsql_describe_bind = function (status_vector    : PISC_STATUS;
1144		isc_arg2                  : PChar;
1145		isc_arg3                  : UShort;
1146		isc_arg4                  : PXSQLDA): ISC_STATUS;
1147	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1147	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1148
1149		Tisc_embed_dsql_execute = function  (status_vector         : PISC_STATUS;
1150		tran_handle               : PISC_TR_HANDLE;
1151		isc_arg3                  : PChar;
1152		isc_arg4                  : UShort;
1153		isc_arg5                  : PXSQLDA): ISC_STATUS;
1154	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1154	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1155
1156		Tisc_embed_dsql_execute2 = function (status_vector         : PISC_STATUS;
1157		tran_handle               : PISC_TR_HANDLE;
#	Line 1151 | Line 1159 | Tisc_embed_dsql_execute2 = function (sta
1159		isc_arg4                  : UShort;
1160		isc_arg5                  : PXSQLDA;
1161		isc_arg6                  : PXSQLDA): ISC_STATUS;
1162	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1162	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1163
1164		Tisc_embed_dsql_execute_immed = function (status_vector    : PISC_STATUS;
1165		db_handle                 : PISC_DB_HANDLE;
#	Line 1160 | Line 1168 | Tisc_embed_dsql_execute_immed = function
1168		isc_arg5                  : PChar;
1169		isc_arg6                  : UShort;
1170		isc_arg7                  : PXSQLDA): ISC_STATUS;
1171	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1171	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1172
1173		Tisc_embed_dsql_fetch = function(status_vector             : PISC_STATUS;
1174		isc_arg2                  : PChar;
1175		isc_arg3                  : UShort;
1176		isc_arg4                  : PXSQLDA): ISC_STATUS;
1177	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1177	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1178
1179		(*$ifdef SCROLLABLE_CURSORS*)
1180		Tisc_embed_dsql_fetch2 = function  (status_vector         : PISC_STATUS;
#	Line 1175 | Line 1183 | Tisc_embed_dsql_fetch2 = function  (stat
1183		isc_arg4                  : PXSQLDA;
1184		isc_arg5                  : UShort;
1185		isc_arg6                  : Long): ISC_STATUS;
1186	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1186	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1187		(*$endif*)
1188
1189		Tisc_embed_dsql_open = function (status_vector             : PISC_STATUS;
#	Line 1183 | Line 1191 | Tisc_embed_dsql_open = function (status_
1191		isc_arg3                  : PChar;
1192		isc_arg4                  : UShort;
1193		isc_arg5                  : PXSQLDA): ISC_STATUS;
1194	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1194	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1195
1196		Tisc_embed_dsql_open2 = function (status_vector            : PISC_STATUS;
1197		tran_handle               : PISC_TR_HANDLE;
#	Line 1191 | Line 1199 | Tisc_embed_dsql_open2 = function (status
1199		isc_arg4                  : UShort;
1200		isc_arg5                  : PXSQLDA;
1201		isc_arg6                  : PXSQLDA): ISC_STATUS;
1202	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1202	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1203
1204		Tisc_embed_dsql_insert = function (status_vector           : PISC_STATUS;
1205		isc_arg2                  : PChar;
1206		isc_arg3                  : UShort;
1207		isc_arg4                  : PXSQLDA): ISC_STATUS;
1208	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1208	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1209
1210		Tisc_embed_dsql_prepare = function  (status_vector         : PISC_STATUS;
1211		db_handle                 : PISC_DB_HANDLE;
#	Line 1207 | Line 1215 | Tisc_embed_dsql_prepare = function  (sta
1215		isc_arg6                  : PChar;
1216		isc_arg7                  : UShort;
1217		isc_arg8                  : PXSQLDA): ISC_STATUS;
1218	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1218	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1219
1220		Tisc_embed_dsql_release = function  (status_vector         : PISC_STATUS;
1221		isc_arg2                  : PChar): ISC_STATUS;
1222	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1222	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1223
1224		(********************************)
1225		(** Other Blob functions       **)
#	Line 1220 | Line 1228 | Tisc_embed_dsql_release = function  (sta
1228		TBLOB_open = function           (blob_handle               : TISC_BLOB_HANDLE;
1229		isc_arg2                  : PChar;
1230		isc_arg3                  : int): PBSTREAM;
1231	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1231	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1232
1233		TBLOB_put = function            (isc_arg1                  : char;
1234		isc_arg2                  : PBSTREAM): Int;
1235	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1235	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1236
1237		TBLOB_close = function         (isc_arg1                  : PBSTREAM): Int;
1238	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1238	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1239
1240		TBLOB_get = function           (isc_arg1                  : PBSTREAM): Int;
1241	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1241	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1242
1243		TBLOB_display = function        (isc_arg1                  : PISC_QUAD;
1244		db_handle                 : TISC_DB_HANDLE;
1245		tran_handle               : TISC_TR_HANDLE;
1246		isc_arg4                  : PChar): Int;
1247	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1247	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1248
1249		TBLOB_dump = function           (isc_arg1                  : PISC_QUAD;
1250		db_handle                 : TISC_DB_HANDLE;
1251		tran_handle               : TISC_TR_HANDLE;
1252		isc_arg4                  : PChar): Int;
1253	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1253	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1254
1255		TBLOB_edit = function           (isc_arg1                  : PISC_QUAD;
1256		db_handle                 : TISC_DB_HANDLE;
1257		tran_handle               : TISC_TR_HANDLE;
1258		isc_arg4                  : PChar): Int;
1259	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1259	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1260
1261		TBLOB_load = function           (isc_arg1                  : PISC_QUAD;
1262		db_handle                 : TISC_DB_HANDLE;
1263		tran_handle               : TISC_TR_HANDLE;
1264		isc_arg4                  : PChar): Int;
1265	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1265	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1266
1267		TBLOB_text_dump = function      (isc_arg1                  : PISC_QUAD;
1268		db_handle                 : TISC_DB_HANDLE;
1269		tran_handle               : TISC_TR_HANDLE;
1270		isc_arg4                  : PChar): Int;
1271	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1271	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1272
1273		TBLOB_text_load = function      (isc_arg1                  : PISC_QUAD;
1274		db_handle                 : TISC_DB_HANDLE;
1275		tran_handle               : TISC_TR_HANDLE;
1276		isc_arg4                  : PChar): Int;
1277	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1277	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1278
1279		TBopen = function               (isc_arg1                  : PISC_QUAD;
1280		db_handle                 : TISC_DB_HANDLE;
1281		tran_handle               : TISC_TR_HANDLE;
1282		isc_arg4                  : PChar): Int;
1283	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1283	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1284
1285		TBopen2 = function              (isc_arg1                  : PISC_QUAD;
1286		db_handle                 : TISC_DB_HANDLE;
1287		tran_handle               : TISC_TR_HANDLE;
1288		isc_arg4                  : PChar;
1289		isc_arg5                  : UShort): PBSTREAM;
1290	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1290	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1291
1292		(********************************)
1293		(** Other Misc functions       **)
#	Line 1289 | Line 1297 | Tisc_ftof = function            (isc_arg
1297		isc_arg2                  : UShort;
1298		isc_arg3                  : PChar;
1299		isc_arg4                  : UShort): ISC_LONG;
1300	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1300	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1301
1302		Tisc_print_blr = function       (isc_arg1                  : PChar;
1303		isc_arg2                  : TISC_CALLBACK;
1304		isc_arg3                  : PVoid;
1305		isc_arg4                  : Short): ISC_STATUS;
1306	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1306	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1307
1308		Tisc_set_debug = procedure     (isc_arg1                  : Int);
1309	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1309	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1310
1311		Tisc_qtoq = procedure           (isc_arg1                  : PISC_QUAD;
1312		isc_arg2                  : PISC_QUAD);
1313	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1313	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1314
1315		Tisc_vtof = procedure           (isc_arg1                  : PChar;
1316		isc_arg2                  : PChar;
1317		isc_arg3                  : UShort);
1318	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1318	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1319
1320		Tisc_vtov = procedure           (isc_arg1                  : PChar;
1321		isc_arg2                  : PChar;
1322		isc_arg3                  : Short);
1323	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1323	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1324
1325		Tisc_version = function         (db_handle                 : PISC_DB_HANDLE;
1326		isc_arg2                  : TISC_CALLBACK;
1327		isc_arg3                  : PVoid): Int;
1328	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1328	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1329
1330		Tisc_reset_fpe = function      (isc_arg1                  : UShort): ISC_LONG;
1331	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1331	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1332
1333		(*******************************************)
1334		(** Service manager functions             **)
#	Line 1332 | Line 1340 | Tisc_service_attach = function  (status_
1340		service_handle            : PISC_SVC_HANDLE;
1341		isc_arg5                  : UShort;
1342		isc_arg6                  : PChar): ISC_STATUS;
1343	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1343	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1344
1345		Tisc_service_detach = function (status_vector             : PISC_STATUS;
1346		service_handle            : PISC_SVC_HANDLE): ISC_STATUS;
1347	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1347	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1348
1349		Tisc_service_query = function   (status_vector             : PISC_STATUS;
1350		service_handle            : PISC_SVC_HANDLE;
#	Line 1347 | Line 1355 | Tisc_service_query = function   (status_
1355		isc_arg7                  : PChar;
1356		isc_arg8                  : UShort;
1357		isc_arg9                  : PChar): ISC_STATUS;
1358	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1358	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1359
1360		Tisc_service_start = function  (status_vector             : PISC_STATUS;
1361		service_handle            : PISC_SVC_HANDLE;
1362		recv_handle               : PISC_SVC_HANDLE;
1363		isc_arg4                  : UShort;
1364		isc_arg5                  : PChar): ISC_STATUS;
1365	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1365	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1366
1367		(*********************************)
1368		(** Forms functions             **)
#	Line 1365 | Line 1373 | Tisc_compile_map = function     (status_
1373		request_handle            : PISC_REQ_HANDLE;
1374		isc_arg4                  : PShort;
1375		isc_arg5                  : PChar): ISC_STATUS;
1376	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1376	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1377
1378		Tisc_compile_menu = function    (status_vector             : PISC_STATUS;
1379		form_handle               : PISC_FORM_HANDLE;
1380		request_handle            : PISC_REQ_HANDLE;
1381		isc_arg4                  : PShort;
1382		isc_arg5                  : PChar): ISC_STATUS;
1383	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1383	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1384
1385		Tisc_compile_sub_map = function (status_vector             : PISC_STATUS;
1386		win_handle                : PISC_WIN_HANDLE;
1387		request_handle            : PISC_REQ_HANDLE;
1388		isc_arg4                  : PShort;
1389		isc_arg5                  : PChar): ISC_STATUS;
1390	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1390	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1391
1392		Tisc_create_window = function   (status_vector             : PISC_STATUS;
1393		win_handle                : PISC_WIN_HANDLE;
#	Line 1387 | Line 1395 | Tisc_create_window = function   (status_
1395		isc_arg4                  : PChar;
1396		isc_arg5                  : PShort;
1397		isc_arg6                  : PShort): ISC_STATUS;
1398	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1398	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1399
1400		Tisc_delete_window = function   (status_vector             : PISC_STATUS;
1401		win_handle                : PISC_WIN_HANDLE): ISC_STATUS;
1402	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1402	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1403
1404		Tisc_drive_form = function      (status_vector             : PISC_STATUS;
1405		db_handle                 : PISC_DB_HANDLE;
#	Line 1400 | Line 1408 | Tisc_drive_form = function      (status_
1408		request_handle            : PISC_REQ_HANDLE;
1409		isc_arg6                  : PUChar;
1410		isc_arg7                  : PUChar): ISC_STATUS;
1411	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1411	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1412
1413		Tisc_drive_menu = function      (status_vector             : PISC_STATUS;
1414		win_handle                : PISC_WIN_HANDLE;
#	Line 1413 | Line 1421 | Tisc_drive_menu = function      (status_
1421		isc_arg9                  : PShort;
1422		isc_arg10                 : PChar;
1423		isc_arg11                 : PISC_LONG): ISC_STATUS;
1424	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1424	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1425
1426		Tisc_form_delete = function     (status_vector             : PISC_STATUS;
1427		form_handle               : PISC_FORM_HANDLE): ISC_STATUS;
1428	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1428	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1429
1430		Tisc_form_fetch = function      (status_vector             : PISC_STATUS;
1431		db_handle                 : PISC_DB_HANDLE;
1432		tran_handle               : PISC_TR_HANDLE;
1433		request_handle            : PISC_REQ_HANDLE;
1434		isc_arg5                  : PUChar): ISC_STATUS;
1435	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1435	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1436
1437		Tisc_form_insert = function     (status_vector             : PISC_STATUS;
1438		db_handle                 : PISC_DB_HANDLE;
1439		tran_handle               : PISC_TR_HANDLE;
1440		request_handle            : PISC_REQ_HANDLE;
1441		isc_arg5                  : PUChar): ISC_STATUS;
1442	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1442	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1443
1444		Tisc_get_entree = function      (status_vector             : PISC_STATUS;
1445		request_handle            : PISC_REQ_HANDLE;
#	Line 1439 | Line 1447 | Tisc_get_entree = function      (status_
1447		isc_arg4                  : PChar;
1448		isc_arg5                  : PISC_LONG;
1449		isc_arg6                  : PShort): ISC_STATUS;
1450	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1450	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1451
1452		Tisc_initialize_menu = function (status_vector             : PISC_STATUS;
1453		request_handle            : PISC_REQ_HANDLE): ISC_STATUS;
1454	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1454	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1455
1456		Tisc_menu = function            (status_vector             : PISC_STATUS;
1457		win_handle                : PISC_WIN_HANDLE;
1458		request_handle            : PISC_REQ_HANDLE;
1459		isc_arg4                  : PShort;
1460		isc_arg5                  : PChar): ISC_STATUS;
1461	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1461	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1462
1463		Tisc_load_form = function       (status_vector             : PISC_STATUS;
1464		db_handle                 : PISC_DB_HANDLE;
#	Line 1458 | Line 1466 | Tisc_load_form = function       (status_
1466		form_handle               : PISC_FORM_HANDLE;
1467		isc_arg5                  : PShort;
1468		isc_arg6                  : PChar): ISC_STATUS;
1469	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1469	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1470
1471		Tisc_pop_window = function      (status_vector             : PISC_STATUS;
1472		win_handle                : PISC_WIN_HANDLE): ISC_STATUS;
1473	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1473	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1474
1475		Tisc_put_entree = function      (status_vector             : PISC_STATUS;
1476		request_handle            : PISC_REQ_HANDLE;
1477		isc_arg3                  : PShort;
1478		isc_arg4                  : PChar;
1479		isc_arg5                  : PISC_LONG): ISC_STATUS;
1480	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1480	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1481
1482		Tisc_reset_form = function      (status_vector             : PISC_STATUS;
1483		request_handle            : PISC_REQ_HANDLE): ISC_STATUS;
1484	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1484	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1485
1486		Tisc_suspend_window = function  (status_vector             : PISC_STATUS;
1487		win_handle                : PISC_WIN_HANDLE): ISC_STATUS;
1488	<	{$IFDEF LINUX} cdecl; {$ELSE} stdcall; {$ENDIF}
1488	>	{$IFDEF WINDOWS} stdcall; {$ELSE} cdecl; {$ENDIF}
1489
1490		(** Constants!!! **)
1491		(*****************************************************)

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines