pears.CollectionGetItemTypeName

COMMENT TO PRESERVE FORMAT ON PROCEDURE "pears"."CollectionGetItemTypeName" IS 
{CREATE FUNCTION CollectionGetItemTypeName 
 
/* Application Maintained Function / Procedure - DO NOT EDIT*/
 
(IN ItemType CHAR(2)) 
RETURNS VARCHAR(20)
BEGIN
  DECLARE rv VARCHAR(20);
  /* Item Types P -person, C -company, E -employment, L -placement, R -progress, T -timesheet, I -Invoice, V -vacancy, Q -timesheet query, 0 -contact event, */
 
  CASE ItemType
  WHEN 'O' THEN SET rv = wpkgetswitchvalue('cename', 'Global');
  WHEN 'H' THEN SET rv  = 'Header';
  WHEN 'E' THEN SET rv = wpkgetswitchvalue('copersonname', 'Global');
  WHEN 'P' THEN SET rv = wpkgetswitchvalue('appname', 'Global');
  WHEN 'Q' THEN SET rv = 'Timesheet Query';
  WHEN 'T' THEN SET rv = 'Timesheet';
  WHEN 'Z' THEN SET rv = 'Prov. Timesheet';
  WHEN 'S' THEN SET rv = 'Shift';
  WHEN 'R' THEN SET rv = 'Progress';
  WHEN 'C' THEN SET rv = wpkgetswitchvalue('coname', 'Global');
  WHEN 'I' THEN SET rv  = 'Invoice';
  WHEN 'V' THEN SET rv = wpkgetswitchvalue('vacname', 'Global');
  WHEN 'L' THEN SET rv = wpkgetswitchvalue('placname', 'Global');
  END CASE;
  RETURN rv
END
}