====== pears.BlobstoreCopy ======
Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace.
===== Original SQL =====
COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."BlobstoreCopy" IS
{create function BlobstoreCopy
/* Application Maintained Function / Procedure - DO NOT EDIT*/
(in fromclass char(1),in fromid char(20),in toclass char(1),in toid char(20),in requestedby char(15))
returns integer
not deterministic
begin
declare z integer;
set z=BlobstoreRead(fromclass,fromid,null);
if z is null then
return-1 -- Row not found
else
return BlobStoreWrite(toclass,toid,z,requestedby)
end if
end
}