IBExpert New Version 2007.02.22 ready for Download

Today we uploaded a new Version 2007.02.22
of IBExpert on www.ibexpert.com

What is new?


IBExpert 2007.02.22
------------------------------------------

1. Support of known Friebird 2.1 features implemented:
2. Create SUID procedures
3. Database Designer: drag-n-drop, autoincrement
4. Extract Metadata: support for secondary database
5. IBEBlock: ibec_Array, FOREACH
6. A lot of minor bugfixes and small improvements...



and much more ...

If you are registered customer and cannot access the
customer area, please check the update end date from
your registration form.

If you update right is already expired,you can extend
it for the next two years with buying the Extension
license(s) in our shop. See details on our Web Site
www.ibexpert.com or just ask register@...
for details.



IBExpert 2007.02.22
------------------------------------------

1. Support of known Friebird 2.1 features implemented:

* Global temporary tables

* Triggers on database events

* Common table expressions (WITH, FOR WITH)

* Domains in procedures (TYPE OF)

* MERGE

* UPDATE OR INSERT


2. Create SUID procedures. New mechanism of
composing texts of SUID procedures based on
IBEBlock implemented.

3. Database Designer:

* Added possibility to drag-n-drop objects from
the Project View tree.

* Added support for autoincrement fields based
on IBEBlock feature. To automaticaly create
generators and triggers for autoincrement
fields you have to mark necessary fields as
autoincrement and define "For each
autoincrement field" block
(Model Options | Blocks):

execute ibeblock (
HModel variant comment 'Current model handle',
HTable variant comment 'Current table handle',
HColumn variant comment 'Current column handle')
returns (
GenScript variant,
TrgScript variant,
ProcScript variant)
as
begin
LF = ibec_CRLF();

TblName = ibec_dbd_GetObjectProp(HTable, 'NAME');
FldName = ibec_dbd_GetObjectProp(HColumn, 'NAME');

GenName = 'GEN_' || TblName || '_' || FldName;
GenName = ibec_AnsiUpperCase(GenName);

TrgName = TblName || '_BI';
TrgName = ibec_AnsiUpperCase(TrgName);

GenScript = 'CREATE GENERATOR ' || GenName || ';' || LF ||
'SET GENERATOR ' || GenName || ' TO 0;' || LF;

TrgScript = 'CREATE TRIGGER ' || TrgName || ' FOR ' || TblName
|| LF ||
'ACTIVE BEFORE INSERT POSITION 0' || LF ||
'AS' || LF ||
'BEGIN' || LF ||
' IF (' || FldName || ' IS NULL) THEN' || LF ||
' NEW.' || FldName || ' = GEN_ID(' || GenName || ',
1);' || LF ||
'END^' || LF || LF;
end



4. Extract Metadata:

* Added support for secondary database files info, corresponding
ALTER DATABASE statements will be included into result script
as comments.


5. IBEBlock:

* ibec_Array function implemented. This function returns a
one-dimensional a 0-based array of values.

Syntax:

function ibec_Array(val1 [, val2, ..., valN) : variant;

Example:

MyVar = ibec_Array('Some text', 23, NULL, 56.32);

The code above is equal to following:

MyVar[0] = 'Some text';
MyVar[1] = 23;
MyVar[2] = NULL;
MyVar[4] = 56.32


* FOREACH statement implemented. This satement simply gives a way
to iterate over arrays.

Syntax:
FOREACH (var1 AS var2 [KEY | INDEX var3]) DO
<statements>
FOREACH loops over the array given by var1.
On each loop, the value of the current element
is assigned to var2.
If KEY (INDEX) var3 clause is specified, the current
element's key will be assigned to the variable var3 on
each loop.
Example:

MyVar = ibec_Array('Some text', 23, NULL, 56.32);
foreach (MyVar as val key id) do
if (val is not null) then
ibec_ShowMessage('MyVar[' || id || '] value is: ' || val);

The code above is equal to following:

MyVar = ibec_Array('Some text', 23, NULL, 56.32);
for id = 0 to ibec_High(MyVar) do
begin
val = MyVar[id];
if (val is not null) then
ibec_ShowMessage('MyVar[' || id || '] value is: ' || val);
end

6. A lot of minor bugfixes and small improvements...




The IBExpert Team


The most Expert for InterBase and Firebird --- www.ibexpert.com
HK Software - Oldenburger Str 233 - 26203 Wardenburg - Germany
Phone/Fax +49 700 IBEXPERT (42397378) www.h-k.de
Training and Support for Delphi, InterBase, Firebird, AS/400