pears.InsertRecentObject

Generated schema reference. Regenerate this page from the SQL unload; keep hand-maintained business notes in the narrative namespace.

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
}
  • database/procedures/pears_insertrecentobject.txt
  • Last modified: 2026/08/07 19:24
  • by 127.0.0.1