var LOB: TLOBLocator;
begin
with LOBQuery do
begin
SetVariable('v_id', ...);
// Create a new temporary CLOB
LOB := TLOBLocator.CreateTemporary(Session, otCLOB, True);
// Assign it to the returning variable
SetComplexVariable('v_clob', LOB);
// Call the procedure
Execute;
// Do something with the data
ShowMessage(LOB.AsString);
// Free the CLOB
LOB.Free;
end;
end;