====== pears.HexCriterionID ======
<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 function "pears"."HexCriterionID"( 
  /* Application Maintained Function / Procedure - DO NOT EDIT*/
  in "CriterionID" binary(20) ) 
returns char(40)
begin
  declare "rv" char(40);
  declare "i" smallint;
  set "rv" = '';
  set "i" = 1;
  while "i" <= "byte_length"("criterionid") loop
    set "rv" = "rv"+"right"("inttohex"("ascii"("byte_substr"("criterionid","i",1))),2);
    set "i" = "i"+1
  end loop;
  return "rv"
end
</code>