====== pears.InsertRecentObject ======
<WRAP center round info>
Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace.
</WRAP>

===== Original SQL =====
<code sql>
create procedure "pears"."InsertRecentObject"( 
  /* Application Maintained Function / Procedure - DO NOT EDIT*/
  in @ObjectType char(1),in @ObjectID char(20) ) 
begin
  if "isnull"(@ObjectType,'') = '' or "isnull"(@ObjectID,'') = '' then return
  end if;
  if @ObjectType = 'T' then
    select "SerialNumber" into @ObjectID from "TempTimeSheet" where "TempTimesheetID" = @ObjectID
  end if;
  if @ObjectType = 'O' then
    select "SerialNumber" into @ObjectID from "TempProvTimeSheet" where "TempProvTimesheetID" = @ObjectID;
    set @ObjectType = 'T'
  end if;
  delete from "RecentObjects" where "StaffID" = "UserStaffID" and "ObjectType" = @ObjectType and "ObjectID" = @ObjectID;
  insert into "RecentObjects"( "StaffID","ObjectType","ObjectID" ) values( "UserStaffID",@ObjectType,@ObjectID ) 
end
go

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."InsertRecentObject" IS 
{create procedure InsertRecentObject 

/* Application Maintained Function / Procedure - DO NOT EDIT*/

(in @ObjectType char(1),in @ObjectID char(20))
begin
  if isnull(@ObjectType,'') = '' or isnull(@ObjectID,'') = '' then return
  end if;
  if @ObjectType = 'T' then
    select SerialNumber into @ObjectID from TempTimeSheet where TempTimesheetID = @ObjectID
  end if;
  if @ObjectType = 'O' then
    select SerialNumber into @ObjectID from TempProvTimeSheet where TempProvTimesheetID = @ObjectID;
    set @ObjectType='T'
  end if;
  delete from RecentObjects where StaffID = UserStaffID and ObjectType = @ObjectType and ObjectID = @ObjectID;
  insert into RecentObjects( StaffID,ObjectType,ObjectID) values( UserStaffID,@ObjectType,@ObjectID) 
end
}
</code>