pears.VATCodeForTimesheetLine

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."VATCodeForTimesheetLine" IS 
{CREATE FUNCTION VATCodeForTimesheetLine( IN "tslineid" CHAR(20) ) 
RETURNS CHAR(3)
BEGIN
  DECLARE "rv" CHAR(3);
  DECLARE "flg" CHAR(20);
  DECLARE "vex" SMALLINT;
  DECLARE "vmrg" SMALLINT;
  RETURN '';
  SELECT "companyaccount"."vatexempt","companyaccount"."vatontempmargin" INTO "vex","vmrg" FROM "temptimesheetline" KEY JOIN "temptimesheet" 
KEY JOIN "placement" KEY JOIN "employment" KEY JOIN "company" KEY JOIN "companyaccount" WHERE "temptimesheetline"."temptimesheetlineid" = "tslineid";
  IF "vex" = 1 THEN
    SET "rv" = 'E'
  ELSEIF "vmrg" = 1 THEN
    SET "rv" = 'S/'
  ELSE
    SET "rv" = 'S'
  END IF;
  RETURN("rv")
END
}