Sequence of Statements

A transaction consists of several statements. Statements are separated by semicolons and can be empty.

Syntax

StatSeq = Stat { ";" Stat }.

Example

dcltrans
  transaction TInit
  var
    bOk: boolean;
  begin
    write("initializing..."); writeln;
    bOk := InitBuffer(512);
    if bOk then
      writeln("successfully initialized")
    else
      writeln("failure")
    end
  end TInit;

Output

initializing...
successfully initialized