Exit

Prototype

Exit

Description

Stops the script execution.

Parameters

None.

Returned value

None.

Notes

None.

Example

// Opens a table

TableOne:=TableOpen('c:\invoices\index','invoices.db'); 

// Orders the table according to a field

TableSetIndex(TableOne,'Company'); 

// Search for the first field data in the table, if there is no data then

If not TableFind(TableOne, 'Recogniform SpA') then

begin

ApplicationLog('Error, stopping execution!');

// Close the table

TableClose(TableOne);

//It exit from the script

Exit;

end

else

 AppliactionLog(_CurrentAgent,'Ok, going on');